cfad47cfa3/t3compiler/tads3/test/data/test_func.t

Show revision log
 
4b825dc642cb6eb9a060e54bf8d69288fbee4904cfad47cfa334b206c65f22086bcc5d63e6f70944
1
#include <tads.h>



2



3
main(args)



4
{



5
    local f = g;



6



7
    f(1);



8
}



9



10
f(x)



11
{



12
    "This is f(<<x>>)\n";



13
}



14



15
g(x)



16
{



17
    "This is g(<<x>>)\n";



18
}