One still needs two `^D's before it quits, but that's much better than
20.
;; Obtain ASDF from somewhere.
(require "asdf")
;; Obtain ASDF from somewhere.
(require "asdf")
+;; Get CMU CL to quit on EOF.
+#+cmu
+(setf ext:*batch-mode* t)
+
;; Tell SBCL where to find its source source.
#+sbcl
(sb-ext:set-sbcl-source-location #p"/usr/share/sbcl-source/")
;; Tell SBCL where to find its source source.
#+sbcl
(sb-ext:set-sbcl-source-location #p"/usr/share/sbcl-source/")