Mercurial > repos > rhope
diff cbackend.rhope @ 72:f7bcf3db1342
Add =@String, fix bool bug
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Fri, 18 Jun 2010 17:00:50 -0400 |
parents | d0ce696786cc |
children | a844c623c7df |
line wrap: on
line diff
--- a/cbackend.rhope Fri Jun 18 15:07:09 2010 -0400 +++ b/cbackend.rhope Fri Jun 18 17:00:50 2010 -0400 @@ -1090,9 +1090,9 @@ { If[value] { - out <- [text]Append[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[" = (object *)val_yes;\n"]] + out <- [text]Append[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[" = make_Bool(1);\n"]] }{ - out <- [text]Append[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[" = (object *)val_no;\n"]] + out <- [text]Append[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[" = make_Bool(0);\n"]] } }{ If[[valtype] = ["Machine Integer"]]