prepare-capture-target ( target -- target' )

Vocabulary

regexp.captures.private

Inputs

target

an object

Outputs

target'

an object

Definition

USING: accessors kernel regexp.classes ;

IN: regexp.captures.private

: prepare-capture-target ( target -- target' )
    dup condition? [
        [ question>> capture-question>quot ]
        [ yes>> prepare-capture-target ]
        [ no>> prepare-capture-target ] tri capture-branch boa
    ] when ;