use >>> for a marker, like the build does

svn: r11978
This commit is contained in:
Eli Barzilay 2008-10-08 16:09:45 +00:00
parent 3db02a50e1
commit 98c8abeb3b

View File

@ -50,7 +50,7 @@
(define name (cadr t))
(define stderr (current-error-port))
(define (echo fmt . args)
(fprintf stderr "*** ~a: ~a\n" name (apply format fmt args)))
(fprintf stderr ">>> ~a: ~a\n" name (apply format fmt args)))
(newline stderr)
(echo "running...")
(let/ec break