Ignore:
Timestamp:
Aug 9, 2010, 6:07:38 PM (9 years ago)
Author:
rme
Message:

In ensure-tests, show the output from run-program invocations.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/lib/compile-ccl.lisp

    r14119 r14161  
    785785      (when update
    786786        (cwd "ccl:tests;")
    787         (run-program *svn-program* '("update")))
     787        (run-program *svn-program* '("update") :output t))
    788788      (let* ((repo (svn-repository))
    789789             (url (format nil "~a/trunk/tests" repo))
     
    805805                       (get-output-stream-string s))))))))
    806806    (cwd "ccl:tests;ansi-tests;")
    807     (run-program "make" '("-k" "clean"))
     807    (run-program "make" '("-k" "clean") :output t)
    808808    (map nil 'delete-file (directory "*.*fsl"))
    809809    ;; Muffle the typecase "clause ignored" warnings, since there is really nothing we can do about
Note: See TracChangeset for help on using the changeset viewer.