Mercurial > repos > rhope
comparison cbackend.rhope @ 52:079200bc3e75
String literals almost working. Print moved out of C runtime.
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Wed, 28 Apr 2010 01:23:30 -0400 |
parents | 689fb73e7612 |
children | 243d013a49cb |
comparison
equal
deleted
inserted
replaced
51:7d6a6906b648 | 52:079200bc3e75 |
---|---|
1082 { s <- "I" } | 1082 { s <- "I" } |
1083 { s <- "UI" } | 1083 { s <- "UI" } |
1084 | 1084 |
1085 make <- [[[" = make_"]Append[s]]Append["nt"]]Append[[value]Size >>] | 1085 make <- [[[" = make_"]Append[s]]Append["nt"]]Append[[value]Size >>] |
1086 out <- [text]Append[ [[[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[make]]Append["("]]Append[[value]Value >>]]Append[");\n"] ] | 1086 out <- [text]Append[ [[[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[make]]Append["("]]Append[[value]Value >>]]Append[");\n"] ] |
1087 }{ | |
1088 If[[valtype] = ["String"]] | |
1089 { | |
1090 out <- [text]Append[ [[[["\t_const_"]Append[Escape Rhope Name[name]]]Append[" = make_String(\""]]Append[ [[value]Replace["\n", "\\n"]]Replace["\\", "\\\\"]]]Append["\");\n"] ] | |
1091 } | |
1087 } | 1092 } |
1088 } | 1093 } |
1089 } | 1094 } |
1090 } | 1095 } |
1091 } | 1096 } |