diff modules/string.tp @ 265:d6a4c9e7716e

Remove remapping of most operators
author Michael Pavone <pavone@retrodev.com>
date Mon, 14 Jul 2014 19:03:46 -0700
parents 32964a4e7a33
children d2b70cba661e
line wrap: on
line diff
--- a/modules/string.tp	Mon Jul 14 09:33:41 2014 -0700
+++ b/modules/string.tp	Mon Jul 14 19:03:46 2014 -0700
@@ -19,7 +19,7 @@
 		intret
 	}
 
-	llMessage: EQ_ withVars: {
+	llMessage: "=" withVars: {
 		argb <- (string ptr)
 	} andCode: :argb {
 		if: len = (argb len) && bytes = (argb bytes) && (not: (memcmp: data (argb data) bytes)) {
@@ -39,7 +39,7 @@
 		intret
 	}
 
-	llMessage: NEQ_ withVars: {
+	llMessage: "!=" withVars: {
 		argb <- (string ptr)
 	} andCode: :argb {
 		if: len != (argb len) || bytes != (argb bytes) || (memcmp: data (argb data) bytes) {
@@ -56,7 +56,7 @@
 		self
 	}
 
-	llMessage: CAT_ withVars: {
+	llMessage: "." withVars: {
 		argbo <- (object ptr)
 		argb <- (string ptr)
 		out <- (string ptr)