sys-base: Fix support for CL-LAUNCH.

[lisp] / optparse-test

diff --git a/optparse-test b/optparse-test
index 4f3ad5f95081bcd02b029cc0be23efcd8ab0c02f..cd1c4f9d5a3aaf324fd34aeeee5314d8caa7b254 100755 (executable)
--- a/optparse-test
+++ b/optparse-test
@@ -91,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*))