[cmucl/cmucl][rtoy-unix-core] 2 commits: Load up the unix fasl file using compile-file-pathname.

[Raymond Toy]

Raymond Toy pushed to branch rtoy-unix-core at cmucl / cmucl


Commits:
eb4a83b4 by Raymond Toy at 2015-05-10T14:16:20Z
Load up the unix fasl file using compile-file-pathname.

- - - - -
1f888009 by Raymond Toy at 2015-05-10T14:23:23Z
Remove set -x that was accidentally left in.

- - - - -


2 changed files:

- bin/make-main-dist.sh
- src/contrib/load-unix.lisp


Changes:

=====================================
bin/make-main-dist.sh
=====================================
--- a/bin/make-main-dist.sh
+++ b/bin/make-main-dist.sh
@@ -133,7 +133,6 @@ do
     install -d ${GROUP} ${OWNER} -m 0755 $DESTDIR/lib/cmucl/lib/contrib/$f
 done
 
-set -x
 case `uname -s` in
   Linux*) UCONTRIB="unix-glibc2" ;;
   *) UCONTRIB="unix" ;;


=====================================
src/contrib/load-unix.lisp
=====================================
--- a/src/contrib/load-unix.lisp
+++ b/src/contrib/load-unix.lisp
@@ -1,7 +1,7 @@
 ;; Load extra functionality in the UNIX package.
 
 (ext:without-package-locks
-  (load #-linux "modules:unix/unix"
-	#+linux "modules:unix/unix-glibc2"))
+  (load (compile-file-pathname #-linux "modules:unix/unix"
+			       #+linux "modules:unix/unix-glibc2")))
 
 (provide 'unix)



View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/compare/f5368940188bb555a18438953a101becb3524856...1f88800937998c86076d858157298a190c0c54c0
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cmucl-cvs/attachments/20150510/9dd2ddba/attachment-0001.html>