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

added B: (break for parsing words) and appropriate documentation

db4
rien 2011-12-10 20:59:22 -05:00
parent b3747936b9
commit 6e141b8f6e
2 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/tools/walker/walker-docs.factor
View File

@ -12,6 +12,9 @@ HELP: breakpoint-if
HELP: B HELP: B
{ $description "An alias for " { $link break } ", defined in the " { $vocab-link "syntax" } " vocabulary so that it is always available." } ; { $description "An alias for " { $link break } ", defined in the " { $vocab-link "syntax" } " vocabulary so that it is always available." } ;
HELP: B:
{ $description "A breakpoint for parsing words. When this word is executed, it copies the definition of the following parsing word, prepends a " { $link break } " to it so that it is the first word to be executed when the definition is called, and calls this new definition.\n\nWhen the walker tool opens, execution will still be inside " { $link POSTPONE: B: } ". To step out of B: and into the parsing word, do just that: jump out with O, then into with I." } ;
ARTICLE: "breakpoints" "Setting breakpoints" ARTICLE: "breakpoints" "Setting breakpoints"
"In addition to invoking the walker explicitly through the UI, it is possible to set breakpoints on words using words in the " { $vocab-link "tools.walker" } " vocabulary." "In addition to invoking the walker explicitly through the UI, it is possible to set breakpoints on words using words in the " { $vocab-link "tools.walker" } " vocabulary."
$nl $nl
@ -24,6 +27,7 @@ $nl
{ $subsections { $subsections
break break
POSTPONE: B POSTPONE: B
POSTPONE: B:
} }
"Note that because the walker calls various core library and UI words while rendering its own user interface, setting a breakpoint on a word such as " { $link append } " or " { $link + } " will hang the UI." ; "Note that because the walker calls various core library and UI words while rendering its own user interface, setting a breakpoint on a word such as " { $link append } " or " { $link + } " will hang the UI." ;

4
basis/tools/walker/walker.factor
View File

@ -168,3 +168,7 @@ SYMBOL: +stopped+
IN: syntax IN: syntax
SYNTAX: B \ break suffix! ; SYNTAX: B \ break suffix! ;
SYNTAX: B: scan-word definition
[ break "now press O I to land inside the parsing word" drop ]
prepose call( accum -- accum ) ;