view test/tmp1.c @ 445:5ec2a88b9f4d const-attribute

const
author kono
date Sun, 21 Nov 2004 19:20:18 +0900
parents 096559f07a70
children c55363eff5e5
line wrap: on
line source


main(ac,av)
int ac;
char *av[];
{
    if (ac>1)
	goto code1(av,return);
    goto code1(ac,av,exit1);
}

code exit1(int ac,int av)
{
    exit(0);
}

code code3(a,b,c,d,e,f)
char a,b;
int c,d,e,f;
{
    if(a)
	goto code3(a,b,c,d,e,f);
    else
	goto code3(a+3,b+3,c+3,d+3,e+3,f+3);
}

code code4(a,b,c,d,e,f)
char a,b;
int c,d,e,f;
{
    int i,j;
    if(a)
	goto code3(a,b,c,d,e,f);
    else
	goto code3(a+i,b+j,c+i,d+3,e+3,f+3);
}

code code0(ac,av)
int ac;
char *av[];
{
    goto code0(ac,av);
}

code code1(ac,av,exit)
int ac,exit;
char *av[];
{
    code (*f)();
    f = exit;
    if (ac>3)
	goto code1(ac,av);
    else if (ac>2)
	goto code1(av,ac);
    else
	goto (*f)(ac,av);
}