aboutsummaryrefslogtreecommitdiff
path: root/src/interp/int-top.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/int-top.boot')
-rw-r--r--src/interp/int-top.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/int-top.boot b/src/interp/int-top.boot
index 2c1cb0ed..000c96fe 100644
--- a/src/interp/int-top.boot
+++ b/src/interp/int-top.boot
@@ -312,7 +312,7 @@ ncloopDQlines (dq,stream)==
streamChop(n,s)==
if StreamNull s
then [nil,nil]
- else if EQL(n,0)
+ else if n = 0
then [nil,s]
else
[a,b]:= streamChop(n-1,rest s)