aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/Makefile.in2
-rw-r--r--src/interp/database.boot2
-rw-r--r--src/interp/sys-utility.boot1
3 files changed, 3 insertions, 2 deletions
diff --git a/src/interp/Makefile.in b/src/interp/Makefile.in
index 8934bad6..c751e8d3 100644
--- a/src/interp/Makefile.in
+++ b/src/interp/Makefile.in
@@ -243,7 +243,7 @@ ${SAVESYS}: database.date \
$(DRIVER) --execpath=$(BOOTSYS) \
--syslib=$(axiom_target_libdir) \
--system="$(AXIOM)/" --system-algebra \
- --sysalg="$(axiom_src_datadir)/algebra/" \
+ --sysdb="$(axiom_src_datadir)/algebra/" \
--prologue="(pushnew :open-axiom-basic-system *features*)" \
--make --output=$@ --main="BOOT::|systemMain|" \
--load-directory=. $(OBJS) makeint.$(LNKEXT)
diff --git a/src/interp/database.boot b/src/interp/database.boot
index cf823270..3e4077a9 100644
--- a/src/interp/database.boot
+++ b/src/interp/database.boot
@@ -46,7 +46,7 @@ $globalExposureGroupAlist := []
--%
pathToDatabase name ==
- if dbdir := systemAlgebraDirectory() then
+ if dbdir := systemDatabaseDirectory() then
path := strconc(dbdir,name)
if $verbose then
FORMAT(true,'" Using local database ~a..",path)
diff --git a/src/interp/sys-utility.boot b/src/interp/sys-utility.boot
index 499739b5..ec35299a 100644
--- a/src/interp/sys-utility.boot
+++ b/src/interp/sys-utility.boot
@@ -227,6 +227,7 @@ checkMkdir path ==
++ return the pathname to the system module designated by `m'.
getSystemModulePath m ==
+ d := systemAlgebraDirectory() => strconc(d,m,'".",$faslType)
strconc(systemRootDirectory(),'"algebra/",m,'".",$faslType)
++ load module in `path' that supposedly will define the function