view test/tmp2.c @ 172:096559f07a70

some check
author kono
date Tue, 25 Nov 2003 11:47:41 +0900
parents d35df41eac69
children 682c8ec38d45
line wrap: on
line source

#include "stdio.h"

int
main(ac,av)
int ac;
char *av[];
{
    int i;
    i=main0(ac,av);
    fprintf(stdout,"1: %s %d\n",av[0],i);
    return 0;
}

int
main0(ac,av)
int ac;
char *av[];
{
    fprintf(stdout,"2: %s\n",av[0]);
    goto code0(av,return,environment);
}

code code0(av,ret,retenv)
char *av[];
code (*ret)();
void *retenv;
{
    char *p;
    p = av[0];
    fprintf(stdout,"3: %s\n",p);
    goto code1(av,ret,retenv);
}

code code1(av,ret,retenv)
char *av[];
code (*ret)();
void *retenv;
{
    fprintf(stdout,"4: %s\n",av[0]);
    goto (*ret)(1234),retenv;
}