boundary-question>quot ( question -- quot )

Vocabulary

regexp.compiler.private

Inputs

question

an object

Outputs

quot

an object

Definition

USING: kernel math namespaces regexp.compiler ;

IN: regexp.compiler.private

: boundary-question>quot ( question -- quot )
    question>quot backwards? get
    [ [ [ 1 + ] dip ] prepose ] when ;