diff options
Diffstat (limited to 'fun/wcl/wc.lisp')
| -rw-r--r-- | fun/wcl/wc.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fun/wcl/wc.lisp b/fun/wcl/wc.lisp index 81576d41aa..83c7e8c4f1 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)) |