X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/7f853a8ae70d1f8c922db2840194aa0afbbe4f79..d0754e55e97e5ae7c47a667a8580ca021174918d:/optparse-test?ds=sidebyside diff --git a/optparse-test b/optparse-test index 4441483..cd1c4f9 100755 --- a/optparse-test +++ b/optparse-test @@ -1,5 +1,9 @@ #! /usr/local/bin/runlisp +(cl:defpackage #:optparse-test + (:use #:common-lisp)) +(cl:in-package #:optparse-test) + (let ((*compile-verbose* nil) (*load-verbose* nil)) (asdf:oos 'asdf:load-op "mdw" :verbose nil)) @@ -87,7 +91,4 @@ (format t "keyword: ~S~%" opt-keyword) (format t "enum: ~S~%" opt-enum) (format t "object: ~S~%" opt-object)) -(test (cdr *command-line-strings*)) - - - +(test (cdr *command-line*))