diff options
Diffstat (limited to 'dev-lisp/sbcl/files/0.8.7/install-clc.lisp-gentoo.patch')
-rw-r--r-- | dev-lisp/sbcl/files/0.8.7/install-clc.lisp-gentoo.patch | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/dev-lisp/sbcl/files/0.8.7/install-clc.lisp-gentoo.patch b/dev-lisp/sbcl/files/0.8.7/install-clc.lisp-gentoo.patch new file mode 100644 index 000000000000..6b4105eb6016 --- /dev/null +++ b/dev-lisp/sbcl/files/0.8.7/install-clc.lisp-gentoo.patch @@ -0,0 +1,22 @@ +--- sbcl-0.8.7/debian/install-clc.lisp.original 2004-01-15 10:50:15.000000000 -0600 ++++ sbcl-0.8.7/debian/install-clc.lisp 2004-01-15 10:51:39.346695144 -0600 +@@ -18,7 +18,9 @@ + (format t "~%Error during init of common-lisp-controller~%") + (sb-unix:unix-exit 1)) + +-(defun common-lisp-controller:send-clc-command (command package) ++(in-package :common-lisp-controller) ++ ++(defun send-clc-command (command package) + (let ((process + (sb-ext:run-program "/usr/bin/clc-send-command" + (list +@@ -38,6 +40,8 @@ + package + "sbcl")))) + ++(in-package :common-lisp-user) ++ + (ignore-errors + (format t "~%Saving to sbcl-new.core...") + (sb-ext:gc :full t) |