aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/kl.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/kl.spad.pamphlet')
-rw-r--r--src/algebra/kl.spad.pamphlet8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/algebra/kl.spad.pamphlet b/src/algebra/kl.spad.pamphlet
index 6dfa0358..28c7951f 100644
--- a/src/algebra/kl.spad.pamphlet
+++ b/src/algebra/kl.spad.pamphlet
@@ -67,13 +67,13 @@ SortedCache(S:CachableSet): Exports == Implementation where
cache() == deref cach
shiftCache(l, n) ==
- for x in l repeat setPosition(x, n + position x)
- void()
+ for x in l repeat
+ setPosition(x, n + position x)
clearCache() ==
- for x in cache() repeat setPosition(x, 0)
+ for x in cache() repeat
+ setPosition(x, 0)
setref(cach,nil$List(S))
- void()
enterInCache(x:S, equal?:S -> Boolean) ==
scan := cache()