aboutsummaryrefslogtreecommitdiff
path: root/src/interp/fortcall.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2014-11-27 01:36:14 +0000
committerdos-reis <gdr@axiomatics.org>2014-11-27 01:36:14 +0000
commit291cdbd599f6332c6f92612629f1b4cf7fb71308 (patch)
tree278c206bc2d20bf4bc433da4a80cf58b50fb0572 /src/interp/fortcall.boot
parentf4623b771b1e798d81d1cc8d2013683371061c43 (diff)
downloadopen-axiom-291cdbd599f6332c6f92612629f1b4cf7fb71308.tar.gz
Replace PATHNAME-* Lisp API with filePath* API.
Diffstat (limited to 'src/interp/fortcall.boot')
-rw-r--r--src/interp/fortcall.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/fortcall.boot b/src/interp/fortcall.boot
index f45a82c3..7ba85979 100644
--- a/src/interp/fortcall.boot
+++ b/src/interp/fortcall.boot
@@ -39,7 +39,7 @@ namespace BOOT
$nagMessages := nil
makeVector(elts, t) ==
- MAKE_-ARRAY(#elts, element_-type <- t or true, initial_-contents <- elts)
+ newVector(#elts, element_-type <- t or true, initial_-contents <- elts)
makeList(n, e) ==
MAKE_-LIST(n, initial_-element <- e)