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

listener: print version-info in command-line.

db4
John Benediktsson 2014-11-13 09:58:37 -08:00
parent 64b88158bd
commit 74eecb78f9
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
basis/listener/listener.factor
View File

@ -4,7 +4,7 @@ USING: accessors colors colors.constants
combinators.short-circuit compiler.units continuations debugger combinators.short-circuit compiler.units continuations debugger
fry io io.styles kernel lexer locals math math.parser namespaces fry io io.styles kernel lexer locals math math.parser namespaces
parser parser.notes prettyprint sequences sets parser parser.notes prettyprint sequences sets
source-files.errors vocabs vocabs.loader vocabs.parser ; source-files.errors system vocabs vocabs.loader vocabs.parser ;
IN: listener IN: listener
GENERIC: stream-read-quot ( stream -- quot/f ) GENERIC: stream-read-quot ( stream -- quot/f )
@ -211,4 +211,7 @@ SYMBOL: interactive-vocabs
: listener ( -- ) : listener ( -- )
[ [ { } (listener) ] with-return ] with-interactive-vocabs ; [ [ { } (listener) ] with-return ] with-interactive-vocabs ;
MAIN: listener : listener-main ( -- )
version-info print flush listener ;
MAIN: listener-main