add diff operatorv.0.0.0

 - and remove and diff and differ
 - and update documentation
 - and update all lali scripts

1 files changed, 12 insertions, 19 deletions

diff --git a/test/main.lali b/test/main.lali
index 5ad4b55..a63cef7 100644
--- a/test/main.lali
+++ b/test/main.lali
@@ -3,11 +3,11 @@
 (defun test (test-expr res)
   (newline)
   (princ
-   (list (fill ((differ (eval test-expr) res) '+)
+   (list (fill ((diff (eval test-expr) res) '+)
                ('f 'fail))
          '--> test-expr))
   (and success
-       (set 'success (fill ((differ (eval test-expr) res) t)
+       (set 'success (fill ((diff (eval test-expr) res) t)
                            (f f)))))
 
 ;; atom
@@ -17,23 +17,16 @@
 (test '(atom '(x a)) f)
 ;(test '(atom 'a) undef)
 
-;; dif
-(test '(dif () 'b) t)
-(test '(dif () ()) f)
-(test '(dif 'a 'b) t)
-(test '(dif 'a 'a) f)
-(test '(dif 'a '(b . c)) t)
-(test '(dif 'a '(b c)) t)
-(test '(dif '(b . c) '(b . c)) t)
-(test '(dif '(b c) '(b c)) t)
-
-;; differ
-(test '(differ 'a ()) t)
-(test '(differ () ()) f)
-(test '(differ 'a '(b c)) t)
-(test '(differ '(a b) '(b c)) t)
-(test '(differ '(b . c) '(b . c)) f)
-(test '(differ '(b c) '(b c)) f)
+;; diff
+(test '(diff 'a ()) t)
+(test '(diff () 'b) t)
+(test '(diff () ()) f)
+(test '(diff 'a 'b) t)
+(test '(diff 'a 'a) f)
+(test '(diff 'a '(b c)) t)
+(test '(diff '(a b) '(b c)) t)
+(test '(diff '(b . c) '(b . c)) f)
+(test '(diff '(b c) '(b c)) f)
 
 ;; car
 (test '(car ()) ())