blob: f62f191911bbd629b50ec2a4ad061674a891bef6 (
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
|
/*
$echo FILE: TS_la9.lex
$echo Purpose: test la expr" 'a + b + c + d - a + b'"
$echo Okay
*/
fsm
(fsm-id "TS_la9.lex",fsm-filename TS_la9,fsm-namespace NS_TS_la9
,fsm-class CTS_la9
,fsm-version "1.0" ,fsm-date "17 Juin 2003",fsm-debug "true"
,fsm-comments "end-of-line recognizer")
parallel-parser
(
parallel-thread-function
TH_TS_la9
***
parallel-la-boundary
a + b + c + d - a + b
***
)
@"/usr/local/yacco2/compiler/grammars/yacco2_T_includes.T"
/@
@** Rules.\fbreak
@/
rules{
Reol AD AB(){
-> Rdelimiters
}
Rdelimiters AD AB()
{
-> "x0a"
-> "x0d" |.|
-> "x0d" "x0a"
}
}// end of rules
|
