use uiop to (portably) get argv instead of something sbcl-specific
This commit is contained in:
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
|
||||||
|
Loading…
Reference in New Issue
Block a user