From e754f97a6955b705b422e3cfa50274560d746d65 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
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(-)

(limited to 'src')

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