X-Git-Url: https://git.distorted.org.uk/~mdw/lisp/blobdiff_plain/5a64d91b912d7794a9aa56ac781d04029a94a405..48232c30457dba5a27e8d9ee6b49d18e224568e5:/optparse-test diff --git a/optparse-test b/optparse-test index cd1c4f9..da1028d 100755 --- a/optparse-test +++ b/optparse-test @@ -1,16 +1,12 @@ -#! /usr/local/bin/runlisp +#! /bin/sh +#| +exec cl-launch -s mdw -i "(load \"$0\")" -- "$0" "$@" || exit 1 +|# (cl:defpackage #:optparse-test - (:use #:common-lisp)) + (:use #:common-lisp #:optparse)) (cl:in-package #:optparse-test) -(let ((*compile-verbose* nil) - (*load-verbose* nil)) - (asdf:oos 'asdf:load-op "mdw" :verbose nil)) -(handler-case - (use-package '#:optparse) - (error (c) (invoke-debugger c))) - (defvar opt-bool nil) (defvar opt-int nil) (defvar opt-list nil)