diff --git a/lisp/build-ros.lisp b/lisp/build-ros.lisp index 525a54f..2919f2f 100644 --- a/lisp/build-ros.lisp +++ b/lisp/build-ros.lisp @@ -20,7 +20,8 @@ for line = (read-line in) when (ignore-errors (string= line "exec" :end1 4)) do (setf opts (parse-argv line)))) - (roswell:roswell `(,opts "-L" ,(or (ros:opt "*lisp") - (ros:opt "default.lisp")) - "dump" ,@(rest argv) "executable" ,(first argv)) + (roswell:roswell `(,@(when (roswell:verbose) '("-v")) + ,opts "-L" ,(or (ros:opt "*lisp") + (ros:opt "default.lisp")) + "dump" ,@(rest argv) "executable" ,(first argv)) :interactive nil)))