Add /= function
authorOwen Rodley <Strigoides@gmail.com>
Sat, 18 May 2013 14:03:09 +0000 (02:03 +1200)
committerOwen Rodley <Strigoides@gmail.com>
Sun, 19 May 2013 23:07:22 +0000 (11:07 +1200)
src/compiler.lisp
src/numbers.lisp

index 58f4a87..763aa92 100644 (file)
 (define-builtin-comparison >= ">=")
 (define-builtin-comparison <= "<=")
 (define-builtin-comparison = "==")
+(define-builtin-comparison /= "!=")
 
 (define-builtin numberp (x)
   (js!bool (code "(typeof (" x ") == \"number\")")))
index a3105bb..f49fd23 100644 (file)
@@ -60,6 +60,7 @@
 (defcomparison =) 
 (defcomparison <)
 (defcomparison <=)
+(defcomparison /=)
 
 (defconstant pi 3.141592653589793)