code
tcode1(f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff,ret,env)
	int f1,f2,f3,f4,f5,f6,f7,f8,f9,fa,fb,fc,fd,fe,ff;
	code(*ret)(int);
	void *env;
{
     goto ret(0),env;
}

code
tcode0(int x,int y,code(*junction)(int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,int,code(*)(int),void *),code(*ret)(int),void *env)
{

     goto junction(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,ret,env);
}

int
main()
{
     goto tcode0(0,1,tcode1,return,environment);
}