File: header.re

package info (click to toggle)
re2c 4.4-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 51,512 kB
  • sloc: cpp: 34,160; ml: 8,494; sh: 5,311; makefile: 1,014; haskell: 611; python: 431; ansic: 234; javascript: 113
file content (37 lines) | stat: -rw-r--r-- 869 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
// re2d $INPUT -o $OUTPUT -i --header lexer/state.d
module main;

import core.stdc.stddef;
import lexer.state; // the module is generated by re2c

/*!header:re2c:on*/
module lexer.state;

struct LexerState {
    const(char)* str, yycursor;
    /*!stags:re2c format = "const(char)* @@;"; */
};
/*!header:re2c:off*/

private long lex(ref LexerState yyrecord) {
    const(char)* t;
    /*!re2c
        re2c:api = record;
        re2c:YYCTYPE = "char";
        re2c:tags = 1;
        re2c:yyfill:enable = 0;
        re2c:header = "lexer/state.d";

        [a]* @t [b]* { return t - yyrecord.str; }
    */
}

void main() {
    const(char)* s = "ab";
    LexerState st = {s, s /*!stags:re2c format = ", null"; */};
    assert(lex(st) == 1);

    const(char)* s2 = "aaabbbbbbbb";
    LexerState st2 = {s2, s2 /*!stags:re2c format = ", null"; */};
    assert(lex(st2) == 3);
}