tinycobol/test.code/00_FernandoWuthstrack/tcl/teste.c

int main(int agrc, char *argv[]) {
	char tdata[60]="rildo";
	printf("chamarei initTcl\n");
	initTcl();
	tcleval(tdata,"teste.tcl");
	printf("retornando de initTcl\n");
}