path: root/ds9/parsers/prismparser.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 prism {
    variable yylval {}
    variable table
    variable rules
    variable token {}
    variable yycnt 0
    variable yyerr 0
    variable save_state 0

    namespace export yylex
}

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

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

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

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

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

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

array set prism::table {
  38:272 reduce
  10:280,target 28
  17:257 reduce
  18:271,target 33
  38:273 reduce
  29:283 goto
  17:259 reduce
  29:284 goto
  27:0 reduce
  26:257,target 29
  23:y,target 28
  6:259,target 23
  31:273,target 35
  6:z,target 22
  23:x reduce
  26:257 reduce
  23:y reduce
  20:Y,target 30
  6:259 shift
  19:Y,target 35
  23:z reduce
  26:259 reduce
  0:275,target 11
  17:269 reduce
  17:270 reduce
  41:z,target 22
  2:0 reduce
  17:271 reduce
  27:259,target 9
  17:z,target 31
  24:0 reduce
  10:z,target 22
  35:259 reduce
  29:Z,target 19
  45:0 reduce
  33:0,target 5
  26:270 reduce
  26:269 reduce
  22:Z,target 34
  6:x,target 20
  26:271 reduce
  20:x reduce
  16:259,target 12
  19:x reduce
  20:y reduce
  19:y reduce
  20:z reduce
  19:z reduce
  41:x shift
  43:273,target 35
  41:y shift
  41:z shift
  20:271,target 30
  19:271,target 35
  41:x,target 20
  6:279 goto
  10:X shift
  7:259,target 13
  10:Y shift
  6:283 goto
  10:Z shift
  17:x,target 31
  6:284 goto
  10:x,target 20
  14:259 reduce
  42:0 reduce
  29:X,target 17
  22:X,target 34
  37:272,target 23
  44:270 shift
  44:269 shift
  44:271 shift
  23:257 reduce
  3:259 reduce
  41:283,target 44
  28:259,target 14
  23:259 reduce
  20:y,target 30
  19:y,target 35
  46:282,target 47
  32:Y,target 18
  32:271,target 39
  44:281 goto
  29:283,target 32
  17:259,target 31
  32:259 shift
  23:270 reduce
  23:269 reduce
  3:0,target 10
  23:271 reduce
  29:z,target 22
  21:271,target 32
  22:z,target 34
  41:281,target 43
  0:268,target 10
  8:259,target 27
  45:0,target 21
  26:270,target 29
  26:269,target 29
  41:259 shift
  26:Z,target 29
  14:0 reduce
  32:270 shift
  32:269 shift
  18:Z,target 33
  32:271 shift
  41:259,target 23
  35:0 reduce
  14:0,target 17
  38:272,target 24
  10:x shift
  17:257,target 31
  10:y shift
  10:z shift
  44:271,target 39
  41:270 shift
  41:269 shift
  30:259,target 33
  29:x,target 20
  29:259,target 23
  41:271 shift
  22:x,target 34
  32:281 goto
  0:260 shift
  0:259 shift
  19:257 reduce
  20:257 reduce
  0:261 shift
  0:266,target 8
  9:0 reduce
  32:283 goto
  0:262 shift
  11:0 accept
  19:259 reduce
  20:259 reduce
  32:284 goto
  26:X,target 29
  21:X reduce
  0:263 shift
  21:Y reduce
  0:264 shift
  18:259,target 33
  18:X,target 33
  21:Z reduce
  0:265 shift
  0:266 shift
  0:267 shift
  41:281 goto
  0:268 shift
  8:259 shift
  32:y,target 21
  22:271,target 34
  41:283 goto
  28:259 reduce
  41:284 goto
  20:270 reduce
  19:269 reduce
  19:270 reduce
  20:269 reduce
  20:271 reduce
  9:259,target 7
  19:271 reduce
  0:275 goto
  21:Y,target 32
  0:264,target 6
  0:277 goto
  17:X reduce
  42:259,target 20
  17:Y reduce
  40:272,target 34
  39:272,target 25
  28:0 reduce
  7:0,target 13
  17:Z reduce
  18:257,target 33
  0:0,target 6
  26:z,target 29
  18:z,target 33
  42:0,target 20
  34:0,target 26
  23:Z,target 28
  3:0 reduce
  37:272 reduce
  32:283,target 41
  0:262,target 4
  11:0,target 0
  19:259,target 35
  20:259,target 30
  37:273 reduce
  16:259 reduce
  46:273,target 35
  23:271,target 28
  26:x,target 29
  21:x reduce
  5:257 shift
  21:y reduce
  18:x,target 33
  46:272 shift
  25:257 shift
  21:z reduce
  5:259 shift
  46:273 shift
  6:284,target 26
  23:X,target 28
  0:0 reduce
  10:283,target 29
  6:Y,target 18
  32:281,target 40
  0:260,target 2
  0:259,target 1
  19:257,target 35
  20:257,target 30
  17:269,target 31
  17:270,target 31
  32:X shift
  46:282 goto
  32:Y shift
  34:259 reduce
  32:Z shift
  21:y,target 32
  32:259,target 23
  17:x reduce
  41:Y,target 18
  17:y reduce
  17:z reduce
  17:Y,target 31
  10:Y,target 18
  21:259,target 32
  5:278 goto
  6:X shift
  6:Y shift
  6:Z shift
  41:270,target 38
  41:269,target 37
  23:z,target 28
  10:259,target 23
  13:259 reduce
  44:281,target 46
  20:Z,target 30
  19:Z,target 35
  15:0,target 18
  43:272 shift
  22:257 reduce
  2:259 reduce
  43:273 shift
  6:279,target 24
  22:259 reduce
  21:257,target 32
  1:259,target 8
  18:269,target 33
  18:270,target 33
  15:0 reduce
  23:x,target 28
  36:0 reduce
  31:272,target 34
  6:y,target 21
  43:282 goto
  32:x shift
  22:270 reduce
  22:269 reduce
  20:X,target 30
  19:X,target 35
  32:y shift
  22:271 reduce
  32:z shift
  22:259,target 34
  41:y,target 21
  40:282,target 42
  12:0 reduce
  22:X reduce
  17:y,target 31
  22:Y reduce
  10:y,target 21
  33:0 reduce
  22:Z reduce
  6:x shift
  31:272 shift
  29:Y,target 18
  6:y shift
  31:273 shift
  22:Y,target 34
  6:z shift
  37:273,target 23
  10:259 shift
  45:259,target 21
  1:0,target 8
  43:272,target 34
  22:257,target 34
  2:259,target 11
  41:284,target 26
  20:270,target 30
  20:269,target 30
  19:269,target 35
  19:270,target 35
  40:272 shift
  39:272 reduce
  20:z,target 30
  7:0 reduce
  18:257 reduce
  19:z,target 35
  40:273 shift
  39:273 reduce
  31:282 goto
  18:259 reduce
  18:X reduce
  34:259,target 26
  32:Z,target 19
  18:Y reduce
  35:0,target 27
  18:Z reduce
  29:284,target 26
  27:0,target 9
  12:0,target 3
  7:259 reduce
  40:282 goto
  23:259,target 28
  27:259 reduce
  18:269 reduce
  18:270 reduce
  10:280 goto
  18:271 reduce
  26:271,target 29
  20:x,target 30
  19:x,target 35
  10:283 goto
  12:259,target 4
  10:284 goto
  32:X,target 17
  36:259 reduce
  32:270,target 38
  32:269,target 37
  38:273,target 24
  47:0 reduce
  22:x reduce
  22:y reduce
  23:257,target 28
  22:z reduce
  3:259,target 10
  29:y,target 21
  21:270,target 32
  21:269,target 32
  22:y,target 34
  45:259 reduce
  1:0 reduce
  0:267,target 9
  35:259,target 27
  26:Y,target 29
  18:Y,target 33
  15:259 reduce
  24:259,target 15
  18:x reduce
  32:z,target 22
  18:y reduce
  18:z reduce
  44:270,target 38
  44:269,target 37
  4:259 shift
  12:276,target 30
  47:0,target 22
  24:259 reduce
  13:259,target 16
  21:Z,target 32
  0:265,target 7
  24:0,target 15
  16:0,target 12
  40:273,target 35
  39:273,target 25
  31:282,target 36
  29:X shift
  29:Y shift
  29:Z shift
  47:259,target 22
  4:259,target 13
  32:x,target 20
  22:270,target 34
  22:269,target 34
  36:259,target 19
  42:259 reduce
  32:284,target 26
  21:X,target 32
  0:263,target 5
  16:0 reduce
  26:X reduce
  26:Y reduce
  26:Z reduce
  12:259 reduce
  26:y,target 29
  18:y,target 33
  43:282,target 45
  14:259,target 17
  23:Y,target 28
  21:257 reduce
  1:259 reduce
  10:284,target 26
  21:259 reduce
  6:Z,target 19
  0:261,target 3
  9:0,target 7
  13:0 reduce
  23:X reduce
  2:0,target 11
  17:271,target 31
  23:Y reduce
  34:0 reduce
  23:Z reduce
  46:272,target 34
  25:257,target 31
  21:z,target 32
  5:259,target 15
  23:270,target 28
  23:269,target 28
  9:259 reduce
  41:Z,target 19
  12:276 goto
  30:259 shift
  29:x shift
  29:259 shift
  36:0,target 19
  29:y shift
  21:270 reduce
  21:269 reduce
  29:z shift
  28:0,target 14
  21:271 reduce
  17:Z,target 31
  6:283,target 25
  10:Z,target 19
  13:0,target 16
  5:278,target 16
  6:X,target 17
  41:271,target 39
  20:X reduce
  19:X reduce
  26:259,target 29
  20:Y reduce
  19:Y reduce
  20:Z reduce
  19:Z reduce
  41:X shift
  41:Y shift
  21:x,target 32
  5:257,target 14
  41:Z shift
  41:X,target 17
  26:x reduce
  26:y reduce
  15:259,target 18
  26:z reduce
  47:259 reduce
  0:277,target 12
  17:X,target 31
  10:X,target 17
}

array set prism::rules {
  9,l 277
  11,l 277
  32,l 284
  6,l 277
  28,l 283
  3,l 275
  25,l 281
  0,l 285
  22,l 280
  18,l 278
  15,l 277
  12,l 277
  33,l 284
  7,l 277
  29,l 283
  30,l 284
  4,l 276
  26,l 282
  1,l 274
  23,l 281
  19,l 279
  20,l 280
  16,l 277
  13,l 277
  34,l 284
  8,l 277
  10,l 277
  31,l 284
  5,l 275
  27,l 282
  2,l 274
  24,l 281
  21,l 280
  17,l 278
  14,l 277
  35,l 284
}

array set prism::rules {
  12,dc 2
  26,dc 1
  3,dc 1
  18,dc 1
  33,dc 1
  9,dc 2
  11,dc 1
  25,dc 1
  2,dc 1
  17,dc 1
  32,dc 1
  8,dc 1
  10,dc 1
  24,dc 1
  1,dc 1
  16,dc 2
  31,dc 1
  7,dc 1
  23,dc 1
  0,dc 1
  15,dc 2
  29,dc 1
  30,dc 1
  6,dc 0
  22,dc 6
  14,dc 2
  28,dc 1
  5,dc 3
  21,dc 5
  35,dc 1
  13,dc 1
  27,dc 1
  4,dc 0
  19,dc 3
  20,dc 4
  34,dc 1
}

array set prism::rules {
  7,line 47
  4,line 41
  34,line 87
  1,line 37
  31,line 84
  27,line 76
  24,line 71
  21,line 67
  17,line 59
  14,line 54
  11,line 51
  9,line 49
  6,line 46
  3,line 41
  33,line 86
  4,e 1
  29,line 80
  30,line 83
  26,line 75
  23,line 70
  19,line 63
  20,line 66
  16,line 56
  13,line 53
  10,line 50
  8,line 48
  5,line 42
  35,line 88
  2,line 38
  32,line 85
  28,line 79
  25,line 72
  22,line 67
  18,line 60
  15,line 55
  12,line 52
}

array set prism::lr1_table {
  66,trans {{272 50} {273 51} {282 69}}
  35 {{14 {0 259} 2}}
  14,trans {}
  36 {{20 {0 259} 1} {21 {0 259} 1} {22 {0 259} 1} {28 {259 269 270 271 X Y Z x y z} 0} {29 {259 269 270 271 X Y Z x y z} 0} {30 {259 269 270 271 X Y Z x y z} 0} {31 {259 269 270 271 X Y Z x y z} 0} {32 {259 269 270 271 X Y Z x y z} 0} {33 {259 269 270 271 X Y Z x y z} 0} {34 {259 269 270 271 X Y Z x y z} 0} {35 {259 269 270 271 X Y Z x y z} 0}}
  33,trans {}
  37 {{29 {259 X Y Z x y z} 1}}
  52,trans {}
  38 {{5 0 2}}
  71,trans {}
  40 {{31 {259 269 270 271 X Y Z x y z} 1}}
  39 {{19 {0 259} 2} {26 {0 259} 0} {27 {0 259} 0}}
  41 {{33 {259 269 270 271 X Y Z x y z} 1}}
  18,trans {}
  1,trans {}
  37,trans {}
  42 {{35 {259 269 270 271 X Y Z x y z} 1}}
  56,trans {{272 50} {273 51} {282 58}}
  43 {{30 {259 269 270 271 X Y Z x y z} 1}}
  44 {{32 {259 269 270 271 X Y Z x y z} 1}}
  45 {{34 {259 269 270 271 X Y Z x y z} 1}}
  23,trans {}
  5,trans {{257 14} {259 15} {278 16}}
  42,trans {}
  46 {{28 {259 269 270 271 X Y Z x y z} 1}}
  61,trans {}
  47 {{20 {0 259} 2} {21 {0 259} 2} {22 {0 259} 2} {23 {272 273} 0} {24 {272 273} 0} {25 {272 273} 0} {28 {259 269 270 271 X Y Z x y z} 0} {29 {259 269 270 271 X Y Z x y z} 0} {30 {259 269 270 271 X Y Z x y z} 0} {31 {259 269 270 271 X Y Z x y z} 0} {32 {259 269 270 271 X Y Z x y z} 0} {33 {259 269 270 271 X Y Z x y z} 0} {34 {259 269 270 271 X Y Z x y z} 0} {35 {259 269 270 271 X Y Z x y z} 0}}
  48 {{29 {259 269 270 271 X Y Z x y z} 1}}
  50 {{26 {0 259} 1}}
  49 {{5 0 3}}
  27,trans {}
  9,trans {}
  46,trans {}
  51 {{27 {0 259} 1}}
  65,trans {}
  52 {{19 {0 259} 3}}
  53 {{23 {272 273} 1}}
  13,trans {}
  54 {{24 {272 273} 1}}
  32,trans {}
  51,trans {}
  55 {{25 {272 273} 1}}
  70,trans {{272 50} {273 51} {282 71}}
  69,trans {}
  56 {{20 {0 259} 3} {26 {0 259} 0} {27 {0 259} 0}}
  57 {{21 {0 259} 3} {22 {0 259} 3} {23 {272 273} 0} {24 {272 273} 0} {25 {272 273} 0} {28 {269 270 271} 0} {29 {269 270 271} 0} {30 {269 270 271} 0} {31 {269 270 271} 0} {32 {269 270 271} 0} {33 {269 270 271} 0} {34 {269 270 271} 0} {35 {269 270 271} 0}}
  17,trans {}
  0,trans {{259 1} {260 2} {261 3} {262 4} {263 5} {264 6} {265 7} {266 8} {267 9} {268 10} {275 11} {277 12}}
  58 {{20 {0 259} 4}}
  36,trans {{X 40} {Y 41} {Z 42} {x 43} {y 44} {z 45} {259 46} {283 47} {284 48}}
  60 {{33 {269 270 271} 1}}
  59 {{31 {269 270 271} 1}}
  55,trans {}
  61 {{35 {269 270 271} 1}}
  62 {{30 {269 270 271} 1}}
  22,trans {}
  4,trans {{259 13}}
  63 {{32 {269 270 271} 1}}
  41,trans {}
  60,trans {}
  59,trans {}
  64 {{34 {269 270 271} 1}}
  65 {{28 {269 270 271} 1}}
  66 {{21 {0 259} 4} {26 {0 259} 0} {27 {0 259} 0}}
  26,trans {}
  8,trans {{259 27}}
  67 {{22 {0 259} 4} {23 {272 273} 0} {24 {272 273} 0} {25 {272 273} 0}}
  45,trans {}
  64,trans {}
  68 {{29 {269 270 271} 1}}
  70 {{22 {0 259} 5} {26 {0 259} 0} {27 {0 259} 0}}
  69 {{21 {0 259} 5}}
  12,trans {{276 38}}
  71 {{22 {0 259} 6}}
  31,trans {}
  50,trans {}
  49,trans {}
  68,trans {}
  16,trans {}
  35,trans {}
  54,trans {}
  21,trans {}
  3,trans {}
  40,trans {}
  39,trans {{272 50} {273 51} {282 52}}
  58,trans {}
  10 {{14 {0 259} 1} {20 {0 259} 0} {21 {0 259} 0} {22 {0 259} 0} {28 {259 X Y Z x y z} 0} {29 {259 X Y Z x y z} 0} {30 {259 X Y Z x y z} 0} {31 {259 X Y Z x y z} 0} {32 {259 X Y Z x y z} 0} {33 {259 X Y Z x y z} 0} {34 {259 X Y Z x y z} 0} {35 {259 X Y Z x y z} 0}}
  11 {{0 0 1}}
  25,trans {{257 39}}
  12 {{3 0 1} {5 0 1} {4 259 0}}
  7,trans {}
  44,trans {}
  13 {{16 {0 259} 2}}
  63,trans {}
  14 {{17 {0 259} 1}}
  11,trans {}
  15 {{18 {0 259} 1}}
  30,trans {}
  29,trans {}
  16 {{12 {0 259} 2}}
  48,trans {}
  0 {{0 0 0} {3 0 0} {5 0 0} {6 {0 259} 0} {7 {0 259} 0} {8 {0 259} 0} {9 {0 259} 0} {10 {0 259} 0} {11 {0 259} 0} {12 {0 259} 0} {13 {0 259} 0} {14 {0 259} 0} {15 {0 259} 0} {16 {0 259} 0}}
  17 {{31 257 1}}
  67,trans {{269 53} {270 54} {271 55} {281 70}}
  1 {{8 {0 259} 1}}
  18 {{33 257 1}}
  15,trans {}
  2 {{11 {0 259} 1}}
  19 {{35 257 1}}
  20 {{30 257 1}}
  34,trans {}
  3 {{10 {0 259} 1}}
  21 {{32 257 1}}
  53,trans {}
  4 {{16 {0 259} 1}}
  22 {{34 257 1}}
  5 {{12 {0 259} 1} {17 {0 259} 0} {18 {0 259} 0}}
  23 {{28 257 1}}
  20,trans {}
  19,trans {}
  6 {{15 {0 259} 1} {19 {0 259} 0} {28 257 0} {29 257 0} {30 257 0} {31 257 0} {32 257 0} {33 257 0} {34 257 0} {35 257 0}}
  2,trans {}
  24 {{15 {0 259} 2}}
  38,trans {{259 49}}
  7 {{13 {0 259} 1}}
  25 {{19 {0 259} 1}}
  57,trans {{X 59} {Y 60} {Z 61} {x 62} {y 63} {z 64} {259 65} {269 53} {270 54} {271 55} {281 66} {283 67} {284 68}}
  8 {{9 {0 259} 1}}
  26 {{29 257 1}}
  9 {{7 {0 259} 1}}
  27 {{9 {0 259} 2}}
  24,trans {}
  6,trans {{X 17} {Y 18} {Z 19} {x 20} {y 21} {z 22} {259 23} {279 24} {283 25} {284 26}}
  28 {{31 {259 X Y Z x y z} 1}}
  43,trans {}
  29 {{33 {259 X Y Z x y z} 1}}
  30 {{35 {259 X Y Z x y z} 1}}
  62,trans {}
  31 {{30 {259 X Y Z x y z} 1}}
  10,trans {{X 28} {Y 29} {Z 30} {x 31} {y 32} {z 33} {259 34} {280 35} {283 36} {284 37}}
  32 {{32 {259 X Y Z x y z} 1}}
  28,trans {}
  33 {{34 {259 X Y Z x y z} 1}}
  47,trans {{X 40} {Y 41} {Z 42} {x 43} {y 44} {z 45} {259 46} {269 53} {270 54} {271 55} {281 56} {283 57} {284 48}}
  34 {{28 {259 X Y Z x y z} 1}}
}

array set prism::token_id_table {
  z,title {}
  280,title {}
  279,title {}
  264,line 18
  270,t 0
  269,t 0
  276,line 41
  265,title IMAGE
  284,title {}
  274,t 1
  261,line 15
  257,t 0
  270,title BAR
  269,title LINE
  273,line 29
  y,t 0
  278,t 1
  257,line 7
  262,t 0
  285,line 89
  274,title {}
  X,line 83
  283,t 1
  270,line 25
  269,line 24
  259,title string
  260,title CLEAR
  266,t 0
  y,title {}
  278,title {}
  282,line 74
  error error
  271,t 0
  264,title HISTOGRAM
  266,line 20
  283,title {}
  y,line 84
  278,line 58
  275,t 1
  error,line 35
  268,title PLOT
  258,t 0
  263,line 17
  X,t 0
  X X
  error,title {}
  Y Y
  Z Z
  z,t 0
  280,t 1
  279,t 1
  275,line 40
  273,title OVER
  263,t 0
  259,line 10
  260,line 14
  258,title float
  Z,line 87
  x,title {}
  284,t 1
  277,title {}
  272,line 28
  267,t 0
  Z,title {}
  263,title EXT
  284,line 82
  282,title {}
  272,t 0
  268,line 22
  267,title OPEN
  257 INT_
  281,line 69
  276,t 1
  258 REAL_
  259,t 0
  259 STRING_
  260 CLEAR_
  260,t 0
  Y,t 0
  272,title NEW
  261 CLOSE_
  265,line 19
  262 CURRENT_
  281,t 1
  263 EXT_
  x,line 82
  277,line 45
  257,title integer
  264 HISTOGRAM_
  264,t 0
  276,title {}
  265 IMAGE_
  262,line 16
  266 LOAD_
  285,t 1
  Y,title {}
  267 OPEN_
  0,t 0
  0 {$}
  262,title CURRENT
  268 PLOT_
  268,t 0
  281,title {}
  274,line 36
  270 BAR_
  269 LINE_
  error,t 0
  271 SCATTER_
  272 NEW_
  258,line 8
  273,t 0
  273 OVER_
  266,title LOAD
  285,title {}
  Y,line 85
  274 numeric
  275 command
  271,line 26
  276 @PSEUDO1
  x,t 0
  x x
  277,t 1
  277 prism
  271,title SCATTER
  y y
  283,line 78
  278 ext
  261,t 0
  Z,t 0
  z z
  280 plot
  279 histogram
  281 type
  267,line 21
  282,t 1
  282 mode
  275,title {}
  283 cols
  265,t 0
  z,line 86
  X,title {}
  284 colsxyz
  280,line 65
  279,line 62
  285 start'
  261,title CLOSE
}

proc prism::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 _ $1 }
                    2 { set _ $1 }
                    4 { global ds9; if {!$ds9(init)} {YYERROR} else {yyclearin; YYACCEPT} }
                    6 { PrismDialog prism }
                    7 { PrismDialog prism }
                    8 { PrismCmdLoad $1 }
                    9 { PrismCmdLoad $2 }
                    10 { ProcessCmdCVAR0 PrismDestroy }
                    11 { ProcessCmdCVAR0 PrismClear }
                    13 { ProcessCmdCVAR0 PrismImage }
                    16 { PrismCmdRef $2 }
                    17 { PrismCmdExt $1 }
                    18 { PrismCmdExtName $1 }
                    19 { ProcessCmdCVAR3 bar,col $1 bar,num $2 plot,mode $3 PrismHistogramGenerate }
                    20 { ProcessCmdCVAR6 xx $1 yy $2 xerr {} yerr {} plot,type $3 plot,mode $4 PrismPlotGenerate }
                    21 { ProcessCmdCVAR6 xx $1 yy $2 xerr {} yerr $3 plot,type $4 plot,mode $5 PrismPlotGenerate }
                    22 { ProcessCmdCVAR6 xx $1 yy $2 xerr $3 yerr $4 plot,type $5 plot,mode $6 PrismPlotGenerate }
                    23 { set _ line }
                    24 { set _ bar }
                    25 { set _ scatter }
                    26 { set _ newplot }
                    27 { set _ overplot }
                    28 { set _ $1 }
                    29 { set _ $1 }
                    30 { set _ $1 }
                    31 { set _ $1 }
                    32 { set _ $1 }
                    33 { set _ $1 }
                    34 { set _ $1 }
                    35 { set _ $1 }
                }
                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 prism::yyerror {msg} {
     variable yycnt
     variable yy_current_buffer
     variable index_

     ParserError $msg $yycnt $yy_current_buffer $index_
}