wps

commit e3df5b0a036703aeebe2dee333d92f4c2bc249bb
parent 12eca7941b5111b5c126812f664b9f746313c2f9
Author: tomas <tomas@logand.com>
Date:   Sun, 24 Jan 2010 21:05:45 +0100

quoting using "random" marker

Diffstat:
M
wps.js
 | 
17
+++++------------

1 file changed, 5 insertions(+), 12 deletions(-)
diff --git a/wps.js b/wps.js
@@ -1,18 +1,11 @@
 // (c) 2009 Tomas Hlavaty
 
-function isQuoted(V) {
-  return V.q;
-}
-
-function quote(V) {
-  V.q = true;
-  return V;
-}
+// random markers for quoting and toString generated using picolisp
+// (hex (in "/dev/random" (rd 4)))
 
-function unquote(V) {
-  delete V.q;
-  return V;
-}
+function isQuoted(V) {return V.D16322F5;}
+function quote(V) {V.D16322F5 = true; return V;}
+function unquote(V) {delete V.D16322F5; return V;}
 
 function Symbol(N) {
   this.nm = N;