path: root/ds9/parsers/rgbparser.tcl

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 rgb {
    variable yylval {}
    variable table
    variable rules
    variable token {}
    variable yycnt 0
    variable yyerr 0
    variable save_state 0

    namespace export yylex
}

proc rgb::YYABORT {} {
    return -code return 1
}

proc rgb::YYACCEPT {} {
    return -code return 0
}

proc rgb::YYERROR {} {
    variable yyerr
    set yyerr 1
}

proc rgb::yyclearin {} {
    variable token
    variable yycnt
    set token {}
    incr yycnt -1
}

proc rgb::yyerror {s} {
    puts stderr $s
}

proc rgb::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 rgb::unsetupvalues {numsyms} {
    for {set i 1} {$i <= $numsyms} {incr i} {
        upvar 1 $i y
        unset y
    }
}

array set rgb::table {
  21:289 reduce
  23:286,target 58
  60:290 reduce
  59:290 reduce
  30:290,target 6
  29:290,target 5
  27:0 reduce
  9:302,target 7
  48:0 reduce
  0:296,target 3
  30:290 reduce
  29:290 reduce
  9:302 shift
  18:289,target 56
  5:305,target 22
  9:294 shift
  6:0,target 39
  8:266,target 34
  17:285,target 57
  24:288,target 59
  9:299 shift
  56:0,target 32
  53:289,target 60
  53:290,target 28
  38:290 reduce
  24:0 reduce
  23:284,target 58
  48:0,target 24
  41:0,target 17
  45:0 reduce
  33:0,target 9
  9:314 goto
  25:0,target 1
  0:294,target 1
  17:0,target 57
  42:290,target 18
  10:0,target 0
  18:287,target 56
  47:290 reduce
  17:284 reduce
  5:303,target 20
  5:293,target 17
  17:285 reduce
  8:264,target 32
  17:286 reduce
  24:286,target 57
  17:287 reduce
  4:288,target 47
  31:290,target 7
  17:288 reduce
  21:0 reduce
  17:289 reduce
  53:287,target 58
  56:290 reduce
  42:0 reduce
  20:289,target 54
  19:289,target 50
  0:302,target 7
  8:283,target 51
  63:0 reduce
  6:290 reduce
  26:290 reduce
  18:285,target 56
  5:291,target 15
  8:262,target 30
  54:290,target 63
  24:284,target 55
  4:286,target 47
  17:0 reduce
  53:285,target 56
  14:288,target 49
  38:0 reduce
  35:290 reduce
  43:290,target 19
  60:0 reduce
  59:0 reduce
  20:287,target 54
  19:287,target 50
  0:300,target 5
  0:290,target 38
  3:0,target 40
  8:281,target 49
  61:0,target 43
  53:0,target 28
  44:290 reduce
  32:290,target 8
  14:284 reduce
  8:259,target 27
  8:260,target 28
  45:0,target 21
  14:285 reduce
  9:314,target 53
  37:0,target 13
  14:286 reduce
  14:0 reduce
  4:284,target 47
  53:284 shift
  30:0,target 6
  29:0,target 5
  14:287 reduce
  53:285 shift
  22:0,target 51
  14:288 reduce
  8:309,target 52
  53:286 shift
  35:0 reduce
  14:289 reduce
  14:286,target 49
  14:0,target 49
  53:287 shift
  21:289,target 55
  53:288 shift
  56:0 reduce
  53:289 shift
  53:290 reduce
  23:284 reduce
  23:285 reduce
  20:285,target 54
  19:285,target 50
  8:278,target 46
  23:286 reduce
  23:287 reduce
  3:290 reduce
  23:288 reduce
  55:290,target 29
  23:289 reduce
  8:257,target 25
  11:0 reduce
  62:290 reduce
  15:288,target 53
  53:310 goto
  2:294,target 1
  32:0 reduce
  44:290,target 20
  14:284,target 49
  8:257 shift
  21:287,target 55
  1:290,target 48
  1:289,target 48
  8:258 shift
  53:0 reduce
  32:290 reduce
  8:259 shift
  8:260 shift
  5:315,target 24
  8:261 shift
  8:262 shift
  8:276,target 44
  8:263 shift
  33:290,target 9
  8:264 shift
  8:265 shift
  6:0 reduce
  8:266 shift
  53:310,target 62
  8:267 shift
  41:290 reduce
  8:268 shift
  9:299,target 4
  15:286,target 53
  8:269 shift
  8:270 shift
  28:0 reduce
  22:289,target 51
  2:302,target 7
  7:0,target 46
  8:271 shift
  0:314,target 12
  0:0,target 38
  8:272 shift
  8:273 shift
  50:0 reduce
  49:0 reduce
  21:285,target 55
  1:287,target 48
  8:274 shift
  11:290 reduce
  8:275 shift
  57:0,target 30
  8:276 shift
  50:290 reduce
  50:0,target 26
  49:290 reduce
  49:0,target 25
  20:284 reduce
  19:284 reduce
  8:274,target 42
  8:277 shift
  11:290,target 36
  56:290,target 32
  42:0,target 18
  20:285 reduce
  19:285 reduce
  8:278 shift
  34:0,target 10
  20:286 reduce
  19:286 reduce
  8:279 shift
  8:280 shift
  26:0,target 2
  20:287 reduce
  19:287 reduce
  0:300 shift
  0:290 reduce
  3:0 reduce
  8:281 shift
  20:288 reduce
  19:288 reduce
  18:0,target 56
  16:288,target 52
  0:301 shift
  8:282 shift
  20:289 reduce
  19:289 reduce
  0:302 shift
  8:283 shift
  11:0,target 35
  45:290,target 21
  25:0 reduce
  15:284,target 53
  0:294 shift
  58:290 reduce
  22:287,target 51
  0:295 shift
  11:312 goto
  0:296 shift
  46:0 reduce
  0:307 shift
  1:285,target 48
  0:308 shift
  5:257 shift
  0:299 shift
  7:288,target 46
  34:290,target 10
  28:290 reduce
  0:311 goto
  8:272,target 40
  0:313 goto
  0:314 goto
  0:0 reduce
  16:286,target 52
  23:289,target 58
  22:0 reduce
  8:309 goto
  37:290 reduce
  22:285,target 51
  43:0 reduce
  0:299,target 4
  12:290,target 41
  57:290,target 30
  7:286,target 46
  5:298,target 19
  8:269,target 37
  8:270,target 38
  46:290 reduce
  17:288,target 57
  16:284 reduce
  16:285 reduce
  16:286 reduce
  4:0,target 47
  46:290,target 22
  16:287 reduce
  16:284,target 52
  23:287,target 58
  18:0 reduce
  16:288 reduce
  3:290,target 40
  16:289 reduce
  62:0,target 45
  40:0 reduce
  39:0 reduce
  55:290 reduce
  46:0,target 22
  0:307,target 8
  38:0,target 14
  35:290,target 11
  61:0 reduce
  31:0,target 7
  23:0,target 58
  7:284,target 46
  15:0,target 53
  5:291 shift
  5:306,target 23
  25:290 reduce
  5:292 shift
  8:267,target 35
  17:286,target 57
  5:303 shift
  5:293 shift
  24:289,target 60
  24:290,target 28
  5:304 shift
  2:314,target 13
  5:305 shift
  15:0 reduce
  5:306 shift
  23:285,target 58
  5:297 shift
  5:298 shift
  36:0 reduce
  34:290 reduce
  13:290,target 42
  58:290,target 33
  0:295,target 2
  11:312,target 54
  57:0 reduce
  18:288,target 56
  5:315 goto
  5:304,target 21
  8:265,target 33
  47:290,target 23
  17:284,target 57
  43:290 reduce
  24:287,target 58
  4:289,target 47
  4:290,target 47
  12:0 reduce
  53:288,target 59
  33:0 reduce
  36:290,target 12
  13:290 reduce
  52:290 reduce
  22:284 reduce
  22:285 reduce
  22:286 reduce
  18:286,target 56
  1:0,target 48
  25:290,target 1
  22:287 reduce
  5:292,target 16
  22:288 reduce
  8:263,target 31
  22:289 reduce
  2:302 shift
  7:0 reduce
  58:0,target 33
  24:285,target 56
  4:287,target 47
  51:0,target 27
  2:299,target 4
  2:294 shift
  61:290 reduce
  43:0,target 19
  53:286,target 57
  35:0,target 11
  30:0 reduce
  29:0 reduce
  14:289,target 49
  60:290,target 34
  59:290,target 31
  27:0,target 3
  20:0,target 54
  19:0,target 50
  51:0 reduce
  2:299 shift
  12:0,target 41
  31:290 reduce
  20:288,target 54
  19:288,target 50
  0:301,target 6
  8:282,target 50
  48:290,target 24
  18:284,target 56
  2:314 goto
  4:0 reduce
  8:261,target 29
  4:285,target 47
  40:290 reduce
  39:290 reduce
  37:290,target 13
  26:0 reduce
  53:284,target 55
  14:287,target 49
  47:0 reduce
  20:286,target 54
  19:286,target 50
  8:279,target 47
  8:280,target 48
  26:290,target 2
  48:290 reduce
  18:284 reduce
  18:285 reduce
  18:286 reduce
  1:0 reduce
  18:287 reduce
  8:258,target 26
  18:288 reduce
  18:289 reduce
  15:289,target 53
  61:290,target 43
  23:0 reduce
  7:284 reduce
  7:285 reduce
  57:290 reduce
  14:285,target 49
  7:286 reduce
  44:0 reduce
  21:288,target 55
  7:287 reduce
  7:288 reduce
  7:289 reduce
  7:290 reduce
  50:290,target 26
  49:290,target 25
  20:284,target 54
  19:284,target 50
  8:277,target 45
  63:0,target 37
  27:290 reduce
  6:290,target 39
  55:0,target 29
  24:310,target 61
  47:0,target 23
  40:0,target 16
  39:0,target 15
  32:0,target 8
  38:290,target 14
  24:0,target 28
  20:0 reduce
  19:0 reduce
  16:0,target 52
  15:287,target 53
  36:290 reduce
  41:0 reduce
  21:286,target 55
  1:288,target 48
  27:290,target 3
  62:0 reduce
  8:275,target 43
  45:290 reduce
  15:284 reduce
  16:289,target 52
  15:285 reduce
  62:290,target 45
  15:286 reduce
  16:0 reduce
  15:287 reduce
  15:288 reduce
  15:285,target 53
  22:288,target 51
  15:289 reduce
  37:0 reduce
  0:313,target 11
  4:284 reduce
  4:285 reduce
  54:290 shift
  51:290,target 27
  24:284 shift
  21:284,target 55
  1:286,target 48
  4:286 reduce
  58:0 reduce
  24:285 shift
  4:287 reduce
  7:289,target 46
  7:290,target 46
  24:286 shift
  4:288 reduce
  24:287 shift
  4:289 reduce
  4:290 reduce
  8:273,target 41
  24:288 shift
  24:289 shift
  24:290 reduce
  40:290,target 16
  39:290,target 15
  16:287,target 52
  13:0 reduce
  34:0 reduce
  22:286,target 51
  28:290,target 4
  0:311,target 10
  60:0,target 34
  59:0,target 31
  33:290 reduce
  55:0 reduce
  52:0,target 44
  24:310 goto
  1:284,target 48
  44:0,target 20
  7:287,target 46
  36:0,target 12
  28:0,target 4
  8:271,target 39
  21:0,target 55
  17:289,target 57
  13:0,target 42
  42:290 reduce
  16:285,target 52
  10:0 accept
  23:288,target 58
  9:294,target 1
  31:0 reduce
  52:290,target 44
  22:284,target 51
  0:308,target 9
  5:257,target 14
  12:290 reduce
  52:0 reduce
  1:284 reduce
  1:285 reduce
  51:290 reduce
  21:284 reduce
  1:286 reduce
  7:285,target 46
  21:285 reduce
  1:287 reduce
  5:297,target 18
  41:290,target 17
  21:286 reduce
  1:288 reduce
  8:268,target 36
  21:287 reduce
  17:287,target 57
  1:290 reduce
  1:289 reduce
  21:288 reduce
}

array set rgb::rules {
  9,l 309
  11,l 309
  32,l 310
  53,l 315
  6,l 309
  28,l 310
  50,l 315
  49,l 315
  3,l 309
  25,l 309
  46,l 314
  0,l 316
  22,l 309
  43,l 313
  18,l 309
  40,l 313
  39,l 313
  15,l 309
  36,l 312
  57,l 315
  12,l 309
  33,l 310
  54,l 315
  7,l 309
  29,l 310
  30,l 310
  51,l 315
  4,l 309
  26,l 309
  47,l 314
  1,l 309
  23,l 309
  44,l 313
  19,l 309
  20,l 309
  41,l 313
  16,l 309
  37,l 311
  58,l 315
  13,l 309
  34,l 310
  55,l 315
  8,l 309
  10,l 309
  31,l 310
  52,l 315
  5,l 309
  27,l 309
  48,l 314
  2,l 309
  24,l 309
  45,l 313
  21,l 309
  42,l 313
  17,l 309
  38,l 313
  14,l 309
  35,l 311
  56,l 315
}

array set rgb::rules {
  12,dc 1
  26,dc 1
  3,dc 1
  41,dc 1
  55,dc 1
  18,dc 1
  33,dc 1
  9,dc 1
  47,dc 1
  11,dc 1
  25,dc 1
  2,dc 1
  40,dc 1
  39,dc 1
  54,dc 1
  17,dc 1
  32,dc 1
  8,dc 1
  46,dc 1
  10,dc 1
  24,dc 1
  1,dc 1
  38,dc 0
  53,dc 1
  16,dc 1
  31,dc 1
  7,dc 1
  45,dc 3
  23,dc 1
  0,dc 1
  37,dc 3
  52,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 0
  51,dc 1
  14,dc 1
  28,dc 0
  5,dc 1
  43,dc 3
  57,dc 1
  21,dc 1
  35,dc 1
  50,dc 1
  49,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 rgb::rules {
  41,line 148
  7,line 110
  37,line 142
  4,line 107
  34,line 138
  1,line 104
  31,line 135
  27,line 130
  24,line 127
  21,line 124
  17,line 120
  14,line 117
  11,line 114
  56,line 167
  36,e 1
  53,line 164
  50,line 161
  49,line 160
  46,line 155
  43,line 150
  9,line 112
  40,line 147
  39,line 146
  6,line 109
  36,line 141
  3,line 106
  33,line 137
  29,line 133
  30,line 134
  26,line 129
  23,line 126
  19,line 122
  20,line 123
  16,line 119
  13,line 116
  10,line 113
  58,line 169
  55,line 166
  52,line 163
  48,line 157
  45,line 152
  42,line 149
  8,line 111
  38,line 145
  5,line 108
  35,line 141
  2,line 105
  32,line 136
  28,line 132
  25,line 128
  22,line 125
  18,line 121
  15,line 118
  12,line 115
  57,line 168
  54,line 165
  51,line 162
  47,line 156
  44,line 151
}

array set rgb::lr1_table {
  66,trans {}
  35 {{11 {0 290} 1}}
  14,trans {}
  36 {{12 {0 290} 1}}
  33,trans {}
  37 {{13 {0 290} 1}}
  52,trans {}
  38 {{14 {0 290} 1}}
  40 {{16 {0 290} 1}}
  39 {{15 {0 290} 1}}
  18,trans {}
  41 {{17 {0 290} 1}}
  1,trans {}
  37,trans {}
  42 {{18 {0 290} 1}}
  56,trans {{284 58} {285 59} {286 60} {287 61} {288 62} {289 63} {310 65}}
  43 {{19 {0 290} 1}}
  44 {{20 {0 290} 1}}
  23,trans {}
  45 {{21 {0 290} 1}}
  5,trans {{257 14} {291 15} {292 16} {293 17} {297 18} {298 19} {303 20} {304 21} {305 22} {306 23} {315 24}}
  42,trans {}
  46 {{22 {0 290} 1}}
  61,trans {}
  47 {{23 {0 290} 1}}
  48 {{24 {0 290} 1}}
  27,trans {}
  9,trans {{294 53} {299 54} {302 55} {314 56}}
  50 {{26 {0 290} 1}}
  49 {{25 {0 290} 1}}
  46,trans {}
  51 {{27 {0 290} 1}}
  65,trans {}
  52 {{44 {0 290} 2}}
  13,trans {}
  53 {{48 {0 284 285 286 287 288 289} 1}}
  32,trans {}
  54 {{47 {0 284 285 286 287 288 289} 1}}
  51,trans {}
  55 {{46 {0 284 285 286 287 288 289} 1}}
  56 {{45 {0 290} 2} {28 {0 290} 0} {29 {0 290} 0} {30 {0 290} 0} {31 {0 290} 0} {32 {0 290} 0} {33 {0 290} 0} {34 {0 290} 0}}
  17,trans {}
  57 {{37 0 2}}
  0,trans {{294 1} {295 2} {296 3} {299 4} {300 5} {301 6} {302 7} {307 8} {308 9} {311 10} {313 11} {314 12}}
  36,trans {}
  58 {{29 {0 290} 1}}
  55,trans {}
  60 {{30 {0 290} 1}}
  59 {{32 {0 290} 1}}
  61 {{33 {0 290} 1}}
  62 {{31 {0 290} 1}}
  22,trans {}
  4,trans {}
  41,trans {}
  63 {{34 {0 290} 1}}
  60,trans {}
  59,trans {}
  64 {{43 {0 290} 3}}
  65 {{45 {0 290} 3}}
  66 {{37 0 3}}
  26,trans {}
  8,trans {{257 25} {258 26} {259 27} {260 28} {261 29} {262 30} {263 31} {264 32} {265 33} {266 34} {267 35} {268 36} {269 37} {270 38} {271 39} {272 40} {273 41} {274 42} {275 43} {276 44} {277 45} {278 46} {279 47} {280 48} {281 49} {282 50} {283 51} {309 52}}
  45,trans {}
  64,trans {}
  12,trans {}
  31,trans {}
  50,trans {}
  49,trans {}
  16,trans {}
  35,trans {}
  54,trans {}
  21,trans {}
  3,trans {}
  40,trans {}
  39,trans {}
  58,trans {}
  10 {{0 0 1}}
  11 {{35 0 1} {37 0 1} {36 290 0}}
  25,trans {}
  12 {{41 {0 290} 1}}
  7,trans {}
  44,trans {}
  13 {{42 {0 290} 2}}
  63,trans {}
  14 {{49 {0 284 285 286 287 288 289} 1}}
  11,trans {{312 57}}
  15 {{53 {0 284 285 286 287 288 289} 1}}
  30,trans {}
  29,trans {}
  16 {{52 {0 284 285 286 287 288 289} 1}}
  48,trans {}
  0 {{0 0 0} {35 0 0} {37 0 0} {38 {0 290} 0} {39 {0 290} 0} {40 {0 290} 0} {41 {0 290} 0} {42 {0 290} 0} {43 {0 290} 0} {44 {0 290} 0} {45 {0 290} 0} {46 {0 290} 0} {47 {0 290} 0} {48 {0 290} 0}}
  17 {{57 {0 284 285 286 287 288 289} 1}}
  1 {{48 {0 290} 1}}
  18 {{56 {0 284 285 286 287 288 289} 1}}
  15,trans {}
  2 {{42 {0 290} 1} {46 {0 290} 0} {47 {0 290} 0} {48 {0 290} 0}}
  19 {{50 {0 284 285 286 287 288 289} 1}}
  20 {{54 {0 284 285 286 287 288 289} 1}}
  34,trans {}
  3 {{40 {0 290} 1}}
  21 {{55 {0 284 285 286 287 288 289} 1}}
  53,trans {}
  4 {{47 {0 290} 1}}
  22 {{51 {0 284 285 286 287 288 289} 1}}
  5 {{43 {0 290} 1} {49 {0 284 285 286 287 288 289} 0} {50 {0 284 285 286 287 288 289} 0} {51 {0 284 285 286 287 288 289} 0} {52 {0 284 285 286 287 288 289} 0} {53 {0 284 285 286 287 288 289} 0} {54 {0 284 285 286 287 288 289} 0} {55 {0 284 285 286 287 288 289} 0} {56 {0 284 285 286 287 288 289} 0} {57 {0 284 285 286 287 288 289} 0} {58 {0 284 285 286 287 288 289} 0}}
  23 {{58 {0 284 285 286 287 288 289} 1}}
  20,trans {}
  19,trans {}
  6 {{39 {0 290} 1}}
  2,trans {{294 1} {299 4} {302 7} {314 13}}
  24 {{43 {0 290} 2} {28 {0 290} 0} {29 {0 290} 0} {30 {0 290} 0} {31 {0 290} 0} {32 {0 290} 0} {33 {0 290} 0} {34 {0 290} 0}}
  38,trans {}
  7 {{46 {0 290} 1}}
  25 {{1 {0 290} 1}}
  57,trans {{290 66}}
  8 {{44 {0 290} 1} {1 {0 290} 0} {2 {0 290} 0} {3 {0 290} 0} {4 {0 290} 0} {5 {0 290} 0} {6 {0 290} 0} {7 {0 290} 0} {8 {0 290} 0} {9 {0 290} 0} {10 {0 290} 0} {11 {0 290} 0} {12 {0 290} 0} {13 {0 290} 0} {14 {0 290} 0} {15 {0 290} 0} {16 {0 290} 0} {17 {0 290} 0} {18 {0 290} 0} {19 {0 290} 0} {20 {0 290} 0} {21 {0 290} 0} {22 {0 290} 0} {23 {0 290} 0} {24 {0 290} 0} {25 {0 290} 0} {26 {0 290} 0} {27 {0 290} 0}}
  26 {{2 {0 290} 1}}
  9 {{45 {0 290} 1} {46 {0 284 285 286 287 288 289} 0} {47 {0 284 285 286 287 288 289} 0} {48 {0 284 285 286 287 288 289} 0}}
  27 {{3 {0 290} 1}}
  24,trans {{284 58} {285 59} {286 60} {287 61} {288 62} {289 63} {310 64}}
  6,trans {}
  28 {{4 {0 290} 1}}
  43,trans {}
  29 {{5 {0 290} 1}}
  30 {{6 {0 290} 1}}
  62,trans {}
  31 {{7 {0 290} 1}}
  10,trans {}
  32 {{8 {0 290} 1}}
  28,trans {}
  33 {{9 {0 290} 1}}
  47,trans {}
  34 {{10 {0 290} 1}}
}

array set rgb::token_id_table {
  286 ON_
  286,t 0
  287 OFF_
  292,line 47
  302,line 57
  288 TRUE_
  265,title WCSH
  289 FALSE_
  290 STRING_
  300 LOCK_
  284,title YES
  291 AXES_
  301 OPEN_
  313,title {}
  292 BIN_
  302 RED_
  288,line 39
  293 BLOCK_
  303 SCALE_
  294 BLUE_
  304 SCALELIMITS_
  305 SLICE_
  295 CHANNEL_
  306 SMOOTH_
  296 CLOSE_
  307 SYSTEM_
  262,t 0
  297 COLORBAR_
  308 VIEW_
  285,line 36
  298 CROP_
  310 yesno
  309 wcssys
  299 GREEN_
  311 command
  283,t 0
  312 @PSEUDO1
  313 rgb
  314,t 1
  314 channel
  282,line 32
  315 lock
  316 start'
  264,title WCSG
  283,title WCSZ
  312,title {}
  278,line 28
  error,line 102
  258,t 0
  275,line 25
  279,t 0
  280,t 0
  311,t 1
  272,line 22
  263,title WCSF
  282,title WCSY
  311,title {}
  268,line 18
  276,t 0
  265,line 15
  307,t 0
  297,t 0
  262,line 12
  0,t 0
  0 {$}
  262,title WCSE
  281,title WCSX
  310,title {}
  309,title {}
  error,t 0
  299,title GREEN
  258,line 8
  273,t 0
  294,t 0
  304,t 0
  261,title WCSD
  279,title WCSV
  280,title WCSW
  308,title VIEW
  269,t 0
  270,t 0
  298,title CROP
  314,line 154
  291,t 0
  301,t 0
  311,line 140
  307,line 62
  266,t 0
  260,title WCSC
  259,title WCSB
  297,line 52
  278,title WCSU
  307,title SYSTEM
  297,title COLORBAR
  287,t 0
  294,line 49
  304,line 59
  error,title {}
  291,line 46
  301,line 56
  263,t 0
  258,title WCSA
  287,line 38
  277,title WCST
  284,t 0
  306,title SMOOTH
  296,title CLOSE
  315,t 1
  284,line 35
  281,line 31
  260,t 0
  259,t 0
  281,t 0
  257,title WCS
  277,line 27
  276,title WCSS
  312,t 1
  305,title SLICE
  295,title CHANNEL
  274,line 24
  271,line 21
  277,t 0
  308,t 0
  267,line 17
  298,t 0
  275,title WCSR
  294,title BLUE
  304,title SCALELIMITS
  264,line 14
  261,line 11
  274,t 0
  305,t 0
  295,t 0
  257,line 7
  274,title WCSQ
  293,title BLOCK
  303,title SCALE
  error error
  271,t 0
  292,t 0
  302,t 0
  316,line 170
  273,title WCSP
  313,line 144
  292,title BIN
  302,title RED
  267,t 0
  310,line 131
  309,line 103
  299,line 54
  288,t 0
  306,line 61
  296,line 51
  272,title WCSO
  291,title AXES
  293,line 48
  301,title OPEN
  303,line 58
  264,t 0
  285,t 0
  289,line 40
  290,line 42
  300,line 55
  316,t 1
  286,line 37
  271,title WCSN
  261,t 0
  283,line 33
  289,title FALSE
  290,title string
  300,title LOCK
  282,t 0
  279,line 29
  280,line 30
  313,t 1
  276,line 26
  257,t 0
  269,title WCSL
  270,title WCSM
  273,line 23
  288,title TRUE
  278,t 0
  310,t 1
  309,t 1
  299,t 0
  269,line 19
  270,line 20
  266,line 16
  268,title WCSK
  275,t 0
  263,line 13
  287,title OFF
  316,title {}
  306,t 0
  296,t 0
  260,line 10
  259,line 9
  272,t 0
  267,title WCSJ
  257 WCS_
  286,title ON
  293,t 0
  303,t 0
  315,title {}
  258 WCSA_
  260 WCSC_
  259 WCSB_
  261 WCSD_
  262 WCSE_
  263 WCSF_
  264 WCSG_
  315,line 159
  265 WCSH_
  266 WCSI_
  267 WCSJ_
  268,t 0
  268 WCSK_
  269 WCSL_
  270 WCSM_
  312,line 141
  271 WCSN_
  272 WCSO_
  289,t 0
  290,t 0
  300,t 0
  266,title WCSI
  273 WCSP_
  274 WCSQ_
  285,title NO
  314,title {}
  275 WCSR_
  308,line 63
  276 WCSS_
  298,line 53
  277 WCST_
  278 WCSU_
  279 WCSV_
  280 WCSW_
  281 WCSX_
  305,line 60
  282 WCSY_
  295,line 50
  265,t 0
  283 WCSZ_
  284 YES_
  285 NO_
}

proc rgb::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 _ wcs }
                    2 { set _ wcsa }
                    3 { set _ wcsb }
                    4 { set _ wcsc }
                    5 { set _ wcsd }
                    6 { set _ wcse }
                    7 { set _ wcsf }
                    8 { set _ wcsg }
                    9 { set _ wcsh }
                    10 { set _ wcsi }
                    11 { set _ wcsj }
                    12 { set _ wcsk }
                    13 { set _ wcsl }
                    14 { set _ wcsm }
                    15 { set _ wcsn }
                    16 { set _ wcso }
                    17 { set _ wcsp }
                    18 { set _ wcsq }
                    19 { set _ wcsr }
                    20 { set _ wcss }
                    21 { set _ wcst }
                    22 { set _ wcsu }
                    23 { set _ wcsv }
                    24 { set _ wcsw }
                    25 { set _ wcsx }
                    26 { set _ wcsy }
                    27 { set _ wcsz }
                    28 { set _ 1 }
                    29 { set _ 1 }
                    30 { set _ 1 }
                    31 { set _ 1 }
                    32 { set _ 0 }
                    33 { set _ 0 }
                    34 { set _ 0 }
                    36 { global ds9; if {!$ds9(init)} {YYERROR} else {yyclearin; YYACCEPT} }
                    38 { CreateRGBFrame }
                    40 { RGBDestroyDialog }
                    41 { ProcessCmdSet current rgb $1 RGBChannel }
                    42 { ProcessCmdSet current rgb $2 RGBChannel }
                    43 { ProcessCmdSet rgb $2 $3 }
                    44 { ProcessCmdSet rgb system $2 RGBSystem }
                    45 { ProcessCmdSet rgb $2 $3 RGBView }
                    46 { set _ red }
                    47 { set _ green }
                    48 { set _ blue }
                    49 { set _ lock,wcs }
                    50 { set _ lock,crop }
                    51 { set _ lock,slice }
                    52 { set _ lock,bin }
                    53 { set _ lock,axes }
                    54 { set _ lock,scale }
                    55 { set _ lock,scalelimits }
                    56 { set _ lock,colorbar }
                    57 { set _ lock,block }
                    58 { set _ lock,smooth }
                }
                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 rgb::yyerror {msg} {
     variable yycnt
     variable yy_current_buffer
     variable index_

     ParserError $msg $yycnt $yy_current_buffer $index_
}