From 680ad4ea5b76a90c2f186ce28320601474a96163 Mon Sep 17 00:00:00 2001 From: Owen Rodley Date: Sun, 19 May 2013 02:03:09 +1200 Subject: [PATCH] Add /= function --- src/compiler.lisp | 1 + src/numbers.lisp | 1 + 2 files changed, 2 insertions(+) diff --git a/src/compiler.lisp b/src/compiler.lisp index 58f4a87..763aa92 100644 --- a/src/compiler.lisp +++ b/src/compiler.lisp @@ -1324,6 +1324,7 @@ (define-builtin-comparison >= ">=") (define-builtin-comparison <= "<=") (define-builtin-comparison = "==") +(define-builtin-comparison /= "!=") (define-builtin numberp (x) (js!bool (code "(typeof (" x ") == \"number\")"))) diff --git a/src/numbers.lisp b/src/numbers.lisp index a3105bb..f49fd23 100644 --- a/src/numbers.lisp +++ b/src/numbers.lisp @@ -60,6 +60,7 @@ (defcomparison =) (defcomparison <) (defcomparison <=) +(defcomparison /=) (defconstant pi 3.141592653589793) -- 1.7.10.4