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
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
|
package provide DS9 1.0
######
# Begin autogenerated taccle (version 1.3) routines.
# Although taccle itself is protected by the GNU Public License (GPL)
# all user-supplied functions are protected by their respective
# author's license. See http://mini.net/tcl/taccle for other details.
######
namespace eval framesend {
variable yylval {}
variable table
variable rules
variable token {}
variable yycnt 0
variable yyerr 0
variable save_state 0
namespace export yylex
}
proc framesend::YYABORT {} {
return -code return 1
}
proc framesend::YYACCEPT {} {
return -code return 0
}
proc framesend::YYERROR {} {
variable yyerr
set yyerr 1
}
proc framesend::yyclearin {} {
variable token
variable yycnt
set token {}
incr yycnt -1
}
proc framesend::yyerror {s} {
puts stderr $s
}
proc framesend::setupvalues {stack pointer numsyms} {
upvar 1 1 y
set y {}
for {set i 1} {$i <= $numsyms} {incr i} {
upvar 1 $i y
set y [lindex $stack $pointer]
incr pointer
}
}
proc framesend::unsetupvalues {numsyms} {
for {set i 1} {$i <= $numsyms} {incr i} {
upvar 1 $i y
unset y
}
}
array set framesend::table {
47:263 shift
55:280,target 68
55:279,target 68
47:264 shift
47:265 shift
11:263,target 13
47:272,target 22
47:266 shift
27:0 reduce
54:275,target 69
47:267 shift
4:272,target 22
47:268 shift
48:0 reduce
47:270 shift
47:269 shift
0:306,target 5
53:271,target 67
47:271 shift
47:322,target 72
47:272 shift
70:0 reduce
69:0 reduce
47:273 shift
47:274 shift
58:270,target 20
58:269,target 19
47:275 shift
6:0,target 0
11:282,target 32
47:276 shift
2:0 reduce
47:277 shift
45:313,target 68
72:0,target 44
47:278 shift
64:0,target 42
55:277,target 68
47:280 shift
47:279 shift
56:0,target 66
47:281 shift
38:290 shift
24:0 reduce
11:261,target 52
48:0,target 38
47:282 shift
47:270,target 20
47:269,target 19
54:273,target 69
47:283 shift
41:0,target 54
4:269,target 19
4:270,target 20
47:284 shift
33:0,target 27
47:285 shift
25:0,target 19
53:268,target 67
47:286 shift
17:0,target 11
66:0 reduce
47:287 shift
10:0,target 4
58:267,target 17
11:279,target 29
11:280,target 30
55:275,target 68
21:0 reduce
53:287,target 67
47:267,target 17
54:271,target 69
42:0 reduce
4:267,target 17
58:286,target 36
38:319 goto
63:0 reduce
53:266,target 67
53:261 reduce
53:262 reduce
4:317,target 50
53:263 reduce
47:314 goto
53:264 reduce
47:315 goto
58:265,target 15
53:265 reduce
11:277,target 27
53:266 reduce
47:286,target 36
53:267 reduce
4:286,target 36
53:268 reduce
17:0 reduce
58:315,target 73
55:273,target 68
53:270 reduce
53:269 reduce
53:285,target 67
53:271 reduce
47:322 goto
53:272 reduce
47:265,target 15
38:0 reduce
54:268,target 69
53:273 reduce
4:265,target 15
53:274 reduce
60:0 reduce
59:0 reduce
58:284,target 34
53:275 reduce
3:0,target 33
0:289,target 2
53:276 reduce
53:264,target 67
47:315,target 71
53:277 reduce
4:315,target 49
68:0,target 61
53:278 reduce
61:0,target 55
53:280 reduce
53:279 reduce
58:263,target 13
53:281 reduce
53:0,target 67
11:275,target 25
53:282 reduce
47:284,target 34
54:287,target 69
53:283 reduce
37:0,target 31
14:0 reduce
4:284,target 34
53:284 reduce
30:0,target 24
29:0,target 23
55:271,target 68
53:285 reduce
22:0,target 16
53:286 reduce
53:283,target 67
35:0 reduce
14:0,target 8
53:287 reduce
47:263,target 13
54:266,target 69
4:263,target 13
56:0 reduce
11:261 shift
58:282,target 32
11:262 shift
53:262,target 67
11:263 shift
11:264 shift
11:265 shift
11:266 shift
58:261,target 52
9:0 reduce
11:267 shift
11:273,target 23
47:282,target 32
11:0 reduce
11:268 shift
54:285,target 69
4:282,target 32
11:269 shift
11:270 shift
11:271 shift
55:268,target 68
32:0 reduce
0:316,target 6
11:323,target 57
11:272 shift
58:261 shift
53:281,target 67
11:273 shift
58:262 shift
47:261,target 52
11:274 shift
58:263 shift
54:264,target 69
53:0 reduce
4:261,target 11
11:275 shift
58:264 shift
11:276 shift
58:280,target 30
58:279,target 29
58:265 shift
11:292,target 53
11:277 shift
58:266 shift
38:319,target 60
11:278 shift
58:267 shift
4:311,target 46
11:279 shift
11:280 shift
58:268 shift
11:281 shift
58:270 shift
58:269 shift
55:287,target 68
6:0 accept
11:282 shift
58:271 shift
11:271,target 21
11:283 shift
58:272 shift
47:280,target 30
47:279,target 29
11:284 shift
58:273 shift
54:283,target 69
45:302,target 65
41:291 shift
4:279,target 29
4:280,target 30
11:285 shift
58:274 shift
28:0 reduce
7:0,target 1
11:286 shift
58:275 shift
55:266,target 68
0:0,target 32
11:287 shift
58:276 shift
53:278,target 67
41:294 shift
73:0,target 65
58:277 shift
50:0 reduce
49:0 reduce
47:258,target 8
65:0,target 58
58:278 shift
54:262,target 69
4:258,target 8
58:280 shift
58:279 shift
57:0,target 45
11:292 shift
71:0 reduce
58:281 shift
58:277,target 27
50:0,target 37
49:0,target 39
41:308 shift
58:282 shift
42:0,target 50
58:283 shift
45:321,target 69
34:0,target 28
4:298,target 41
0:288 shift
11:305 shift
58:284 shift
26:0,target 20
3:0 reduce
0:289 shift
58:285 shift
55:285,target 68
18:0,target 12
0:301 shift
11:297 shift
58:286 shift
11:0,target 5
11:268,target 18
58:287 shift
47:277,target 27
54:281,target 69
25:0 reduce
4:277,target 27
55:264,target 68
0:306 shift
53:276,target 67
46:0 reduce
41:320 goto
55:261 reduce
11:315 goto
55:262 reduce
0:299 shift
67:0 reduce
55:263 reduce
58:275,target 25
55:264 reduce
11:287,target 37
55:265 reduce
55:266 reduce
0:0 reduce
4:296,target 40
55:267 reduce
55:283,target 68
55:268 reduce
0:316 goto
11:323 goto
55:270 reduce
55:269 reduce
11:324 goto
11:266,target 16
55:271 reduce
47:275,target 25
22:0 reduce
55:272 reduce
54:278,target 69
4:275,target 25
58:315 goto
55:273 reduce
55:274 reduce
55:262,target 68
43:0 reduce
0:299,target 3
55:275 reduce
53:274,target 67
55:276 reduce
64:0 reduce
55:277 reduce
55:278 reduce
58:273,target 23
55:280 reduce
55:279 reduce
41:291,target 61
11:285,target 35
55:281 reduce
55:282 reduce
4:304,target 44
55:283 reduce
55:284 reduce
55:281,target 68
55:285 reduce
18:0 reduce
11:264,target 14
70:0,target 62
69:0,target 43
55:286 reduce
47:273,target 23
62:0,target 56
55:287 reduce
54:276,target 69
4:273,target 23
54:0,target 69
40:0 reduce
39:0 reduce
46:0,target 51
41:320,target 64
53:272,target 67
38:0,target 52
61:0 reduce
31:0,target 25
23:0,target 17
15:0,target 9
58:271,target 21
11:283,target 33
55:278,target 68
15:0 reduce
11:262,target 12
47:271,target 21
54:274,target 69
36:0 reduce
4:271,target 21
57:0 reduce
53:270,target 67
53:269,target 67
58:268,target 18
11:281,target 31
4:300,target 42
12:0 reduce
55:276,target 68
47:268,target 18
33:0 reduce
54:272,target 69
4:268,target 18
58:287,target 37
54:0 reduce
53:267,target 67
4:318,target 51
8:0,target 2
1:0,target 35
58:266,target 16
11:278,target 28
66:0,target 59
47:287,target 37
7:0 reduce
58:0,target 64
45:310,target 67
45:309,target 66
4:287,target 37
51:0,target 40
55:274,target 68
43:0,target 46
53:286,target 67
35:0,target 29
30:0 reduce
29:0 reduce
47:266,target 16
27:0,target 21
54:270,target 69
54:269,target 69
20:0,target 14
19:0,target 13
4:266,target 16
51:0 reduce
12:0,target 6
58:285,target 35
0:301,target 4
11:297,target 54
53:265,target 67
72:0 reduce
58:264,target 14
11:276,target 26
47:285,target 35
4:285,target 35
55:272,target 68
26:0 reduce
53:284,target 67
47:264,target 14
54:267,target 69
4:264,target 14
58:283,target 33
0:288,target 1
11:305,target 55
68:0 reduce
53:263,target 67
47:314,target 70
4:314,target 48
1:0 reduce
58:262,target 12
11:274,target 24
47:283,target 33
54:286,target 69
4:283,target 33
23:0 reduce
55:270,target 68
55:269,target 68
11:324,target 58
53:282,target 67
47:262,target 12
44:0 reduce
5:0,target 34
54:265,target 69
4:262,target 12
54:261 reduce
4:257 shift
71:0,target 63
65:0 reduce
58:281,target 31
54:262 reduce
41:308,target 63
4:258 shift
63:0,target 57
54:263 reduce
53:261,target 67
4:260 shift
4:259 shift
55:0,target 68
54:264 reduce
4:261 shift
4:312,target 47
54:265 reduce
4:262 shift
54:266 reduce
40:0,target 49
39:0,target 47
4:263 shift
54:267 reduce
32:0,target 26
4:264 shift
11:272,target 22
54:268 reduce
47:281,target 31
38:290,target 59
24:0,target 18
4:265 shift
54:284,target 69
54:270 reduce
54:269 reduce
20:0 reduce
19:0 reduce
16:0,target 10
4:266 shift
4:281,target 31
54:271 reduce
4:267 shift
55:267,target 68
54:272 reduce
4:268 shift
54:273 reduce
53:280,target 67
53:279,target 67
41:0 reduce
4:269 shift
4:270 shift
54:274 reduce
47:260,target 10
47:259,target 9
4:271 shift
54:275 reduce
54:263,target 69
4:260,target 10
4:259,target 9
4:272 shift
62:0 reduce
54:276 reduce
4:273 shift
58:278,target 28
54:277 reduce
4:274 shift
54:278 reduce
4:275 shift
54:280 reduce
54:279 reduce
4:276 shift
54:281 reduce
4:277 shift
55:286,target 68
54:282 reduce
4:278 shift
54:283 reduce
45:302 shift
4:279 shift
4:280 shift
11:269,target 19
11:270,target 20
54:284 reduce
47:278,target 28
16:0 reduce
4:281 shift
54:285 reduce
54:282,target 69
4:278,target 28
4:282 shift
54:286 reduce
4:283 shift
55:265,target 68
54:287 reduce
37:0 reduce
4:284 shift
53:277,target 67
4:285 shift
47:257,target 7
4:286 shift
58:0 reduce
54:261,target 69
45:310 shift
45:309 shift
4:257,target 7
4:287 shift
58:276,target 26
41:294,target 62
4:300 shift
45:313 shift
4:307,target 45
4:293 shift
4:303 shift
55:284,target 68
4:304 shift
13:0 reduce
4:295 shift
9:0,target 3
11:267,target 17
47:276,target 26
2:0,target 36
4:296 shift
54:280,target 69
54:279,target 69
4:307 shift
4:276,target 26
45:321 goto
34:0 reduce
4:298 shift
67:0,target 60
55:263,target 68
60:0,target 41
59:0,target 53
53:275,target 67
4:311 shift
55:0 reduce
52:0,target 5
4:312 shift
44:0,target 48
36:0,target 30
4:314 goto
58:274,target 24
28:0,target 22
4:315 goto
11:286,target 36
21:0,target 15
13:0,target 7
4:317 goto
4:295,target 39
4:318 goto
8:0 reduce
55:282,target 68
10:0 reduce
11:265,target 15
47:274,target 24
54:277,target 69
31:0 reduce
4:274,target 24
55:261,target 68
11:315,target 56
53:273,target 67
52:0 reduce
47:257 shift
73:0 reduce
47:258 shift
58:272,target 22
47:260 shift
47:259 shift
11:284,target 34
47:261 shift
47:262 shift
4:293,target 38
4:303,target 43
5:0 reduce
}
array set framesend::rules {
9,l 315
11,l 315
32,l 316
53,l 319
6,l 315
28,l 315
50,l 318
49,l 318
3,l 314
25,l 315
46,l 318
67,l 324
0,l 325
22,l 315
43,l 317
64,l 323
18,l 315
40,l 317
39,l 317
61,l 321
15,l 315
36,l 316
57,l 320
12,l 315
33,l 316
54,l 320
7,l 315
29,l 315
30,l 315
51,l 318
4,l 314
26,l 315
47,l 318
68,l 324
1,l 314
23,l 315
44,l 317
65,l 323
19,l 315
20,l 315
41,l 317
62,l 322
16,l 315
37,l 316
58,l 321
13,l 315
34,l 316
55,l 320
8,l 315
10,l 315
31,l 315
52,l 319
5,l 315
27,l 315
48,l 318
69,l 324
2,l 314
24,l 315
45,l 317
66,l 323
21,l 315
42,l 317
63,l 322
17,l 315
38,l 317
60,l 321
59,l 321
14,l 315
35,l 316
56,l 320
}
array set framesend::rules {
63,dc 1
12,dc 1
26,dc 1
3,dc 1
41,dc 2
55,dc 1
69,dc 1
18,dc 1
33,dc 1
9,dc 1
47,dc 1
62,dc 1
11,dc 1
25,dc 1
2,dc 1
40,dc 1
39,dc 1
54,dc 0
68,dc 1
17,dc 1
32,dc 0
8,dc 1
46,dc 1
61,dc 1
10,dc 1
24,dc 1
1,dc 1
38,dc 1
53,dc 1
67,dc 1
16,dc 1
31,dc 1
7,dc 1
45,dc 2
60,dc 1
59,dc 1
23,dc 1
0,dc 1
37,dc 2
52,dc 0
66,dc 1
15,dc 1
29,dc 1
30,dc 1
6,dc 1
44,dc 2
58,dc 1
22,dc 1
36,dc 1
51,dc 1
65,dc 2
14,dc 1
28,dc 1
5,dc 1
43,dc 2
57,dc 1
21,dc 1
35,dc 1
50,dc 1
49,dc 1
64,dc 1
13,dc 1
27,dc 1
4,dc 1
42,dc 2
56,dc 1
19,dc 1
20,dc 1
34,dc 1
48,dc 1
}
array set framesend::rules {
41,line 150
7,line 112
37,line 144
4,line 108
34,line 141
1,line 105
31,line 136
27,line 132
24,line 129
21,line 126
17,line 122
14,line 119
69,line 193
11,line 116
66,line 187
63,line 182
60,line 177
59,line 176
56,line 171
53,line 166
50,line 161
49,line 160
46,line 157
43,line 152
9,line 114
40,line 149
39,line 148
6,line 111
36,line 143
3,line 107
33,line 140
29,line 134
30,line 135
26,line 131
23,line 128
19,line 124
20,line 125
16,line 121
13,line 118
68,line 192
10,line 115
65,line 186
62,line 181
58,line 175
55,line 170
52,line 165
48,line 159
45,line 154
42,line 151
8,line 113
38,line 147
5,line 110
35,line 142
2,line 106
32,line 139
28,line 133
25,line 130
22,line 127
18,line 123
15,line 120
12,line 117
67,line 190
64,line 185
61,line 178
57,line 172
54,line 169
51,line 162
47,line 158
44,line 153
}
array set framesend::lr1_table {
66,trans {}
35 {{29 0 1}}
14,trans {}
36 {{30 0 1}}
33,trans {}
37 {{31 0 1}}
52,trans {}
38 {{41 0 1} {52 0 0} {53 0 0}}
71,trans {}
39 {{47 0 1}}
40 {{49 0 1}}
18,trans {}
1,trans {}
41 {{42 0 1} {54 0 0} {55 0 0} {56 0 0} {57 0 0}}
37,trans {}
42 {{50 0 1}}
56,trans {}
43 {{46 0 1}}
44 {{48 0 1}}
23,trans {}
5,trans {}
45 {{43 0 1} {58 0 0} {59 0 0} {60 0 0} {61 0 0}}
42,trans {}
46 {{51 0 1}}
61,trans {}
47 {{44 0 1} {62 0 0} {63 0 0} {1 0 0} {2 0 0} {3 0 0} {4 0 0} {5 0 0} {6 0 0} {7 0 0} {8 0 0} {9 0 0} {10 0 0} {11 0 0} {12 0 0} {13 0 0} {14 0 0} {15 0 0} {16 0 0} {17 0 0} {18 0 0} {19 0 0} {20 0 0} {21 0 0} {22 0 0} {23 0 0} {24 0 0} {25 0 0} {26 0 0} {27 0 0} {28 0 0} {29 0 0} {30 0 0} {31 0 0}}
48 {{38 0 1}}
27,trans {}
9,trans {}
50 {{37 0 2}}
49 {{39 0 1}}
46,trans {}
51 {{40 0 1}}
65,trans {}
52 {{5 0 1}}
13,trans {}
53 {{67 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 1}}
32,trans {}
54 {{69 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 1}}
51,trans {}
55 {{68 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 1}}
70,trans {}
69,trans {}
56 {{66 0 1}}
17,trans {}
57 {{45 0 2}}
0,trans {{288 1} {289 2} {299 3} {301 4} {306 5} {316 6}}
36,trans {}
58 {{64 0 1} {65 0 1} {5 0 0} {6 0 0} {7 0 0} {8 0 0} {9 0 0} {10 0 0} {11 0 0} {12 0 0} {13 0 0} {14 0 0} {15 0 0} {16 0 0} {17 0 0} {18 0 0} {19 0 0} {20 0 0} {21 0 0} {22 0 0} {23 0 0} {24 0 0} {25 0 0} {26 0 0} {27 0 0} {28 0 0} {29 0 0} {30 0 0} {31 0 0}}
55,trans {}
60 {{41 0 2}}
59 {{53 0 1}}
61 {{55 0 1}}
62 {{56 0 1}}
22,trans {}
4,trans {{257 7} {258 8} {259 9} {260 10} {261 11} {262 12} {263 13} {264 14} {265 15} {266 16} {267 17} {268 18} {269 19} {270 20} {271 21} {272 22} {273 23} {274 24} {275 25} {276 26} {277 27} {278 28} {279 29} {280 30} {281 31} {282 32} {283 33} {284 34} {285 35} {286 36} {287 37} {293 38} {295 39} {296 40} {298 41} {300 42} {303 43} {304 44} {307 45} {311 46} {312 47} {314 48} {315 49} {317 50} {318 51}}
41,trans {{291 61} {294 62} {308 63} {320 64}}
63 {{57 0 1}}
60,trans {}
59,trans {}
64 {{42 0 2}}
65 {{58 0 1}}
66 {{59 0 1}}
26,trans {}
8,trans {}
45,trans {{302 65} {309 66} {310 67} {313 68} {321 69}}
67 {{60 0 1}}
64,trans {}
68 {{61 0 1}}
70 {{62 0 1}}
69 {{43 0 2}}
12,trans {}
71 {{63 0 1}}
31,trans {}
50,trans {}
49,trans {}
72 {{44 0 2}}
68,trans {}
73 {{65 0 2}}
16,trans {}
35,trans {}
54,trans {}
73,trans {}
21,trans {}
3,trans {}
40,trans {}
39,trans {}
58,trans {{261 52} {262 12} {263 13} {264 14} {265 15} {266 16} {267 17} {268 18} {269 19} {270 20} {271 21} {272 22} {273 23} {274 24} {275 25} {276 26} {277 27} {278 28} {279 29} {280 30} {281 31} {282 32} {283 33} {284 34} {285 35} {286 36} {287 37} {315 73}}
10 {{4 0 1}}
11 {{45 0 1} {5 0 1} {64 0 0} {65 0 0} {66 0 0} {67 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 0} {68 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 0} {69 {0 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287} 0} {5 0 0} {6 0 0} {7 0 0} {8 0 0} {9 0 0} {10 0 0} {11 0 0} {12 0 0} {13 0 0} {14 0 0} {15 0 0} {16 0 0} {17 0 0} {18 0 0} {19 0 0} {20 0 0} {21 0 0} {22 0 0} {23 0 0} {24 0 0} {25 0 0} {26 0 0} {27 0 0} {28 0 0} {29 0 0} {30 0 0} {31 0 0}}
25,trans {}
7,trans {}
12 {{6 0 1}}
44,trans {}
13 {{7 0 1}}
63,trans {}
14 {{8 0 1}}
11,trans {{261 52} {262 12} {263 13} {264 14} {265 15} {266 16} {267 17} {268 18} {269 19} {270 20} {271 21} {272 22} {273 23} {274 24} {275 25} {276 26} {277 27} {278 28} {279 29} {280 30} {281 31} {282 32} {283 33} {284 34} {285 35} {286 36} {287 37} {292 53} {297 54} {305 55} {315 56} {323 57} {324 58}}
15 {{9 0 1}}
30,trans {}
29,trans {}
16 {{10 0 1}}
48,trans {}
0 {{0 0 0} {32 0 0} {33 0 0} {34 0 0} {35 0 0} {36 0 0} {37 0 0}}
17 {{11 0 1}}
67,trans {}
1 {{35 0 1}}
18 {{12 0 1}}
15,trans {}
2 {{36 0 1}}
19 {{13 0 1}}
20 {{14 0 1}}
34,trans {}
3 {{33 0 1}}
21 {{15 0 1}}
53,trans {}
4 {{37 0 1} {38 0 0} {39 0 0} {40 0 0} {41 0 0} {42 0 0} {43 0 0} {44 0 0} {45 0 0} {1 0 0} {2 0 0} {3 0 0} {4 0 0} {5 0 0} {6 0 0} {7 0 0} {8 0 0} {9 0 0} {10 0 0} {11 0 0} {12 0 0} {13 0 0} {14 0 0} {15 0 0} {16 0 0} {17 0 0} {18 0 0} {19 0 0} {20 0 0} {21 0 0} {22 0 0} {23 0 0} {24 0 0} {25 0 0} {26 0 0} {27 0 0} {28 0 0} {29 0 0} {30 0 0} {31 0 0} {46 0 0} {47 0 0} {48 0 0} {49 0 0} {50 0 0} {51 0 0}}
22 {{16 0 1}}
72,trans {}
5 {{34 0 1}}
23 {{17 0 1}}
20,trans {}
19,trans {}
2,trans {}
6 {{0 0 1}}
24 {{18 0 1}}
38,trans {{290 59} {319 60}}
7 {{1 0 1}}
25 {{19 0 1}}
57,trans {}
8 {{2 0 1}}
26 {{20 0 1}}
9 {{3 0 1}}
27 {{21 0 1}}
24,trans {}
6,trans {}
28 {{22 0 1}}
43,trans {}
29 {{23 0 1}}
30 {{24 0 1}}
62,trans {}
31 {{25 0 1}}
10,trans {}
32 {{26 0 1}}
28,trans {}
33 {{27 0 1}}
47,trans {{257 7} {258 8} {259 9} {260 10} {261 52} {262 12} {263 13} {264 14} {265 15} {266 16} {267 17} {268 18} {269 19} {270 20} {271 21} {272 22} {273 23} {274 24} {275 25} {276 26} {277 27} {278 28} {279 29} {280 30} {281 31} {282 32} {283 33} {284 34} {285 35} {286 36} {287 37} {314 70} {315 71} {322 72}}
34 {{28 0 1}}
}
array set framesend::token_id_table {
286 WCSY_
286,t 0
287 WCSZ_
292,line 46
302,line 56
288 ACTIVE_
317,t 1
265,title WCSD
289 ALL_
290 AUX_
300 GRID_
284,title WCSW
291 BIN_
301 HAS_
313,title UNDO
292 CELESTIAL_
302 HIGHLITE_
288,line 42
293 CONTOUR_
303 IIS_
294 CUBE_
304 IRAFMIN_
305 LINEAR_
295 DATAMIN_
306 LOCK_
296 DATASEC_
307 MARKER_
262,t 0
297 EQUATORIAL_
308 MOSAIC_
285,line 36
298 FITS_
310 SELECT_
309 PASTE_
299 FRAMENO_
311 SMOOTH_
283,t 0
312 SYSTEM_
313 UNDO_
314,t 1
314 coordsys
282,line 33
315 wcssys
316 framesend
264,title WCSC
317 has
283,title WCSV
318 param
312,title SYSTEM
320 fits
319 contour
278,line 29
321 marker
error,line 103
322 system
258,t 0
323 wcs
324 wcstype
325 start'
275,line 26
279,t 0
280,t 0
311,t 0
272,line 23
263,title WCSB
282,title WCSU
311,title SMOOTH
268,line 19
276,t 0
265,line 16
307,t 0
297,t 0
262,line 13
0,t 0
0 {$}
262,title WCSA
281,title WCST
error,t 0
310,title SELECT
309,title PASTE
299,title FRAMENO
258,line 8
273,t 0
324,line 189
294,t 0
304,t 0
325,t 1
321,line 174
317,line 146
261,title WCS
279,title WCSR
280,title WCSS
308,title MOSAIC
269,t 0
270,t 0
298,title FITS
314,line 104
291,t 0
301,t 0
322,t 1
311,line 65
307,line 61
266,t 0
260,title DETECTOR
259,title AMPLIFIER
297,line 51
278,title WCSQ
307,title MARKER
297,title EQUATORIAL
287,t 0
294,line 48
304,line 58
318,t 1
error,title {}
291,line 45
301,line 55
263,t 0
258,title PHYSICAL
287,line 38
277,title WCSP
284,t 0
306,title LOCK
296,title DATASEC
325,title {}
315,t 1
284,line 35
281,line 32
260,t 0
259,t 0
281,t 0
257,title IMAGE
277,line 28
276,title WCSO
312,t 0
305,title LINEAR
295,title DATAMIN
324,title {}
274,line 25
271,line 22
277,t 0
308,t 0
267,line 18
298,t 0
275,title WCSN
294,title CUBE
304,title IRAFMIN
323,title {}
264,line 15
261,line 12
274,t 0
305,t 0
295,t 0
257,line 7
274,title WCSM
323,line 184
293,title CONTOUR
303,title IIS
322,title {}
320,line 168
319,line 164
error error
271,t 0
292,t 0
302,t 0
316,line 138
323,t 1
273,title WCSL
313,line 67
292,title CELESTIAL
302,title HIGHLITE
321,title {}
267,t 0
310,line 64
309,line 63
299,line 53
288,t 0
320,t 1
319,t 1
306,line 60
296,line 50
272,title WCSK
291,title BIN
293,line 47
301,title HAS
303,line 57
320,title {}
319,title {}
264,t 0
285,t 0
289,line 43
290,line 44
300,line 54
316,t 1
286,line 37
271,title WCSJ
261,t 0
283,line 34
289,title ALL
290,title AUX
300,title GRID
318,title {}
282,t 0
279,line 30
280,line 31
313,t 0
276,line 27
257,t 0
269,title WCSH
270,title WCSI
273,line 24
288,title ACTIVE
317,title {}
278,t 0
310,t 0
309,t 0
299,t 0
269,line 20
270,line 21
266,line 17
268,title WCSG
275,t 0
263,line 14
287,title WCSZ
316,title {}
306,t 0
296,t 0
260,line 10
259,line 9
325,line 194
322,line 180
272,t 0
267,title WCSF
257 IMAGE_
286,title WCSY
293,t 0
303,t 0
315,title {}
258 PHYSICAL_
318,line 156
260 DETECTOR_
259 AMPLIFIER_
324,t 1
261 WCS_
262 WCSA_
263 WCSB_
264 WCSC_
315,line 109
265 WCSD_
266 WCSE_
267 WCSF_
268,t 0
268 WCSG_
269 WCSH_
270 WCSI_
312,line 66
271 WCSJ_
272 WCSK_
289,t 0
290,t 0
300,t 0
266,title WCSE
273 WCSL_
274 WCSM_
285,title WCSX
321,t 1
314,title {}
275 WCSN_
308,line 62
276 WCSO_
298,line 52
277 WCSP_
278 WCSQ_
279 WCSR_
280 WCSS_
281 WCST_
305,line 59
282 WCSU_
295,line 49
265,t 0
283 WCSV_
284 WCSW_
285 WCSX_
}
proc framesend::yyparse {} {
variable yylval
variable table
variable rules
variable token
variable yycnt
variable lr1_table
variable token_id_table
variable yyerr
variable save_state
set yycnt 0
set state_stack {0}
set value_stack {{}}
set token ""
set accepted 0
set yyerr 0
set save_state 0
while {$accepted == 0} {
set state [lindex $state_stack end]
if {$token == ""} {
set yylval ""
set token [yylex]
set buflval $yylval
if {$token>0} {
incr yycnt
}
}
if {![info exists table($state:$token)] || $yyerr} {
if {!$yyerr} {
set save_state $state
}
# pop off states until error token accepted
while {[llength $state_stack] > 0 && \
![info exists table($state:error)]} {
set state_stack [lrange $state_stack 0 end-1]
set value_stack [lrange $value_stack 0 \
[expr {[llength $state_stack] - 1}]]
set state [lindex $state_stack end]
}
if {[llength $state_stack] == 0} {
set rr { }
if {[info exists lr1_table($save_state,trans)] && [llength $lr1_table($save_state,trans)] >= 1} {
foreach trans $lr1_table($save_state,trans) {
foreach {tok_id nextstate} $trans {
set ss $token_id_table($tok_id,title)
if {$ss != {}} {
append rr "$ss, "
}
}
}
}
set rr [string trimleft $rr { }]
set rr [string trimright $rr {, }]
yyerror "parse error, expecting: $rr"
return 1
}
lappend state_stack [set state $table($state:error,target)]
lappend value_stack {}
# consume tokens until it finds an acceptable one
while {![info exists table($state:$token)]} {
if {$token == 0} {
yyerror "end of file while recovering from error"
return 1
}
set yylval {}
set token [yylex]
set buflval $yylval
}
continue
}
switch -- $table($state:$token) {
shift {
lappend state_stack $table($state:$token,target)
lappend value_stack $buflval
set token ""
}
reduce {
set rule $table($state:$token,target)
set ll $rules($rule,l)
if {[info exists rules($rule,e)]} {
set dc $rules($rule,e)
} else {
set dc $rules($rule,dc)
}
set stackpointer [expr {[llength $state_stack]-$dc}]
setupvalues $value_stack $stackpointer $dc
set _ $1
set yylval [lindex $value_stack end]
switch -- $rule {
1 { set _ image }
2 { set _ physical }
3 { set _ amplifier }
4 { set _ detector }
5 { set _ wcs }
6 { set _ wcsa }
7 { set _ wcsb }
8 { set _ wcsc }
9 { set _ wcsd }
10 { set _ wcse }
11 { set _ wcsf }
12 { set _ wcsg }
13 { set _ wcsh }
14 { set _ wcsi }
15 { set _ wcsj }
16 { set _ wcsk }
17 { set _ wcsl }
18 { set _ wcsm }
19 { set _ wcsn }
20 { set _ wcso }
21 { set _ wcsp }
22 { set _ wcsq }
23 { set _ wcsr }
24 { set _ wcss }
25 { set _ wcst }
26 { set _ wcsu }
27 { set _ wcsv }
28 { set _ wcsw }
29 { set _ wcsx }
30 { set _ wcsy }
31 { set _ wcsz }
32 { FrameSendCmd }
33 { FrameSendCmd }
34 { ProcessSendCmdGet panzoom lock }
35 { FrameSendCmdGet active }
36 { FrameSendCmdGet frames }
38 { ProcessSendCmdCurrentYesNo "has $1" }
39 { ProcessSendCmdCurrentYesNo "has wcs $1" }
40 { ProcessSendCmdCurrentYesNo "has $1" }
41 { ProcessSendCmdCurrentYesNo "has contour $2" }
42 { ProcessSendCmdCurrentYesNo "has fits $2" }
43 { ProcessSendCmdCurrentYesNo "has marker $2" }
46 { set _ iis }
47 { set _ datamin }
48 { set _ irafmin }
49 { set _ datasec }
50 { set _ grid }
51 { set _ smooth }
52 { set _ {} }
53 { set _ aux }
54 { set _ {} }
55 { set _ bin }
56 { set _ cube }
57 { set _ mosaic }
58 { set _ highlite }
59 { set _ paste }
60 { set _ select }
61 { set _ undo }
62 { ProcessSendCmdCurrentYesNo "has $1" }
63 { ProcessSendCmdCurrentYesNo "has wcs $1" }
64 { ProcessSendCmdCurrentYesNo "has wcs $1 wcs" }
65 { ProcessSendCmdCurrentYesNo "has wcs $1 $2" }
66 { ProcessSendCmdCurrentYesNo "has wcs $1" }
67 { set _ celestial }
68 { set _ linear }
69 { set _ celestial }
}
unsetupvalues $dc
# pop off tokens from the stack if normal rule
if {![info exists rules($rule,e)]} {
incr stackpointer -1
set state_stack [lrange $state_stack 0 $stackpointer]
set value_stack [lrange $value_stack 0 $stackpointer]
}
# now do the goto transition
lappend state_stack $table([lindex $state_stack end]:$ll,target)
lappend value_stack $_
}
accept {
set accepted 1
}
goto -
default {
puts stderr "Internal parser error: illegal command $table($state:$token)"
return 2
}
}
}
return 0
}
######
# end autogenerated taccle functions
######
proc framesend::yyerror {msg} {
variable yycnt
variable yy_current_buffer
variable index_
ParserError $msg $yycnt $yy_current_buffer $index_
}
|