add-fail-state ( transitions -- new-transitions )


Vocabulary
regexp.negation

Inputs
transitionsan object


Outputs
new-transitionsan object


Definition
USING: assocs ;

IN: regexp.negation

: add-fail-state ( transitions -- new-transitions )
[ add-default-transition ] assoc-map fail-state-recurses ;