Mercurial > hg > Members > kaito > longjump
view struct_longjump.c @ 9:3f7c32b23851
change __environment.env type and remove unnecessary casts.
author | Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 01 Dec 2013 20:28:23 +0900 |
parents | a7c771f554e7 |
children | a4f34209ba63 |
line wrap: on
line source
int setjmp(int*); int longjmp(int*,int); int printf(const char*,...); struct CbC_env { void *ret_p; int *env; }; __code code1(int n,__code(*__return)(int,void *),void *__environment){ printf("code1 : code entry1\n"); goto __return(n,__environment); } __code return1 (int n,void* env){ printf("return1 : __return entry\n"); *(int*)((struct CbC_env *)(env))->ret_p = n; longjmp((((struct CbC_env *)env)->env),1); } int main1 (){ __code (*__return)(); struct CbC_env __environment; int i_buf[128]; int retval; __environment.ret_p = &retval; __environment.env = i_buf; printf("main1 : main1 entry\n"); if (setjmp(__environment.env)){ printf("main1 : main1 return\n"); return *((int *)__environment.ret_p); } __return = return1; goto code1(30,__return,&__environment); return 0; } int main (){ int n; n = main1(); printf("returned\n"); printf("return = %d\n",n); return 1; }