Add support for fixnums.

1 files changed, 1 insertions, 1 deletions

diff --git a/util.lisp b/util.lisp
index 62d9e79..af3cec0 100644
--- a/util.lisp
+++ b/util.lisp
@@ -159,7 +159,7 @@
   (%append lists))
 
 (%defun* %zerop (integer)
-  (send-by-name integer "isEqual:" 0))
+  (fixnum-eq integer 0))
 
 (%defun* %= (int1 int2)
   (send-by-name int1 "isEqual:" int2))