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

Show revision log
 
4b825dc642cb6eb9a060e54bf8d69288fbee4904cfad47cfa334b206c65f22086bcc5d63e6f70944
1
/*



2
 *   test of 'extern function' declarations 



3
 */



4



5
#include "tads.h"



6



7
extern function test1(a, b, c);



8
extern function test2(d, e);



9



10
function test1(a, b, c)



11
{



12
    tadsSay('++ this is test1(' + a + ', ' + b + ', ' + c + ')\n');



13
    tadsSay('++ calling test2(888,999)...\n');



14
    test2(888, 999);



15



16
    tadsSay('++ back in test1 - returning\n');



17
}