From ea69320b242425d110f3cdfdf716f1826dcd806a Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 28 Jun 2010 03:34:39 +0000 Subject: Fix a typo --- src/interp/g-util.boot | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src') diff --git a/src/interp/g-util.boot b/src/interp/g-util.boot index 284a7e98..89d2ebf4 100644 --- a/src/interp/g-util.boot +++ b/src/interp/g-util.boot @@ -228,7 +228,7 @@ expandPeq ['%peq,x,y] == ['EQ,expandToVMForm x, expandToVMForm y] expandBefore? ['%before?,x,y] == - ['GGREATER,expandToVMForm y,expandToVMForm x] + ['GGREATERP,expandToVMForm y,expandToVMForm x] -- Integer operations expandIneg ['%ineg,x] == -- cgit v1.2.3