blob: d4180c5dd41177660806ea1f9a331af30245cb6e (
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
|
/*
$echo FILE: TS_la2a.lex
$echo Purpose: test la expr producing an empty set
$echo LA expr: a + b - a - b
$echo Error --- all terms specifically added and then removed
*/
fsm
(fsm-id "TS_la2a.lex",fsm-filename TS_la2a,fsm-namespace NS_TS_la2a
,fsm-class CTS_la2
,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_la2a
***
parallel-la-boundary
a + b - a - b
***
)
@"/usr/local/yacco2/compiler/grammars/yacco2_T_includes.T"
rules{
Reol AD AB(){
-> Rdelimiters
}
Rdelimiters AD AB()
{
-> "x0a"
-> "x0d" |.|
-> "x0d" "x0a"
}
}// end of rules
|