#!/bin/sh
usage()
{
  printf 'usage: %s [file.lisp]\n' $0
  exit 1
}

sed -E '/^\(defun |\(defmacro /{
 i\

}' "$@" | \
sed '/^[ \t]*$/{
   N
   /^[ \t]*\n$/D
}'