Commit | Line | Data |
---|---|---|
1 | #! /bin/sh | |
2 | ":"; exec cl-launch -X -l "sbcl clisp cmucl ecl" -s asdf -- "$0" "$0" "$@" || exit 1 # -*-lisp-*- | |
3 | ||
4 | (handler-bind ((warning (lambda (cond) | |
5 | (declare (ignore cond)) | |
6 | (invoke-restart 'muffle-warning)))) | |
7 | (asdf:operate 'asdf:load-op "sod")) | |
8 | ||
9 | (funcall (intern "MAIN" (find-package "SOD"))) |