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 bf66a8a0..5d1d5771 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -621,7 +621,7 @@ listTruncate(l,n) == lassocShift(x,l) == y:= l while cons? y repeat - EQUAL(x,first first y) => return (result := first y) + x = first first y => return (result := first y) y:= rest y result => if not EQ(y,l) then |