summaryrefslogtreecommitdiffstats
path: root/ds9/parsers/gridsendparser.tac
blob: 4f1d0dcd4ec0fceebca3c6563cce825c1a667fa1 (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
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
%{
%}
#include def.tin

#include font.tin

%start gridsend

%token AXES_
%token BORDER_
%token COLOR_
%token DASH_
%token DEF_
%token DEF1_
%token DEF2_
%token FORMAT1_
%token FORMAT2_
%token GAP_
%token GAP1_
%token GAP2_
%token GAP3_
%token GRID_
%token LABELS_
%token NUMBERS_
%token NUMERICS_
%token ORIGIN_
%token SKYFRAME_
%token SKYFORMAT_
%token STYLE_
%token SYSTEM_
%token TEXT_
%token TEXT1_
%token TEXT2_
%token TICKMARKS_
%token TITLE_
%token TYPE_
%token VERTICAL_
%token WIDTH_
%token VIEW_

%%

gridsend : {ProcessSendCmdYesNo grid view}
 | TYPE_ type
 | SYSTEM_ {ProcessSendCmdGet grid system}
 | SKYFRAME_ {ProcessSendCmdGet grid sky}
 | SKYFORMAT_ {ProcessSendCmdGet grid skyformat}
 | GRID_ grid
 | AXES_ axes
 | FORMAT1_ {ProcessSendCmdGet grid format1}
 | FORMAT2_ {ProcessSendCmdGet grid format2}
 | TICKMARKS_ tickmarks
 | BORDER_ border
 | NUMERICS_ numerics
 | TITLE_ title
 | LABELS_ labels
# backward compatibility
 | VIEW_ view
 ;

type : {ProcessSendCmdGet grid type}
# backward compatibility
 | AXES_ {ProcessSendCmdGet grid axis,type}
# backward compatibility
 | NUMERICS_ {ProcessSendCmdGet grid numlab,type}
 ;

grid : {ProcessSendCmdYesNo grid grid}
 | COLOR_ {ProcessSendCmdGet grid grid,color}
 | WIDTH_ {ProcessSendCmdGet grid grid,width}
 | DASH_ {ProcessSendCmdYesNo grid grid,style}
 | STYLE_ {ProcessSendCmdGet grid grid,style}
 | GAP1_ {ProcessSendCmdGet grid grid,gap1}
 | GAP2_ {ProcessSendCmdGet grid grid,gap2}
 | GAP3_ {ProcessSendCmdGet grid grid,gap3}
 ;

axes: {ProcessSendCmdYesNo grid axes}
 | COLOR_ {ProcessSendCmdGet grid axes,color}
 | WIDTH_ {ProcessSendCmdGet grid axes,width}
 | DASH_ {ProcessSendCmdYesNo grid axes,style}
# backward compatibility
 | STYLE_ {ProcessSendCmdGet grid axes,style}
 | TYPE_ {ProcessSendCmdGet grid axes,type}
 | ORIGIN_ {ProcessSendCmdGet grid axes,origin}
 ;

tickmarks : {ProcessSendCmdYesNo grid tick}
 | COLOR_ {ProcessSendCmdGet grid tick,color}
 | WIDTH_ {ProcessSendCmdGet grid tick,width}
 | DASH_ {ProcessSendCmdYesNo grid tick,style}
# backward compatibility
 | STYLE_ {ProcessSendCmdGet grid tick,style}
 ;

border : {ProcessSendCmdYesNo grid border}
 | COLOR_ {ProcessSendCmdGet grid border,color}
 | WIDTH_ {ProcessSendCmdGet grid border,width}
 | DASH_ {ProcessSendCmdYesNo grid border,style}
# backward compatibility
 | STYLE_ {ProcessSendCmdGet grid border,style}
 ;

numerics : {ProcessSendCmdYesNo grid numlab}
 | FONT_ {ProcessSendCmdGet grid numlab,font}
 | FONTSIZE_ {ProcessSendCmdGet grid numlab,size}
 | FONTWEIGHT_ {ProcessSendCmdGet grid numlab,weight}
 | FONTSLANT_ {ProcessSendCmdGet grid numlab,slant}
# backward compatibility
 | FONTSTYLE_ {ProcessSendCmdGet grid numlab,weight}
 | COLOR_ {ProcessSendCmdGet grid numlab,color}
 | GAP1_ {ProcessSendCmdGet grid numlab,gap1}
 | GAP2_ {ProcessSendCmdGet grid numlab,gap2}
 | GAP3_ {ProcessSendCmdGet grid numlab,gap3}
 | TYPE_ {ProcessSendCmdGet grid numlab,type}
 | VERTICAL_ {ProcessSendCmdGet grid numlab,vertical}
 ;

title : {ProcessSendCmdYesNo grid title}
 | TEXT_ {ProcessSendCmdGet grid title,text}
 | DEF_ {ProcessSendCmdYesNo grid title,def}
 | GAP_ {ProcessSendCmdGet grid title,gap}
 | FONT_ {ProcessSendCmdGet grid title,font}
 | FONTSIZE_ {ProcessSendCmdGet grid title,size}
 | FONTWEIGHT_ {ProcessSendCmdGet grid title,weight}
 | FONTSLANT_ {ProcessSendCmdGet grid title,slant}
# backward compatibility
 | FONTSTYLE_ {ProcessSendCmdGet grid title,weight}
 | COLOR_ {ProcessSendCmdGet grid title,color}
 ;

labels : {ProcessSendCmdYesNo grid textlab}
 | TEXT1_ {ProcessSendCmdGet grid textlab,text1}
 | TEXT2_ {ProcessSendCmdGet grid textlab,text2}
 | DEF1_ {ProcessSendCmdYesNo grid textlab,def1}
 | DEF2_ {ProcessSendCmdYesNo grid textlab,def2}
 | GAP1_ {ProcessSendCmdGet grid textlab,gap1}
 | GAP2_ {ProcessSendCmdGet grid textlab,gap2}
 | FONT_ {ProcessSendCmdGet grid textlab,font}
 | FONTSIZE_ {ProcessSendCmdGet grid textlab,size}
 | FONTWEIGHT_ {ProcessSendCmdGet grid textlab,weight}
 | FONTSLANT_ {ProcessSendCmdGet grid textlab,slant}
# backward compatibility
 | FONTSTYLE_ {ProcessSendCmdGet grid textlab,weight}
 | COLOR_ {ProcessSendCmdGet grid textlab,color}
 ;

view : GRID_ {ProcessSendCmdYesNo grid grid}
 | AXES_ viewaxes
 | TITLE_ {ProcessSendCmdYesNo grid title}
 | BORDER_ {ProcessSendCmdYesNo grid border}
 | VERTICAL_ {ProcessSendCmdYesNo grid numlab,vertical}
 ;

viewaxes : {ProcessSendCmdYesNo grid axes}
 | NUMBERS_ {ProcessSendCmdYesNo grid numlab}
 | TICKMARKS_ {ProcessSendCmdYesNo grid tick}
 | LABELS_ {ProcessSendCmdYesNo grid textlab}
 ;

%%

proc gridsend::yyerror {msg} {
     variable yycnt
     variable yy_current_buffer
     variable index_

     ParserError $msg $yycnt $yy_current_buffer $index_
}