Mercurial > hg > CbC > old > device
comparison mc-parse.c @ 603:2baddc88097d
*** empty log message ***
author | kono |
---|---|
date | Sat, 28 Jan 2006 21:58:00 +0900 |
parents | 6b808480f08b |
children | 1078c7e3bfb0 |
comparison
equal
deleted
inserted
replaced
602:429ec87e03e7 | 603:2baddc88097d |
---|---|
3667 if (!is_function(fnptr)) { | 3667 if (!is_function(fnptr)) { |
3668 error(STERR); | 3668 error(STERR); |
3669 } | 3669 } |
3670 // this is wrong... should be | 3670 // this is wrong... should be |
3671 // code (*)(return_type); | 3671 // code (*)(return_type); |
3672 type=list2(POINTER,CODE); | 3672 type=list2(POINTER,list3(CODE,VOID,cadr(fnptr->ty))); |
3673 // type arg | |
3673 e1=list2(RETURN,(int)fnptr); | 3674 e1=list2(RETURN,(int)fnptr); |
3674 getsym(0); | 3675 getsym(0); |
3675 break; | 3676 break; |
3676 case DEFINED: | 3677 case DEFINED: |
3677 t = mode; mode = IFDEF; | 3678 t = mode; mode = IFDEF; |