hg.stevelosh.com > dotfiles

lisp/build-manual @ 411d31e2360b 

Make the computer do the busywork
author Steve Losh <steve@stevelosh.com>
date Wed, 02 Sep 2020 11:45:44 -0400
parents 3e8af1c65b8c
children (none) 
#!/usr/bin/env bash

set -euo pipefail

LISP=$1
NAME=$(basename "$LISP" .lisp)
OUT="$NAME.1"
shift

sbcl --disable-debugger --load "$LISP" --eval "(with-open-file (f \"$OUT\" :direction :output :if-exists :supersede) (adopt:print-manual $NAME:*ui* :stream f))" --quit "$@"