HEX
Server: Apache/2.4.6 (CentOS) OpenSSL/1.0.2k-fips PHP/7.4.30
System: Linux iZj6c1151k3ad370bosnmsZ 3.10.0-1160.76.1.el7.x86_64 #1 SMP Wed Aug 10 16:21:17 UTC 2022 x86_64
User: root (0)
PHP: 7.4.30
Disabled: NONE
Upload Files
File: //usr/share/doc/re2c-0.14.3/examples/repeater.re
#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#define RET(n) printf("%d\n", n); return n

int scan(char *s, int l){
char *p = s;
char *q;
#define YYCTYPE         char
#define YYCURSOR        p
#define YYLIMIT         (s+l)
#define YYMARKER        q
#define YYFILL(n)
/*!re2c
	'a'{1}"\n"	    {RET(1);}
	'a'{2,3}"\n"	{RET(2);}
	'a'{6}"\n"	    {RET(4);}
	'a'{4,}"\n"	    {RET(3);}
	[^aq]|"\n"      {RET(0);}
*/
}

#define do_scan(str) scan(str, strlen(str))

main()
{
	do_scan("a\n");
	do_scan("aa\n");
	do_scan("aaa\n");
	do_scan("aaaa\n");
	do_scan("q");
	do_scan("a");
	do_scan("A\n");
	do_scan("AA\n");
	do_scan("aAa\n");
	do_scan("AaaA\n");
	do_scan("Q");
	do_scan("AaaAa\n");
	do_scan("AaaAaA\n");
	do_scan("A");
	do_scan("\n");
	do_scan("0");
}