tests/examplefiles/grammar-test.p6


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

token pod_formatting_code {
    $<code>=<[A..Z]>
    '<' { $*POD_IN_FORMATTINGCODE := 1 }
    $<content>=[ <!before '>'> <pod_string_character> ]+
    '>' { $*POD_IN_FORMATTINGCODE := 0 }
}

token pod_string {
    <pod_string_character>+
}

token something:sym«<» {
    <!>
}

token name {
    <!>
}

token comment:sym<#> {
   '#' {} \N*
}