From: Daniel B. <da...@us...> - 2003-02-07 02:11:14
|
Update of /cvsroot/sbcl/sbcl/src/runtime In directory sc8-pr-cvs1:/tmp/cvs-serv26492/src/runtime Modified Files: runtime.c Log Message: 0.7.12.24 Changes to PROVIDE/REQUIRE to make them (a) conform to ANSI, (b) any use... ... cease nonstandardly downcasing elements in *MODULES* ... add a list of *MODULE-PROVIDER-FUNCTIONS* which the user can hang functions off to make REQUIRE do whatever he wants it to do. ... its default member knows how to load files in $SBCL_ROOT/modulename/modulename First pass at a contrib infrastructure... ... change install.sh to do new and exciting things, and as a side benefit, able to install other than into /usr/local ... amend INSTALL instructions to match Two contrib modules... ... asdf here is a direct copy of the one in cclan, but despite being portable and therefore not really qualifying, will be v. useful for loading the others ... bsd-sockets (db-sockets by any other name) is a fairly low-level interface to the BSD socket API: high-level interfaces (e.g. ACL-compatible, or CLOCC PORT) could be built on top of it without getting dirty with ALIEN Index: runtime.c =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/runtime/runtime.c,v retrieving revision 1.18 retrieving revision 1.19 diff -u -d -r1.18 -r1.19 --- runtime.c 6 Feb 2003 01:27:10 -0000 1.18 +++ runtime.c 7 Feb 2003 02:11:11 -0000 1.19 @@ -271,10 +271,12 @@ core = copied_existing_filename_or_null(lookhere); free(lookhere); } else { - core = copied_existing_filename_or_null("/usr/lib/sbcl.core"); + putenv("SBCL_HOME=/usr/local/lib/sbcl/"); + core = copied_existing_filename_or_null("/usr/local/lib/sbcl/sbcl.core"); if (!core) { + putenv("SBCL_HOME=/usr/lib/sbcl/"); core = - copied_existing_filename_or_null("/usr/local/lib/sbcl.core"); + copied_existing_filename_or_null("/usr/lib/sbcl/sbcl.core"); } } if (!core) { |