Mercurial > hg > CbC > old > device
changeset 687:1ed8cb78cf9b
*** empty log message ***
| author | kono |
|---|---|
| date | Fri, 05 Oct 2007 17:49:11 +0900 |
| parents | 7e0c5c1f1e97 |
| children | 10c8eaf0f73b |
| files | Changes Makefile mc-codegen.c mc-inline.c |
| diffstat | 4 files changed, 16 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/Changes Fri Oct 05 16:43:53 2007 +0900 +++ b/Changes Fri Oct 05 17:49:11 2007 +0900 @@ -9491,3 +9491,12 @@ fact-a の print のnptr の扱いが変。 code segment の宣言の扱いは不便すぎる。(2 path を書くか?) + +Fri Oct 5 16:47:49 JST 2007 + +Intelのnested function call order は直しました。 + + + + +
--- a/Makefile Fri Oct 05 16:43:53 2007 +0900 +++ b/Makefile Fri Oct 05 17:49:11 2007 +0900 @@ -1,3 +1,4 @@ +# CC = gcc -std=c99 -arch ppc CC = gcc -std=c99 # CC = cc # -O3
--- a/mc-codegen.c Fri Oct 05 16:43:53 2007 +0900 +++ b/mc-codegen.c Fri Oct 05 17:49:11 2007 +0900 @@ -605,6 +605,7 @@ return VOID; #endif case CAST: + error(-1); // correct_type is too late for contains_p type = cadddr(e1); e2 = correct_type(e2,caddr(e1)); continue;
--- a/mc-inline.c Fri Oct 05 16:43:53 2007 +0900 +++ b/mc-inline.c Fri Oct 05 17:49:11 2007 +0900 @@ -1406,8 +1406,11 @@ } if (type_compatible(caddr(e1),cadddr(e1))) { return pexpr(e2); - } else - return list4(CAST,pexpr(e2),caddr(e1),cadddr(e1)); + } else { + type = cadddr(e1); + return correct_type(pexpr(e2),caddr(e1)); + // return list4(CAST,pexpr(e2),caddr(e1),cadddr(e1)); + } case DECL_DATA: return list3(DECL_DATA,pexpr(e2),caddr(e1)); case DECL_DATA_LIST: