view CbC-examples/rectype/rectype.cbc @ 129:002ebcbc1eb4

remove test_env
author mir3636
date Tue, 15 May 2018 18:45:25 +0900
parents 78d3881f2882
children
line wrap: on
line source

#include <stdio.h>
#include <stdlib.h>
__code print(__rectype *p)
{
	printf("print\n");
	exit(0);
}
__code csA(__rectype *p)
{
	goto p(csA);
}

void main1()
{
	goto csA(print);
}

int main()
{
	main1();
	return 0;
}