steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Clean up compiler.errors

db4
Slava Pestov 2008-01-11 01:01:38 -05:00
parent 53ae4f9133
commit d2222179c6
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
core/compiler/errors/errors.factor
View File

@ -1,7 +1,7 @@
! Copyright (C) 2007, 2008 Slava Pestov. ! Copyright (C) 2007, 2008 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel namespaces assocs prettyprint io sequences USING: kernel namespaces assocs prettyprint io sequences
sorting continuations debugger math ; sorting continuations debugger math math.parser ;
IN: compiler.errors IN: compiler.errors
SYMBOL: compiler-errors SYMBOL: compiler-errors
@ -41,8 +41,9 @@ M: object compiler-warning? drop f ;
: (compiler-report) ( what assoc -- ) : (compiler-report) ( what assoc -- )
length dup zero? [ 2drop ] [ length dup zero? [ 2drop ] [
":" write over write " - print " write pprint [
" compiler " write write "." print ":" % over % " - print " % # " compiler " % % "." %
] "" make print
] if ; ] if ;
: compiler-report ( -- ) : compiler-report ( -- )