-#! /usr/local/bin/runlisp
+#! /bin/sh
+":"; exec cl-launch -X -s mdw -- "$0" "$@" || exit 1 # -*-lisp-*-
(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)