Mercurial > repos > rhope
diff cbackend.rhope @ 81:dbe95bfec970
Very basic file access is now working; however, there's a bug involving assigning a literal to a named pipe inside a conditional block that needs fixing
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Thu, 22 Jul 2010 05:39:08 +0000 |
parents | 0083b2f7b3c7 |
children | 27bb051d631c |
line wrap: on
line diff
--- a/cbackend.rhope Wed Jul 21 00:45:13 2010 -0400 +++ b/cbackend.rhope Thu Jul 22 05:39:08 2010 +0000 @@ -675,7 +675,7 @@ { dest <- [pdest]Make Op[func] source <- [psource]Make Op[func] - out <- [func]Add Statement[ [[[dest]Append[" = &("]]Append[source]]Append["->payload)"] ] + out <- [func]Add Statement[ [[[dest]Append[" = (void*)("]]Append[source]]Append[" + 1)"] ] } Array Raw Pointer@C Function[func,psource,pdest:out] @@ -778,6 +778,7 @@ Func Base@C Function[func,tocall,args,type:out] { + Print[ [[func]Name >>]Append[ [": Func Base("]Append[tocall] ] ] rargs <- Map[args, ["Make Op"]Set Input[1, func]] If[[[rargs]Length] > [[func]Last NumParams >>]]