aboutsummaryrefslogtreecommitdiff
path: root/src/interp/cparse.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/cparse.boot')
-rw-r--r--src/interp/cparse.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/cparse.boot b/src/interp/cparse.boot
index eaa43873..8960fbb0 100644
--- a/src/interp/cparse.boot
+++ b/src/interp/cparse.boot
@@ -1106,9 +1106,9 @@ _/RQ_,LIB(:x) ==
_/RF_-1 x ==
ifile := makeInputFilename $editFile
lfile := nil
- type := PATHNAME_-TYPE ifile
+ type := filePathType ifile
type = '"boot" =>
- lfile := MAKE_-PATHNAME(type <- '"lisp",defaults <- ifile)
+ lfile := makeFilePath(type <- '"lisp",defaults <- ifile)
BOOT(ifile,lfile)
LOAD lfile
type = '"lisp" => LOAD ifile