--- a/backendutils.rhope	Fri Aug 06 01:42:37 2010 -0400
+++ b/backendutils.rhope	Mon Aug 09 02:03:57 2010 -0400
@@ -1,7 +1,7 @@
 
 Escape Rhope Name NU[name:escaped]
 {
-	escaped <- [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[name]Replace["_","UN_"]
+	escaped <- [[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[name]Replace["_","UN_"]
 		]Replace["@","AT_"]
 		]Replace[" ","SP_"]
 		]Replace[":","CN_"]
@@ -33,11 +33,19 @@
 		]Replace["&", "AM_"]
 		]Replace["|", "PI_"]
 		]Replace["%", "PC_"]
+		]Replace["`", "BT_"]
+		]Replace["~", "TD_"]
 }
 
-Escape Rhope Name[name:escaped]
+Escape Rhope Name[name:out]
 {
 	escaped <- Escape Rhope Name NU[[name]Replace["_","__"]]
+	[("char","int","short","long","float","double","void","struct")]Find[escaped]
+	{
+		out <- ["ID_"]Append[escaped]
+	}{
+		out <- Val[escaped]
+	}
 }
 
 Blueprint AddRef