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
|
#
# @LANG: ruby
#
%%{
machine test;
export c1 = 'c';
export c2 = 'z';
export c3 = 't';
commands := (
c1 . digit* '\n' @{ puts "c1"; } |
c2 . alpha* '\n' @{ puts "c2"; }|
c3 . '.'* '\n' @{ puts "c3"; }
)*;
other := any*;
}%%
%% write exports;
%% write data;
def run_machine( data )
p = 0;
pe = data.length
cs = test_en_commands
val = 0;
neg = false;
%% write init nocs;
%% write exec;
if cs >= test_first_final
puts "ACCEPT"
else
puts "FAIL"
end
end
inp = [
test_ex_c1, ?1, ?2, ?\n,
test_ex_c2, ?a, ?b, ?\n,
test_ex_c3, ?., ?., ?\n
]
run_machine( inp );
=begin _____OUTPUT_____
c1
c2
c3
ACCEPT
=end _____OUTPUT_____
|
