aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi2.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/wi2.boot')
-rw-r--r--src/interp/wi2.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi2.boot b/src/interp/wi2.boot
index eb0e2370..6641599a 100644
--- a/src/interp/wi2.boot
+++ b/src/interp/wi2.boot
@@ -833,7 +833,7 @@ smallIntegerStep(it,index,start,inc,optFinal,e) ==
null (inc':= comp(inc,$SmallInteger,start'.env)) => nil
if optFinal is [final] and not (final':= comp(final,$SmallInteger,inc'.env)) then
-- not (FIXP startNum and FIXP incNum) => return nil
--- null FIXP startNum or ABSVAL startNum > 100 => return nil
+-- null FIXP startNum or abs startNum > 100 => return nil
-----> assume that optFinal is $SmallInteger
T := comp(final,$EmptyMode,inc'.env) or return nil
final' := T