use uiop to (portably) get argv instead of something sbcl-specific

This commit is contained in:
Moonchild 2020-10-04 17:11:00 -07:00
parent 1467133c5d
commit 28c5385531

@ -29,7 +29,7 @@
(if target (if target
(build target) (build target)
(format t "No target named '~a'.~%" target-name)))) (format t "No target named '~a'.~%" target-name))))
(or (cdr sb-ext:*posix-argv*) '("default"))) (or (uiop:command-line-arguments) '("default")))
(with-open-file (fp "fancy.buildcache" (with-open-file (fp "fancy.buildcache"
:direction :output :direction :output