From e754f97a6955b705b422e3cfa50274560d746d65 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 21 Apr 2008 15:49:44 +0000 Subject: Fix thinko --- src/interp/sys-macros.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/interp/sys-macros.lisp b/src/interp/sys-macros.lisp index c74ada28..8d620a5b 100644 --- a/src/interp/sys-macros.lisp +++ b/src/interp/sys-macros.lisp @@ -63,10 +63,10 @@ ;; (defmacro |byteLessThan| (|x| |y|) - `(< (the fixnum x) (the fixnum y))) + `(< (the fixnum ,|x|) (the fixnum ,|y|))) (defmacro |byteGreaterEqual| (|x| |y|) - `(>= (the fixnum x) (the fixnum y))) + `(>= (the fixnum ,|x|) (the fixnum ,|y|))) ;; ;; -*- BigFloat Constructors -*- -- cgit v1.2.3