aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/symbol.spad.pamphlet
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/symbol.spad.pamphlet')
-rw-r--r--src/algebra/symbol.spad.pamphlet4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/symbol.spad.pamphlet b/src/algebra/symbol.spad.pamphlet
index 6287037b..3a64cc7b 100644
--- a/src/algebra/symbol.spad.pamphlet
+++ b/src/algebra/symbol.spad.pamphlet
@@ -159,7 +159,7 @@ Symbol(): Exports == Implementation where
ns: List Integer := [#sc.presub, #sc.presup, #sc.sup, #sc.sub]
while #ns >= 2 and zero? first ns repeat ns := rest ns
concat concat(concat(hd, istring(#sc.args)),
- [istring n for n in reverse_! ns])
+ [istring n for n in reverse! ns])
syscripts sc ==
all := sc.presub
@@ -272,7 +272,7 @@ Symbol(): Exports == Implementation where
resetNew() ==
count() := 0
- for k in keys xcount repeat remove_!(k, xcount)
+ for k in keys xcount repeat remove!(k, xcount)
void
scripted? sy ==