aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/VECTOR.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/VECTOR.lsp')
-rw-r--r--src/algebra/strap/VECTOR.lsp10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/algebra/strap/VECTOR.lsp b/src/algebra/strap/VECTOR.lsp
index 01f3fe2c..fa232c7d 100644
--- a/src/algebra/strap/VECTOR.lsp
+++ b/src/algebra/strap/VECTOR.lsp
@@ -13,7 +13,7 @@
|VECTOR;convert;$If;3|))
(DEFUN |VECTOR;vector;L$;1| (|l| $)
- (SPADCALL |l| (|getShellEntry| $ 10)))
+ (SPADCALL |l| (|shellEntry| $ 10)))
(DEFUN |VECTOR;maxIndex;$I;2| (|x| $)
(DECLARE (IGNORE $))
@@ -21,10 +21,10 @@
(DEFUN |VECTOR;convert;$If;3| (|x| $)
(SPADCALL
- (LIST (SPADCALL '|vector| (|getShellEntry| $ 15))
- (SPADCALL (SPADCALL |x| (|getShellEntry| $ 16))
- (|getShellEntry| $ 17)))
- (|getShellEntry| $ 19)))
+ (LIST (SPADCALL '|vector| (|shellEntry| $ 15))
+ (SPADCALL (SPADCALL |x| (|shellEntry| $ 16))
+ (|shellEntry| $ 17)))
+ (|shellEntry| $ 19)))
(DEFUN |Vector| (#0=#:G1383)
(DECLARE (SPECIAL |$ConstructorCache|))