diff options
Diffstat (limited to 'dev-lisp/sbcl/files/0.9.5/sbcl.sh')
-rw-r--r-- | dev-lisp/sbcl/files/0.9.5/sbcl.sh | 60 |
1 files changed, 0 insertions, 60 deletions
diff --git a/dev-lisp/sbcl/files/0.9.5/sbcl.sh b/dev-lisp/sbcl/files/0.9.5/sbcl.sh deleted file mode 100644 index 66253874d2a3..000000000000 --- a/dev-lisp/sbcl/files/0.9.5/sbcl.sh +++ /dev/null @@ -1,60 +0,0 @@ -#!/bin/sh - -if [ ! -f /usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp ] ; then - cat <<EOF -$0: cannot find the common-lisp-controller source. -EOF - exit 0 -fi - -build_error() -{ - echo "Build failure $1" - exit 1 -} - -case $1 in - install-clc) - echo $0 loading and dumping clc. - ( cd /usr/lib/sbcl - /usr/bin/sbcl --core /usr/lib/sbcl/sbcl-dist.core \ - --noinform --sysinit /etc/sbclrc --userinit /dev/null \ - --load "/usr/lib/sbcl/install-clc.lisp" 2> /dev/null - mv sbcl-new.core sbcl.core || (echo FAILED ; cp sbcl-dist.core sbcl.core ) ) - ;; - remove-clc) - echo $0 removing clc-enabled image - cp /usr/lib/sbcl/sbcl-dist.core /usr/lib/sbcl/sbcl.core - ;; - rebuild) - echo $0 rebuilding... - shift - echo rebuilding $1 - /usr/bin/sbcl --noinform --sysinit /etc/sbclrc --userinit /dev/null \ - --disable-debugger \ - --eval \ -"(handler-case - (progn - (asdf:operate 'asdf:compile-op (quote $1)) - (sb-unix:unix-exit 0)) - (error (e) - (ignore-errors (format t \"~&Build error: ~A~%\" e)) - (finish-output) - (sb-unix:unix-exit 1)))" || build_error - ;; - remove) - echo $0 removing packages... - shift - while [ ! -z "$1" ] ; do - rm -rf "/var/cache/common-lisp-controller/*/sbcl/${1}" - shift - done - ;; - *) - echo $0 unkown command $1 - echo known commands: rebuild, remove, install-clc, and remove-clc - exit 1 - ;; -esac - -exit 0 |