summaryrefslogtreecommitdiff
path: root/test/trans.d/case/scan1_d.rl
blob: adbcb66da46a6009bb1df7ca0ed46528b2bd8423 (plain)
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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
/*
 * @LANG: d
 * @GENERATED: true
 */

import std.stdio;
import std.string;

class scanner
{
const(char) * ts;
const(char) * te;
int act;
int token;

%%{
	machine scanner;

	# Warning: changing the patterns or the input string will affect the
	# coverage of the scanner action types.
	main := |*
		'a' => {printf( "%.*s", "on last     " );if ( p + 1 == te )
{
	printf( "%.*s", "yes" );
} 
printf( "%.*s", "\n" );};

		'b'+ => {printf( "%.*s", "on next     " );if ( p + 1 == te )
{
	printf( "%.*s", "yes" );
} 
printf( "%.*s", "\n" );};

		'c1' 'dxxx'? => {printf( "%.*s", "on lag      " );if ( p + 1 == te )
{
	printf( "%.*s", "yes" );
} 
printf( "%.*s", "\n" );};

		'd1' => {printf( "%.*s", "lm switch1  " );if ( p + 1 == te )
{
	printf( "%.*s", "yes" );
} 
printf( "%.*s", "\n" );};
		'd2' => {printf( "%.*s", "lm switch2  " );if ( p + 1 == te )
{
	printf( "%.*s", "yes" );
} 
printf( "%.*s", "\n" );};

		[d0-9]+ '.';

		'\n';
	*|;
}%%



%% write data;
int cs;
int blen;
char buffer[1024];

void init()
{
	%% write init;
}
void exec( const(char) data[] )
{
	const(char) *p = data.ptr;
	const(char) *pe = data.ptr + data.length;
	const(char) *eof = pe;
	char _s[];

	%% write exec;
}

void finish( )
{
	if ( cs >= scanner_first_final )
		writefln( "ACCEPT" );
	else
		writefln( "FAIL" );
}
static const char[][] inp = [
"abbc1d1d2\n",
];

int inplen = 1;

}
int main()
{
	scanner m = new scanner();
	int i;
	for ( i = 0; i < m.inplen; i++ ) {
		m.init();
		m.exec( m.inp[i] );
		m.finish();
	}
	return 0;
}