cd "$(basename $0)"
 
 sbcl --no-userinit \
   --eval '(require :asdf)' \
   --eval '(push (truename ".") asdf:*central-registry*)' \
   --load /home/edwlan/quicklisp/setup.lisp \
   --eval '(ql:quickload :'$(basename $PWD)')' \
   --eval '(vector-update-stream::test)' \
   --quit