From 1556fee6df0bac2542061c5d1beb065d35c341ca Mon Sep 17 00:00:00 2001 From: Owen Rodley Date: Sun, 19 May 2013 01:51:08 +1200 Subject: [PATCH] DEFCOMPARISON for = --- src/numbers.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/numbers.lisp b/src/numbers.lisp index 8121b8e..060e657 100644 --- a/src/numbers.lisp +++ b/src/numbers.lisp @@ -16,7 +16,6 @@ ;;;; Various numeric functions and constants ;; Basic functions -(defun = (x y) (= x y)) (defun * (x y) (* x y)) (defun / (x y) (/ x y)) (defun 1+ (x) (+ x 1)) @@ -58,6 +57,7 @@ (defcomparison >) (defcomparison >=) +(defcomparison =) (defcomparison <) (defcomparison <=) -- 1.7.10.4