Implemented SymTable optimization for efficient variable updates

snippets/userlib-tests.rls

@@ -28,7 +28,7 @@
 'prints if a test has failed'
   (test)
   (echo (concat "FAILED: " test)))
-  
+
 (def test-cases 'all test cases'
   (('set updates var'
      (quote
@@ -61,4 +61,4 @@
     (if (eval test-body)
       (passed test-name)
       (failed test-name))
-    (set (q test-iter) (pop remaining)))))
+    (set (q test-iter) (pop remaining)))))

snippets/userlib.rls

@@ -50,7 +50,7 @@ WARNING: abandon hope all ye who declare and then modify global variables!
   (let ((doc (get-doc var)))
     (def (eval var) doc val)))
 
-(def map 
+(def map
 'Takes two arguments: a function and a list.
 for each element in the list, the function is applied and the
 result is added to a new list. Returns the new list.'