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

tools.listener: IN: -> in:

locals-and-roots
Doug Coleman 2016-06-03 11:32:50 -07:00
parent 8025b52f2a
commit 72f88bb950
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
tools/listener/listener.factor
View File

@ -12,7 +12,7 @@ GENERIC: stream-read-quot ( stream -- quot/f )
GENERIC# prompt. 1 ( stream prompt -- )
: prompt ( -- str )
manifest get current-vocab>> [ name>> "IN: " prepend ] [ "" ] if*
manifest get current-vocab>> [ name>> "in: " prepend ] [ "" ] if*
auto-use? get [ " auto-use" append ] when ;
SYMBOL: prompt-style