Move words from compiler.errors.private to compiler.errors
parent
77b77d6414
commit
e6218fdc71
|
@ -1,6 +1,6 @@
|
||||||
IN: compiler.errors
|
IN: compiler.errors
|
||||||
USING: help.markup help.syntax vocabs.loader words io
|
USING: help.markup help.syntax vocabs.loader words io
|
||||||
quotations compiler.errors.private ;
|
quotations ;
|
||||||
|
|
||||||
ARTICLE: "compiler-errors" "Compiler warnings and errors"
|
ARTICLE: "compiler-errors" "Compiler warnings and errors"
|
||||||
"The compiler saves various notifications in a global variable:"
|
"The compiler saves various notifications in a global variable:"
|
||||||
|
|
|
@ -14,8 +14,6 @@ M: object compiler-error-type drop +error+ ;
|
||||||
|
|
||||||
GENERIC# compiler-error. 1 ( error word -- )
|
GENERIC# compiler-error. 1 ( error word -- )
|
||||||
|
|
||||||
<PRIVATE
|
|
||||||
|
|
||||||
SYMBOL: compiler-errors
|
SYMBOL: compiler-errors
|
||||||
|
|
||||||
SYMBOL: with-compiler-errors?
|
SYMBOL: with-compiler-errors?
|
||||||
|
@ -47,8 +45,6 @@ SYMBOL: with-compiler-errors?
|
||||||
"semantic warnings" +warning+ "warnings" (compiler-report)
|
"semantic warnings" +warning+ "warnings" (compiler-report)
|
||||||
"linkage errors" +linkage+ "linkage" (compiler-report) ;
|
"linkage errors" +linkage+ "linkage" (compiler-report) ;
|
||||||
|
|
||||||
PRIVATE>
|
|
||||||
|
|
||||||
: :errors ( -- ) +error+ compiler-errors. ;
|
: :errors ( -- ) +error+ compiler-errors. ;
|
||||||
|
|
||||||
: :warnings ( -- ) +warning+ compiler-errors. ;
|
: :warnings ( -- ) +warning+ compiler-errors. ;
|
||||||
|
|
Loading…
Reference in New Issue