aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-util.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-07-13 15:21:36 +0000
committerdos-reis <gdr@axiomatics.org>2011-07-13 15:21:36 +0000
commit44050a23809cd331fc529cdf84063c23f6ed86dc (patch)
tree41a214d57d2adeb3a6b29300142bc3db60534697 /src/interp/br-util.boot
parentfafd79de190f215a8f1767631b4792ada11518ef (diff)
downloadopen-axiom-44050a23809cd331fc529cdf84063c23f6ed86dc.tar.gz
* boot/tokens.boot: copyString, copyTree, and copyVector are now
builtin library functions. * interp/br-util.boot: Use copyVector instead of COPY-SEQ. * interp/category.boot: Likewise. * interp/define.boot: Likewise. * interp/functor.boot: Likewise. * interp/i-coerfn.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/newfort.boot: Likewise.
Diffstat (limited to 'src/interp/br-util.boot')
-rw-r--r--src/interp/br-util.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-util.boot b/src/interp/br-util.boot
index bc22ab8d..e82f2042 100644
--- a/src/interp/br-util.boot
+++ b/src/interp/br-util.boot
@@ -102,7 +102,7 @@ capitalize s ==
("package" . "Package")
("default package" . "Default Package")))
or
- res := COPY_-SEQ s
+ res := copyString s
stringChar(res,0) := charUpcase stringChar(res,0)
res