summaryrefslogtreecommitdiffstats
path: root/ds9/parsers/framesendparser.tcl
blob: 8cbf008dbb4995c3078d2997f7d8be5c2309abbb (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
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_
}