diff options
-rw-r--r-- | src/ChangeLog | 6 | ||||
-rw-r--r-- | src/interp/sys-driver.boot | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index fee862aa..ee20f0e4 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,11 @@ 2011-06-22 Gabriel Dos Reis <gdr@cs.tamu.edu> + Fix ECL-based build failure. + * interp/sys-driver.boot (loadExposureGroupData): Use + getSystemModulePath to look up system modules. + +2011-06-22 Gabriel Dos Reis <gdr@cs.tamu.edu> + * boot/ast.boot (shoeEVALANDFILEACTQ): Remove. (bfMain): Don't use it. (translateToplevelExpression): Likewise. diff --git a/src/interp/sys-driver.boot b/src/interp/sys-driver.boot index 13742c4e..a2f3f245 100644 --- a/src/interp/sys-driver.boot +++ b/src/interp/sys-driver.boot @@ -101,7 +101,7 @@ systemDatabaseDirectory() == loadExposureGroupData() == LOAD('"./exposed", KEYWORD::VERBOSE,false, KEYWORD::IF_-DOES_-NOT_-EXIST,nil) => "done" - LOAD(strconc(systemRootDirectory(),'"algebra/exposed"), + LOAD(getSystemModulePath '"exposed", KEYWORD::VERBOSE,false,KEYWORD::IF_-DOES_-NOT_-EXIST,nil) => "done" "failed" |