dfa>main-word ( dfa -- word )


Vocabulary
regexp.compiler.private

Inputs
dfaan object


Outputs
wordan object


Definition
USING: accessors kernel ;

IN: regexp.compiler.private

: dfa>main-word ( dfa -- word )
states>words [ states>code ] keep start-state>> ;