breakpoint-after ( word n -- )
Factor handbook » UI developer tools » UI walker » Setting breakpoints

Prev:	breakpoint-if ( word quot: ( ... -- ... ? ) -- )
Next:	break ( -- )

Vocabulary
tools.walker

Inputs

word	a word
n	a number

Outputs
None

Word description
Annotates a word definition to enter the single stepper after the word has been called n times. Use reset to clear.

Examples
Break after calling sq 3 times:

USE: tools.walker \ sq 3 breakpoint-after

Definition

USING: arrays kernel math sequences sequences.private
tools.annotations tools.continuations ;

IN: tools.walker

: breakpoint-after ( word n -- )
    0 1array swap [
        [ [ 0 ] ] dip [ [ 1 + dup ] change-nth-unsafe ] curry
        compose
    ] dip [ >= [ break ] when ] curry compose [ prepend ] curry
    annotate ;