1 /* A Bison parser, made by GNU Bison 1.875c. */ 2 3 /* Skeleton parser for Yacc-like parsing with Bison, 4 Copyright (C) 1984, 1989, 1990, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. 5 6 This program is free software; you can redistribute it and/or modify 7 it under the terms of the GNU General Public License as published by 8 the Free Software Foundation; either version 2, or (at your option) 9 any later version. 10 11 This program is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 GNU General Public License for more details. 15 16 You should have received a copy of the GNU General Public License 17 along with this program; if not, write to the Free Software 18 Foundation, Inc., 59 Temple Place - Suite 330, 19 Boston, MA 02111-1307, USA. */ 20 21 /* As a special exception, when this file is copied by Bison into a 22 Bison output file, you may use that output file without restriction. 23 This special exception was added by the Free Software Foundation 24 in version 1.24 of Bison. */ 25 26 /* Tokens. */ 27 #ifndef YYTOKENTYPE 28 # define YYTOKENTYPE 29 /* Put the tokens into the symbol table, so that GDB and other debuggers 30 know about them. */ 31 enum yytokentype { 32 tok_identifier = 258, 33 tok_array_identifier = 259, 34 tok_label = 260, 35 tok_integer_const = 261, 36 tok_real_const = 262, 37 tok_dp_const = 263, 38 tok_quad_const = 264, 39 tok_complex_const = 265, 40 tok_dcomplex_const = 266, 41 tok_logical_const = 267, 42 tok_string = 268, 43 tok_hollerith = 269, 44 tok_edit_descriptor = 270, 45 tok_letter = 271, 46 tok_relop = 272, 47 tok_AND = 273, 48 tok_OR = 274, 49 tok_EQV = 275, 50 tok_NEQV = 276, 51 tok_NOT = 277, 52 tok_power = 278, 53 tok_concat = 279, 54 tok_lparen = 280, 55 tok_pointer_assignment = 281, 56 tok_ACCEPT = 282, 57 tok_ALLOCATABLE = 283, 58 tok_ALLOCATE = 284, 59 tok_ASSIGN = 285, 60 tok_BACKSPACE = 286, 61 tok_BLOCKDATA = 287, 62 tok_BYTE = 288, 63 tok_CALL = 289, 64 tok_CASE = 290, 65 tok_CASEDEFAULT = 291, 66 tok_CHARACTER = 292, 67 tok_CLOSE = 293, 68 tok_COMMON = 294, 69 tok_COMPLEX = 295, 70 tok_CONTINUE = 296, 71 tok_CYCLE = 297, 72 tok_DATA = 298, 73 tok_DEALLOCATE = 299, 74 tok_DIMENSION = 300, 75 tok_DO = 301, 76 tok_DOUBLECOMPLEX = 302, 77 tok_DOUBLEPRECISION = 303, 78 tok_DOWHILE = 304, 79 tok_ELSE = 305, 80 tok_END = 306, 81 tok_ENDBLOCKDATA = 307, 82 tok_ENDDO = 308, 83 tok_ENDFILE = 309, 84 tok_ENDFUNCTION = 310, 85 tok_ENDIF = 311, 86 tok_ENDPROGRAM = 312, 87 tok_ENDSELECT = 313, 88 tok_ENDSUBROUTINE = 314, 89 tok_ENTRY = 315, 90 tok_EQUIVALENCE = 316, 91 tok_EXTERNAL = 317, 92 tok_EXIT = 318, 93 tok_FORMAT = 319, 94 tok_FUNCTION = 320, 95 tok_GOTO = 321, 96 tok_IF = 322, 97 tok_IMPLICIT = 323, 98 tok_INCLUDE = 324, 99 tok_INQUIRE = 325, 100 tok_INTEGER = 326, 101 tok_INTRINSIC = 327, 102 tok_LOGICAL = 328, 103 tok_NAMELIST = 329, 104 tok_NONE = 330, 105 tok_NULLIFY = 331, 106 tok_OPEN = 332, 107 tok_PARAMETER = 333, 108 tok_PAUSE = 334, 109 tok_POINTER = 335, 110 tok_PRINT = 336, 111 tok_PROGRAM = 337, 112 tok_READ = 338, 113 tok_REAL = 339, 114 tok_RETURN = 340, 115 tok_REWIND = 341, 116 tok_SAVE = 342, 117 tok_SELECTCASE = 343, 118 tok_STOP = 344, 119 tok_SUBROUTINE = 345, 120 tok_TARGET = 346, 121 tok_THEN = 347, 122 tok_TO = 348, 123 tok_TYPE = 349, 124 tok_WHILE = 350, 125 tok_WRITE = 351, 126 tok_illegal = 352, 127 tok_empty = 353, 128 EOS = 127, 129 REDUCE = 354 130 }; 131 #endif 132 #define tok_identifier 258 133 #define tok_array_identifier 259 134 #define tok_label 260 135 #define tok_integer_const 261 136 #define tok_real_const 262 137 #define tok_dp_const 263 138 #define tok_quad_const 264 139 #define tok_complex_const 265 140 #define tok_dcomplex_const 266 141 #define tok_logical_const 267 142 #define tok_string 268 143 #define tok_hollerith 269 144 #define tok_edit_descriptor 270 145 #define tok_letter 271 146 #define tok_relop 272 147 #define tok_AND 273 148 #define tok_OR 274 149 #define tok_EQV 275 150 #define tok_NEQV 276 151 #define tok_NOT 277 152 #define tok_power 278 153 #define tok_concat 279 154 #define tok_lparen 280 155 #define tok_pointer_assignment 281 156 #define tok_ACCEPT 282 157 #define tok_ALLOCATABLE 283 158 #define tok_ALLOCATE 284 159 #define tok_ASSIGN 285 160 #define tok_BACKSPACE 286 161 #define tok_BLOCKDATA 287 162 #define tok_BYTE 288 163 #define tok_CALL 289 164 #define tok_CASE 290 165 #define tok_CASEDEFAULT 291 166 #define tok_CHARACTER 292 167 #define tok_CLOSE 293 168 #define tok_COMMON 294 169 #define tok_COMPLEX 295 170 #define tok_CONTINUE 296 171 #define tok_CYCLE 297 172 #define tok_DATA 298 173 #define tok_DEALLOCATE 299 174 #define tok_DIMENSION 300 175 #define tok_DO 301 176 #define tok_DOUBLECOMPLEX 302 177 #define tok_DOUBLEPRECISION 303 178 #define tok_DOWHILE 304 179 #define tok_ELSE 305 180 #define tok_END 306 181 #define tok_ENDBLOCKDATA 307 182 #define tok_ENDDO 308 183 #define tok_ENDFILE 309 184 #define tok_ENDFUNCTION 310 185 #define tok_ENDIF 311 186 #define tok_ENDPROGRAM 312 187 #define tok_ENDSELECT 313 188 #define tok_ENDSUBROUTINE 314 189 #define tok_ENTRY 315 190 #define tok_EQUIVALENCE 316 191 #define tok_EXTERNAL 317 192 #define tok_EXIT 318 193 #define tok_FORMAT 319 194 #define tok_FUNCTION 320 195 #define tok_GOTO 321 196 #define tok_IF 322 197 #define tok_IMPLICIT 323 198 #define tok_INCLUDE 324 199 #define tok_INQUIRE 325 200 #define tok_INTEGER 326 201 #define tok_INTRINSIC 327 202 #define tok_LOGICAL 328 203 #define tok_NAMELIST 329 204 #define tok_NONE 330 205 #define tok_NULLIFY 331 206 #define tok_OPEN 332 207 #define tok_PARAMETER 333 208 #define tok_PAUSE 334 209 #define tok_POINTER 335 210 #define tok_PRINT 336 211 #define tok_PROGRAM 337 212 #define tok_READ 338 213 #define tok_REAL 339 214 #define tok_RETURN 340 215 #define tok_REWIND 341 216 #define tok_SAVE 342 217 #define tok_SELECTCASE 343 218 #define tok_STOP 344 219 #define tok_SUBROUTINE 345 220 #define tok_TARGET 346 221 #define tok_THEN 347 222 #define tok_TO 348 223 #define tok_TYPE 349 224 #define tok_WHILE 350 225 #define tok_WRITE 351 226 #define tok_illegal 352 227 #define tok_empty 353 228 #define EOS 127 229 #define REDUCE 354 230 231 232 233 234 #if ! defined (YYSTYPE) && ! defined (YYSTYPE_IS_DECLARED) 235 typedef int YYSTYPE; 236 # define yystype YYSTYPE /* obsolescent; will be withdrawn */ 237 # define YYSTYPE_IS_DECLARED 1 238 # define YYSTYPE_IS_TRIVIAL 1 239 #endif 240 241 extern YYSTYPE yylval; 242 243 244 245