changeset 837:672209eab3b9

diff with -p worked.
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Fri, 03 Dec 2010 21:27:34 +0900
parents a760656224fa
children c7c19e5aefe7
files mc-codegen.c
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/mc-codegen.c	Fri Dec 03 20:37:01 2010 +0900
+++ b/mc-codegen.c	Fri Dec 03 21:27:34 2010 +0900
@@ -3961,7 +3961,8 @@
 #endif
     if (car(e)==ADDRESS||car(e)==GVAR) {
 	if (scalar(t)) {
-	    t = list2(POINTER,VOID); // fake
+	    int t1 = list2(POINTER,VOID); 
+	    if (size(t)>=size(t1)) t = t1; // fake
 	} else {
 	    error(TYERR);
 	}