fail-state-recurses ( transitions -- new-transitions )


Vocabulary
regexp.negation

Inputs
transitionsan object


Outputs
new-transitionsan object


Definition
USING: assocs hashtables kernel ;

IN: regexp.negation

: fail-state-recurses ( transitions -- new-transitions )
clone dup [ fail-state t associate fail-state ] dip set-at ;