14 lines
278 B
Bash
Executable File
14 lines
278 B
Bash
Executable File
#!/usr/bin/env bash
|
|
|
|
set -euo pipefail
|
|
|
|
LISP=$1
|
|
NAME=$(basename "$LISP" .lisp)
|
|
OUT="$NAME.1"
|
|
shift
|
|
|
|
sbcl --load "$LISP" \
|
|
--eval "(with-open-file (f \"$OUT\" :direction :output :if-exists :supersede)
|
|
(adopt:print-manual $NAME:*ui* :stream f))" \
|
|
--quit
|