about summary refs log tree commit diff
path: root/fun/wcl/wc.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'fun/wcl/wc.lisp')
-rw-r--r--fun/wcl/wc.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/fun/wcl/wc.lisp b/fun/wcl/wc.lisp
index 81576d41aa4c..83c7e8c4f1cc 100644
--- a/fun/wcl/wc.lisp
+++ b/fun/wcl/wc.lisp
@@ -5,7 +5,7 @@
 (declaim (optimize (speed 3) (safety 0)))
 
 (defun main ()
-  (let ((filename (cadr sb-ext:*posix-argv*))
+  (let ((filename (cadr (opts:argv)))
         (space (char-code #\Space))
         (newline (char-code #\Newline)))
     (with-open-file (file-stream filename :element-type '(unsigned-byte 8))