Mercurial > repos > rhope
comparison backendutils.rhope @ 92:e73a93fb5de1
Beginning of port of compiler to itself, some bugfixes and a refcount optimization
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Mon, 02 Aug 2010 00:58:55 -0400 |
parents | c25d75c2440b |
children | f51c4c17457c |
comparison
equal
deleted
inserted
replaced
91:bcdc326b3d6e | 92:e73a93fb5de1 |
---|---|
1 | 1 |
2 Escape Rhope Name NU[name:escaped] | 2 Escape Rhope Name NU[name:escaped] |
3 { | 3 { |
4 escaped <- [[[[[[[[[[[[[[[[[[[[[[[name]Replace["_","UN_"] | 4 escaped <- [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[name]Replace["_","UN_"] |
5 ]Replace["@","AT_"] | 5 ]Replace["@","AT_"] |
6 ]Replace[" ","SP_"] | 6 ]Replace[" ","SP_"] |
7 ]Replace[":","CN_"] | 7 ]Replace[":","CN_"] |
8 ]Replace["?","QN_"] | 8 ]Replace["?","QN_"] |
9 ]Replace["+","PL_"] | 9 ]Replace["+","PL_"] |
22 ]Replace[",", "CM_"] | 22 ]Replace[",", "CM_"] |
23 ]Replace[".", "PD_"] | 23 ]Replace[".", "PD_"] |
24 ]Replace["\n", "NL_"] | 24 ]Replace["\n", "NL_"] |
25 ]Replace["{", "LC_"] | 25 ]Replace["{", "LC_"] |
26 ]Replace["}", "RC_"] | 26 ]Replace["}", "RC_"] |
27 ]Replace["[", "LS_"] | |
28 ]Replace["]", "RS_"] | |
29 ]Replace["#", "HS_"] | |
30 ]Replace["\\", "BS_"] | |
31 ]Replace["\r", "CR_"] | |
32 ]Replace[";", "SC_"] | |
33 ]Replace["&", "AM_"] | |
34 ]Replace["|", "PI_"] | |
35 ]Replace["%", "PC_"] | |
27 } | 36 } |
28 | 37 |
29 Escape Rhope Name[name:escaped] | 38 Escape Rhope Name[name:escaped] |
30 { | 39 { |
31 escaped <- Escape Rhope Name NU[[name]Replace["_","__"]] | 40 escaped <- Escape Rhope Name NU[[name]Replace["_","__"]] |