Arto's Notes re: Common Lisp

Scripting with Common Lisp

Shebang lines only work with CLISP, ECL, GCL, and SBCL. The more general solution is to create a simple two-line wrapper shell script, as follows (for SBCL, in this example):

exec sbcl --script $0.lisp

For example, if the Lisp program is named hello.lisp, the wrapper script would be accordingly named hello and would have its executable bit set.

The exec line should be adjusted for an available ANSI Common Lisp implementation per the following reference guidelines:

# Armed Bear Common Lisp (ABCL)
# section 2.1
abcl --noinform --noinit --batch --load $0.lisp

# Clozure CL (CCL)
ccl64 --no-init --terminal-encoding utf-8 --load $0.lisp --eval '(ccl:quit)'

clisp -norc -ansi $0.lisp

# CMU Common Lisp (CMUCL)
cmucl -quiet -noinit -load $0.lisp -eval '(unix:unix-exit)'

# Embeddable Common Lisp (ECL)
ecl -q -norc -shell $0.lisp

# GNU Common Lisp (GCL)
gcl -f $0.lisp

# ManKai Common Lisp (MKCL)
mkcl -q -norc -shell $0.lisp

# Steel Bank Common Lisp (SBCL)
sbcl --script $0.lisp

The preceding can be generalized into the following wrapper shell script that works with all open-source Common Lisp implementations of note, and in addition supports the CL-LAUNCH utility if available:

# Common Lisp wrapper by Arto Bendiken <>
# This is free and unencumbered software released into the public domain.
case `basename $CL` in
  (cl|cl-launch*) exec $CL --file $0.lisp ;;
  (abcl)  exec $CL --noinform --noinit --batch --load $0.lisp ;;
  (ccl*)  exec $CL --no-init --terminal-encoding utf-8 --load $0.lisp --eval '(ccl:quit)' ;;
  (clisp) exec $CL -norc -ansi $0.lisp ;;
  (cmucl) exec $CL -quiet -noinit -load $0.lisp -eval '(unix:unix-exit)' ;;
  (ecl)   exec $CL -q -norc -shell $0.lisp ;;
  (gcl)   exec $CL -f $0.lisp ;;
  (mkcl)  exec $CL -q -norc -shell $0.lisp ;;
  (sbcl)  exec $CL --script $0.lisp ;;
  (*)     echo "Sorry, '$CL' is not yet supported. Patches welcome"'!' >&2; exit 99 ;;

Feature Conditionals for Implementations

#+abcl    ; Armed Bear Common Lisp (ABCL)
#+ccl     ; Clozure CL (CCL)
#+clisp   ; GNU CLISP
#+cmu     ; CMU Common Lisp (CMUCL)
#+ecl     ; Embeddable Common Lisp (ECL)
#+gcl     ; GNU Common Lisp (GCL)
#+mkcl    ; ManKai Common Lisp (MKCL)
#+sbcl    ; Steel Bank Common Lisp (SBCL)
#+xcl     ; XCL

Project Directory Structure

├── .gitignore
├── README -> README.rst
├── README.rst
├── TODO
├── bin
├── cl-foo.asd
├── doc
│   ├──
│   ├── examples
│   │   └── .gitkeep
│   └── manual
│       └── .gitkeep
├── etc
│   ├── aclocal
│   │   └── .gitkeep
│   └── macports
│       └── .gitkeep
├── lib
├── src
│   ├──
│   └── package.lisp
└── test
    ├── .gitignore
    ├── cl-foo-test.asd
    └── package.lisp