summaryrefslogtreecommitdiff
path: root/web/yacco2/qa/rule4.dat
blob: 28f39234f1b8d1a1c475d2feeb8c05c002b1a72c (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
/*
$echo file: rule4.dat
$echo test: bad sub rule: missing ->
$echo Error
*/
fsm (fsm-id    "lr1_br1.lex",fsm-filename lr1_br1,fsm-namespace NS_lr1_br1
    ,fsm-class  Clr1_br1_rul_fsm
    ,fsm-version "1.0",fsm-date "8-oct-96"
    ,fsm-debug "true",fsm-comments "test out lr1")
@"/yacco2/compiler/grammars/yacco2_T_includes.T"

rules{
Reol (){
  -> Rdelimiters 
}

Rdelimiters ()
{
 -> Rsubrule_def
}

Rsubrule_def AD AB(
parallel-control-monitor{
  arbitrator-code
  int s(0);//cccccccc
  ***
  }
){
	  -> x{
		op
		  Csubrule_def* fsm = (Csubrule_def*)abs_parser()->fsm_tbl();
		  RSVP(fsm->subrule_def_)
		***
		}
	***	
 - >
}

}// end of rules