File: 01_basic_d.re

package info (click to toggle)
re2c 4.1-1
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 50,052 kB
  • sloc: cpp: 32,477; ml: 8,279; sh: 5,265; makefile: 968; haskell: 612; python: 428; ansic: 227; javascript: 111; java: 3
file content (25 lines) | stat: -rw-r--r-- 568 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
 
// re2d $INPUT -o $OUTPUT -d
module main;

import core.stdc.stdio;

bool lex(const char *s) {
    size_t cursor;
    /*!re2c
        re2c:api = custom;
        re2c:define:YYCTYPE = char;
        re2c:define:YYPEEK = "s[cursor]";
        re2c:define:YYSKIP = "++cursor;";
        re2c:define:YYDEBUG =
            "debug{printf(\"lex1: char '%c' at state %u\\n\", @@{char}, @@{state});}";
        re2c:yyfill:enable = 0;

        number = [1-9][0-9]*;
        number { return true; }
        *      { return false; }
    */
}

void main() {
    assert(lex("1234"));
}