Porting stuff.

[lisp] / optparse-test

diff --git a/optparse-test b/optparse-test
index 1d76566..83662c2 100755 (executable)
--- a/optparse-test
+++ b/optparse-test
@@ -3,7 +3,9 @@
 (let ((*compile-verbose* nil)
       (*load-verbose* nil))
   (asdf:oos 'asdf:load-op "mdw" :verbose nil))
-(use-package '#:optparse)
+(handler-case
+    (use-package '#:optparse)
+  (error (c) (invoke-debugger c)))
 
 (defvar opt-bool nil)
 (defvar opt-int nil)