lookup-escape ( char -- ast )

Vocabulary

regexp.parser

Inputs

char

an object

Outputs

ast

an object

Definition

USING: combinators regexp.ast regexp.classes ;

IN: regexp.parser

: lookup-escape ( char -- ast )
    {
        { 97 [ 7 ] }
        { 101 [ 27 ] }
        { 102 [ 12 ] }
        { 110 [ 10 ] }
        { 114 [ 13 ] }
        { 116 [ 9 ] }
        { 118 [ 11 ] }
        { 48 [ 0 ] }
        { 119 [ c-identifier-class <primitive-class> ] }
        {
            87
            [ c-identifier-class <primitive-class> <not-class> ]
        }
        { 115 [ java-blank-class <primitive-class> ] }
        {
            83
            [ java-blank-class <primitive-class> <not-class> ]
        }
        { 100 [ digit-class <primitive-class> ] }
        { 68 [ digit-class <primitive-class> <not-class> ] }
        { 122 [ end-of-input <tagged-epsilon> ] }
        { 90 [ end-of-file <tagged-epsilon> ] }
        { 65 [ beginning-of-input <tagged-epsilon> ] }
        { 98 [ word-break <tagged-epsilon> ] }
        { 66 [ word-break <not-class> <tagged-epsilon> ] }
        [ ]
    } case ;