diff options
Diffstat (limited to 'src/interp/clam.boot')
-rw-r--r-- | src/interp/clam.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/clam.boot b/src/interp/clam.boot index 863b255c..a0414464 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -611,7 +611,7 @@ hputNewProp(ht,op,argList,val) == listTruncate(l,n) == u:= l n:= QSSUB1 n - while NEQ(n,0) and null atom u repeat + while n ^= 0 and null atom u repeat n:= QSSUB1 n u:= QCDR u if null atom u then |