0000: 2f 2a 20 44 72 69 76 65 72 20 74 65 6d 70 6c 61 /* Driver templa
0010: 74 65 20 66 6f 72 20 74 68 65 20 4c 45 4d 4f 4e te for the LEMON
0020: 20 70 61 72 73 65 72 20 67 65 6e 65 72 61 74 6f parser generato
0030: 72 2e 0a 2a 2a 20 43 6f 70 79 72 69 67 68 74 20 r..** Copyright
0040: 31 39 39 31 2d 31 39 39 35 20 62 79 20 44 2e 20 1991-1995 by D.
0050: 52 69 63 68 61 72 64 20 48 69 70 70 2e 0a 2a 2a Richard Hipp..**
0060: 0a 2a 2a 20 54 68 69 73 20 6c 69 62 72 61 72 79 .** This library
0070: 20 69 73 20 66 72 65 65 20 73 6f 66 74 77 61 72 is free softwar
0080: 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 e; you can redis
0090: 74 72 69 62 75 74 65 20 69 74 20 61 6e 64 2f 6f tribute it and/o
00a0: 72 0a 2a 2a 20 6d 6f 64 69 66 79 20 69 74 20 75 r.** modify it u
00b0: 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f nder the terms o
00c0: 66 20 74 68 65 20 47 4e 55 20 4c 69 62 72 61 72 f the GNU Librar
00d0: 79 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 y General Public
00e0: 0a 2a 2a 20 4c 69 63 65 6e 73 65 20 61 73 20 70 .** License as p
00f0: 75 62 6c 69 73 68 65 64 20 62 79 20 74 68 65 20 ublished by the
0100: 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f Free Software Fo
0110: 75 6e 64 61 74 69 6f 6e 3b 20 65 69 74 68 65 72 undation; either
0120: 0a 2a 2a 20 76 65 72 73 69 6f 6e 20 32 20 6f 66 .** version 2 of
0130: 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 the License, or
0140: 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e (at your option
0150: 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 ) any later vers
0160: 69 6f 6e 2e 0a 2a 2a 20 0a 2a 2a 20 54 68 69 73 ion..** .** This
0170: 20 6c 69 62 72 61 72 79 20 69 73 20 64 69 73 74 library is dist
0180: 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 ributed in the h
0190: 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c ope that it will
01a0: 20 62 65 20 75 73 65 66 75 6c 2c 0a 2a 2a 20 62 be useful,.** b
01b0: 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 ut WITHOUT ANY W
01c0: 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 ARRANTY; without
01d0: 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 even the implie
01e0: 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 2a 2a d warranty of.**
01f0: 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 MERCHANTABILITY
0200: 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 or FITNESS FOR
0210: 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 A PARTICULAR PUR
0220: 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 20 47 POSE. See the G
0230: 4e 55 0a 2a 2a 20 4c 69 62 72 61 72 79 20 47 65 NU.** Library Ge
0240: 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 neral Public Lic
0250: 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 ense for more de
0260: 74 61 69 6c 73 2e 0a 2a 2a 20 0a 2a 2a 20 59 6f tails..** .** Yo
0270: 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 u should have re
0280: 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 ceived a copy of
0290: 20 74 68 65 20 47 4e 55 20 4c 69 62 72 61 72 79 the GNU Library
02a0: 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 0a General Public.
02b0: 2a 2a 20 4c 69 63 65 6e 73 65 20 61 6c 6f 6e 67 ** License along
02c0: 20 77 69 74 68 20 74 68 69 73 20 6c 69 62 72 61 with this libra
02d0: 72 79 3b 20 69 66 20 6e 6f 74 2c 20 77 72 69 74 ry; if not, writ
02e0: 65 20 74 6f 20 74 68 65 0a 2a 2a 20 46 72 65 65 e to the.** Free
02f0: 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 Software Founda
0300: 74 69 6f 6e 2c 20 49 6e 63 2e 2c 20 35 39 20 54 tion, Inc., 59 T
0310: 65 6d 70 6c 65 20 50 6c 61 63 65 20 2d 20 53 75 emple Place - Su
0320: 69 74 65 20 33 33 30 2c 0a 2a 2a 20 42 6f 73 74 ite 330,.** Bost
0330: 6f 6e 2c 20 4d 41 20 20 30 32 31 31 31 2d 31 33 on, MA 02111-13
0340: 30 37 2c 20 55 53 41 2e 0a 2a 2a 0a 2a 2a 20 4d 07, USA..**.** M
0350: 6f 64 69 66 69 65 64 20 31 39 39 37 20 74 6f 20 odified 1997 to
0360: 6d 61 6b 65 20 69 74 20 73 75 69 74 61 62 6c 65 make it suitable
0370: 20 66 6f 72 20 75 73 65 20 77 69 74 68 20 6d 61 for use with ma
0380: 6b 65 68 65 61 64 65 72 73 2e 0a 2a 2f 0a 2f 2a keheaders..*/./*
0390: 20 46 69 72 73 74 20 6f 66 66 2c 20 63 6f 64 65 First off, code
03a0: 20 69 73 20 69 6e 63 6c 75 64 65 20 77 68 69 63 is include whic
03b0: 68 20 66 6f 6c 6c 6f 77 73 20 74 68 65 20 22 69 h follows the "i
03c0: 6e 63 6c 75 64 65 22 20 64 65 63 6c 61 72 61 74 nclude" declarat
03d0: 69 6f 6e 0a 2a 2a 20 69 6e 20 74 68 65 20 69 6e ion.** in the in
03e0: 70 75 74 20 66 69 6c 65 2e 20 2a 2f 0a 23 69 6e put file. */.#in
03f0: 63 6c 75 64 65 20 3c 73 74 64 69 6f 2e 68 3e 0a clude <stdio.h>.
0400: 25 25 0a 2f 2a 20 4e 65 78 74 20 69 73 20 61 6c %%./* Next is al
0410: 6c 20 74 6f 6b 65 6e 20 76 61 6c 75 65 73 2c 20 l token values,
0420: 69 6e 20 61 20 66 6f 72 6d 20 73 75 69 74 61 62 in a form suitab
0430: 6c 65 20 66 6f 72 20 75 73 65 20 62 79 20 6d 61 le for use by ma
0440: 6b 65 68 65 61 64 65 72 73 2e 0a 2a 2a 20 54 68 keheaders..** Th
0450: 69 73 20 73 65 63 74 69 6f 6e 20 77 69 6c 6c 20 is section will
0460: 62 65 20 6e 75 6c 6c 20 75 6e 6c 65 73 73 20 6c be null unless l
0470: 65 6d 6f 6e 20 69 73 20 72 75 6e 20 77 69 74 68 emon is run with
0480: 20 74 68 65 20 2d 6d 20 73 77 69 74 63 68 2e 0a the -m switch..
0490: 2a 2f 0a 2f 2a 20 0a 2a 2a 20 54 68 65 73 65 20 */./* .** These
04a0: 63 6f 6e 73 74 61 6e 74 73 20 28 61 6c 6c 20 67 constants (all g
04b0: 65 6e 65 72 61 74 65 64 20 61 75 74 6f 6d 61 74 enerated automat
04c0: 69 63 61 6c 6c 79 20 62 79 20 74 68 65 20 70 61 ically by the pa
04d0: 72 73 65 72 20 67 65 6e 65 72 61 74 6f 72 29 0a rser generator).
04e0: 2a 2a 20 73 70 65 63 69 66 79 20 74 68 65 20 76 ** specify the v
04f0: 61 72 69 6f 75 73 20 6b 69 6e 64 73 20 6f 66 20 arious kinds of
0500: 74 6f 6b 65 6e 73 20 28 74 65 72 6d 69 6e 61 6c tokens (terminal
0510: 73 29 20 74 68 61 74 20 74 68 65 20 70 61 72 73 s) that the pars
0520: 65 72 0a 2a 2a 20 75 6e 64 65 72 73 74 61 6e 64 er.** understand
0530: 73 2e 20 0a 2a 2a 0a 2a 2a 20 45 61 63 68 20 73 s. .**.** Each s
0540: 79 6d 62 6f 6c 20 68 65 72 65 20 69 73 20 61 20 ymbol here is a
0550: 74 65 72 6d 69 6e 61 6c 20 73 79 6d 62 6f 6c 20 terminal symbol
0560: 69 6e 20 74 68 65 20 67 72 61 6d 6d 61 72 2e 0a in the grammar..
0570: 2a 2f 0a 25 25 0a 2f 2a 20 4d 61 6b 65 20 73 75 */.%%./* Make su
0580: 72 65 20 74 68 65 20 49 4e 54 45 52 46 41 43 45 re the INTERFACE
0590: 20 6d 61 63 72 6f 20 69 73 20 64 65 66 69 6e 65 macro is define
05a0: 64 2e 0a 2a 2f 0a 23 69 66 6e 64 65 66 20 49 4e d..*/.#ifndef IN
05b0: 54 45 52 46 41 43 45 0a 23 20 64 65 66 69 6e 65 TERFACE.# define
05c0: 20 49 4e 54 45 52 46 41 43 45 20 31 0a 23 65 6e INTERFACE 1.#en
05d0: 64 69 66 0a 2f 2a 20 54 68 65 20 6e 65 78 74 20 dif./* The next
05e0: 74 68 69 6e 67 20 69 6e 63 6c 75 64 65 64 20 69 thing included i
05f0: 73 20 73 65 72 69 65 73 20 6f 66 20 64 65 66 69 s series of defi
0600: 6e 65 73 20 77 68 69 63 68 20 63 6f 6e 74 72 6f nes which contro
0610: 6c 0a 2a 2a 20 76 61 72 69 6f 75 73 20 61 73 70 l.** various asp
0620: 65 63 74 73 20 6f 66 20 74 68 65 20 67 65 6e 65 ects of the gene
0630: 72 61 74 65 64 20 70 61 72 73 65 72 2e 0a 2a 2a rated parser..**
0640: 20 20 20 20 59 59 43 4f 44 45 54 59 50 45 20 20 YYCODETYPE
0650: 20 20 20 20 20 20 20 69 73 20 74 68 65 20 64 61 is the da
0660: 74 61 20 74 79 70 65 20 75 73 65 64 20 66 6f 72 ta type used for
0670: 20 73 74 6f 72 69 6e 67 20 74 65 72 6d 69 6e 61 storing termina
0680: 6c 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 l.**
0690: 20 20 20 20 20 20 20 20 20 20 20 61 6e 64 20 6e and n
06a0: 6f 6e 74 65 72 6d 69 6e 61 6c 20 6e 75 6d 62 65 onterminal numbe
06b0: 72 73 2e 20 20 22 75 6e 73 69 67 6e 65 64 20 63 rs. "unsigned c
06c0: 68 61 72 22 20 69 73 0a 2a 2a 20 20 20 20 20 20 har" is.**
06d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
06e0: 20 75 73 65 64 20 69 66 20 74 68 65 72 65 20 61 used if there a
06f0: 72 65 20 66 65 77 65 72 20 74 68 61 6e 20 32 35 re fewer than 25
0700: 30 20 74 65 72 6d 69 6e 61 6c 73 0a 2a 2a 20 20 0 terminals.**
0710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0720: 20 20 20 20 20 61 6e 64 20 6e 6f 6e 74 65 72 6d and nonterm
0730: 69 6e 61 6c 73 2e 20 20 22 69 6e 74 22 20 69 73 inals. "int" is
0740: 20 75 73 65 64 20 6f 74 68 65 72 77 69 73 65 2e used otherwise.
0750: 0a 2a 2a 20 20 20 20 59 59 4e 4f 43 4f 44 45 20 .** YYNOCODE
0760: 20 20 20 20 20 20 20 20 20 20 69 73 20 61 20 6e is a n
0770: 75 6d 62 65 72 20 6f 66 20 74 79 70 65 20 59 59 umber of type YY
0780: 43 4f 44 45 54 59 50 45 20 77 68 69 63 68 20 63 CODETYPE which c
0790: 6f 72 72 65 73 70 6f 6e 64 73 0a 2a 2a 20 20 20 orresponds.**
07a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
07b0: 20 20 20 20 74 6f 20 6e 6f 20 6c 65 67 61 6c 20 to no legal
07c0: 74 65 72 6d 69 6e 61 6c 20 6f 72 20 6e 6f 6e 74 terminal or nont
07d0: 65 72 6d 69 6e 61 6c 20 6e 75 6d 62 65 72 2e 20 erminal number.
07e0: 20 54 68 69 73 0a 2a 2a 20 20 20 20 20 20 20 20 This.**
07f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e n
0800: 75 6d 62 65 72 20 69 73 20 75 73 65 64 20 74 6f umber is used to
0810: 20 66 69 6c 6c 20 69 6e 20 65 6d 70 74 79 20 73 fill in empty s
0820: 6c 6f 74 73 20 6f 66 20 74 68 65 20 68 61 73 68 lots of the hash
0830: 20 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 .**
0840: 20 20 20 20 20 20 20 20 20 20 20 74 61 62 6c 65 table
0850: 2e 0a 2a 2a 20 20 20 20 59 59 41 43 54 49 4f 4e ..** YYACTION
0860: 54 59 50 45 20 20 20 20 20 20 20 69 73 20 74 68 TYPE is th
0870: 65 20 64 61 74 61 20 74 79 70 65 20 75 73 65 64 e data type used
0880: 20 66 6f 72 20 73 74 6f 72 69 6e 67 20 74 65 72 for storing ter
0890: 6d 69 6e 61 6c 0a 2a 2a 20 20 20 20 20 20 20 20 minal.**
08a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 a
08b0: 6e 64 20 6e 6f 6e 74 65 72 6d 69 6e 61 6c 20 6e nd nonterminal n
08c0: 75 6d 62 65 72 73 2e 20 20 22 75 6e 73 69 67 6e umbers. "unsign
08d0: 65 64 20 63 68 61 72 22 20 69 73 0a 2a 2a 20 20 ed char" is.**
08e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
08f0: 20 20 20 20 20 75 73 65 64 20 69 66 20 74 68 65 used if the
0900: 72 65 20 61 72 65 20 66 65 77 65 72 20 74 68 61 re are fewer tha
0910: 6e 20 32 35 30 20 72 75 6c 65 73 20 61 6e 64 0a n 250 rules and.
0920: 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 **
0930: 20 20 20 20 20 20 20 20 20 73 74 61 74 65 73 20 states
0940: 63 6f 6d 62 69 6e 65 64 2e 20 20 22 69 6e 74 22 combined. "int"
0950: 20 69 73 20 75 73 65 64 20 6f 74 68 65 72 77 69 is used otherwi
0960: 73 65 2e 0a 2a 2a 20 20 20 20 50 61 72 73 65 54 se..** ParseT
0970: 4f 4b 45 4e 54 59 50 45 20 20 20 20 20 69 73 20 OKENTYPE is
0980: 74 68 65 20 64 61 74 61 20 74 79 70 65 20 75 73 the data type us
0990: 65 64 20 66 6f 72 20 6d 69 6e 6f 72 20 74 6f 6b ed for minor tok
09a0: 65 6e 73 20 67 69 76 65 6e 20 0a 2a 2a 20 20 20 ens given .**
09b0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
09c0: 20 20 20 20 64 69 72 65 63 74 6c 79 20 74 6f 20 directly to
09d0: 74 68 65 20 70 61 72 73 65 72 20 66 72 6f 6d 20 the parser from
09e0: 74 68 65 20 74 6f 6b 65 6e 69 7a 65 72 2e 0a 2a the tokenizer..*
09f0: 2a 20 20 20 20 59 59 4d 49 4e 4f 52 54 59 50 45 * YYMINORTYPE
0a00: 20 20 20 20 20 20 20 20 69 73 20 74 68 65 20 64 is the d
0a10: 61 74 61 20 74 79 70 65 20 75 73 65 64 20 66 6f ata type used fo
0a20: 72 20 61 6c 6c 20 6d 69 6e 6f 72 20 74 6f 6b 65 r all minor toke
0a30: 6e 73 2e 0a 2a 2a 20 20 20 20 20 20 20 20 20 20 ns..**
0a40: 20 20 20 20 20 20 20 20 20 20 20 20 20 54 68 69 Thi
0a50: 73 20 69 73 20 74 79 70 69 63 61 6c 6c 79 20 61 s is typically a
0a60: 20 75 6e 69 6f 6e 20 6f 66 20 6d 61 6e 79 20 74 union of many t
0a70: 79 70 65 73 2c 20 6f 6e 65 20 6f 66 0a 2a 2a 20 ypes, one of.**
0a80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0a90: 20 20 20 20 20 20 77 68 69 63 68 20 69 73 20 50 which is P
0aa0: 61 72 73 65 54 4f 4b 45 4e 54 59 50 45 2e 20 20 arseTOKENTYPE.
0ab0: 54 68 65 20 65 6e 74 72 79 20 69 6e 20 74 68 65 The entry in the
0ac0: 20 75 6e 69 6f 6e 0a 2a 2a 20 20 20 20 20 20 20 union.**
0ad0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0ae0: 66 6f 72 20 62 61 73 65 20 74 6f 6b 65 6e 73 20 for base tokens
0af0: 69 73 20 63 61 6c 6c 65 64 20 22 79 79 30 22 2e is called "yy0".
0b00: 0a 2a 2a 20 20 20 20 59 59 53 54 41 43 4b 44 45 .** YYSTACKDE
0b10: 50 54 48 20 20 20 20 20 20 20 69 73 20 74 68 65 PTH is the
0b20: 20 6d 61 78 69 6d 75 6d 20 64 65 70 74 68 20 6f maximum depth o
0b30: 66 20 74 68 65 20 70 61 72 73 65 72 27 73 20 73 f the parser's s
0b40: 74 61 63 6b 2e 0a 2a 2a 20 20 20 20 50 61 72 73 tack..** Pars
0b50: 65 41 52 47 44 45 43 4c 20 20 20 20 20 20 20 69 eARGDECL i
0b60: 73 20 61 20 64 65 63 6c 61 72 61 74 69 6f 6e 20 s a declaration
0b70: 6f 66 20 61 20 33 72 64 20 61 72 67 75 6d 65 6e of a 3rd argumen
0b80: 74 20 74 6f 20 74 68 65 0a 2a 2a 20 20 20 20 20 t to the.**
0b90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0ba0: 20 20 70 61 72 73 65 72 2c 20 6f 72 20 6e 75 6c parser, or nul
0bb0: 6c 20 69 66 20 74 68 65 72 65 20 69 73 20 6e 6f l if there is no
0bc0: 20 65 78 74 72 61 20 61 72 67 75 6d 65 6e 74 2e extra argument.
0bd0: 0a 2a 2a 20 20 20 20 50 61 72 73 65 4b 52 41 52 .** ParseKRAR
0be0: 47 44 45 43 4c 20 20 20 20 20 41 20 76 65 72 73 GDECL A vers
0bf0: 69 6f 6e 20 6f 66 20 50 61 72 73 65 41 52 47 44 ion of ParseARGD
0c00: 45 43 4c 20 66 6f 72 20 4b 26 52 20 43 2e 0a 2a ECL for K&R C..*
0c10: 2a 20 20 20 20 50 61 72 73 65 41 4e 53 49 41 52 * ParseANSIAR
0c20: 47 44 45 43 4c 20 20 20 41 20 76 65 72 73 69 6f GDECL A versio
0c30: 6e 20 6f 66 20 50 61 72 73 65 41 52 47 44 45 43 n of ParseARGDEC
0c40: 4c 20 66 6f 72 20 41 4e 53 49 20 43 2e 0a 2a 2a L for ANSI C..**
0c50: 20 20 20 20 59 59 4e 53 54 41 54 45 20 20 20 20 YYNSTATE
0c60: 20 20 20 20 20 20 20 74 68 65 20 63 6f 6d 62 69 the combi
0c70: 6e 65 64 20 6e 75 6d 62 65 72 20 6f 66 20 73 74 ned number of st
0c80: 61 74 65 73 2e 0a 2a 2a 20 20 20 20 59 59 4e 52 ates..** YYNR
0c90: 55 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 74 ULE t
0ca0: 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 72 75 6c he number of rul
0cb0: 65 73 20 69 6e 20 74 68 65 20 67 72 61 6d 6d 61 es in the gramma
0cc0: 72 0a 2a 2a 20 20 20 20 59 59 45 52 52 4f 52 53 r.** YYERRORS
0cd0: 59 4d 42 4f 4c 20 20 20 20 20 20 69 73 20 74 68 YMBOL is th
0ce0: 65 20 63 6f 64 65 20 6e 75 6d 62 65 72 20 6f 66 e code number of
0cf0: 20 74 68 65 20 65 72 72 6f 72 20 73 79 6d 62 6f the error symbo
0d00: 6c 2e 20 20 49 66 20 6e 6f 74 0a 2a 2a 20 20 20 l. If not.**
0d10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
0d20: 20 20 20 20 64 65 66 69 6e 65 64 2c 20 74 68 65 defined, the
0d30: 6e 20 64 6f 20 6e 6f 20 65 72 72 6f 72 20 70 72 n do no error pr
0d40: 6f 63 65 73 73 69 6e 67 2e 0a 2a 2f 0a 25 25 0a ocessing..*/.%%.
0d50: 23 64 65 66 69 6e 65 20 59 59 5f 4e 4f 5f 41 43 #define YY_NO_AC
0d60: 54 49 4f 4e 20 20 20 20 20 20 28 59 59 4e 53 54 TION (YYNST
0d70: 41 54 45 2b 59 59 4e 52 55 4c 45 2b 32 29 0a 23 ATE+YYNRULE+2).#
0d80: 64 65 66 69 6e 65 20 59 59 5f 41 43 43 45 50 54 define YY_ACCEPT
0d90: 5f 41 43 54 49 4f 4e 20 20 28 59 59 4e 53 54 41 _ACTION (YYNSTA
0da0: 54 45 2b 59 59 4e 52 55 4c 45 2b 31 29 0a 23 64 TE+YYNRULE+1).#d
0db0: 65 66 69 6e 65 20 59 59 5f 45 52 52 4f 52 5f 41 efine YY_ERROR_A
0dc0: 43 54 49 4f 4e 20 20 20 28 59 59 4e 53 54 41 54 CTION (YYNSTAT
0dd0: 45 2b 59 59 4e 52 55 4c 45 29 0a 2f 2a 20 4e 65 E+YYNRULE)./* Ne
0de0: 78 74 20 69 73 20 74 68 65 20 61 63 74 69 6f 6e xt is the action
0df0: 20 74 61 62 6c 65 2e 20 20 45 61 63 68 20 65 6e table. Each en
0e00: 74 72 79 20 69 6e 20 74 68 69 73 20 74 61 62 6c try in this tabl
0e10: 65 20 63 6f 6e 74 61 69 6e 73 0a 2a 2a 0a 2a 2a e contains.**.**
0e20: 20 20 2b 20 20 41 6e 20 69 6e 74 65 67 65 72 20 + An integer
0e30: 77 68 69 63 68 20 69 73 20 74 68 65 20 6e 75 6d which is the num
0e40: 62 65 72 20 72 65 70 72 65 73 65 6e 74 69 6e 67 ber representing
0e50: 20 74 68 65 20 6c 6f 6f 6b 2d 61 68 65 61 64 0a the look-ahead.
0e60: 2a 2a 20 20 20 20 20 74 6f 6b 65 6e 0a 2a 2a 0a ** token.**.
0e70: 2a 2a 20 20 2b 20 20 41 6e 20 69 6e 74 65 67 65 ** + An intege
0e80: 72 20 69 6e 64 69 63 61 74 69 6e 67 20 77 68 61 r indicating wha
0e90: 74 20 61 63 74 69 6f 6e 20 74 6f 20 74 61 6b 65 t action to take
0ea0: 2e 20 20 4e 75 6d 62 65 72 20 28 4e 29 20 62 65 . Number (N) be
0eb0: 74 77 65 65 6e 0a 2a 2a 20 20 20 20 20 30 20 61 tween.** 0 a
0ec0: 6e 64 20 59 59 4e 53 54 41 54 45 2d 31 20 6d 65 nd YYNSTATE-1 me
0ed0: 61 6e 20 73 68 69 66 74 20 74 68 65 20 6c 6f 6f an shift the loo
0ee0: 6b 2d 61 68 65 61 64 20 61 6e 64 20 67 6f 20 74 k-ahead and go t
0ef0: 6f 20 73 74 61 74 65 20 4e 2e 0a 2a 2a 20 20 20 o state N..**
0f00: 20 20 4e 75 6d 62 65 72 73 20 62 65 74 77 65 65 Numbers betwee
0f10: 6e 20 59 59 4e 53 54 41 54 45 20 61 6e 64 20 59 n YYNSTATE and Y
0f20: 59 4e 53 54 41 54 45 2b 59 59 4e 52 55 4c 45 2d YNSTATE+YYNRULE-
0f30: 31 20 6d 65 61 6e 20 72 65 64 75 63 65 20 62 79 1 mean reduce by
0f40: 0a 2a 2a 20 20 20 20 20 72 75 6c 65 20 4e 2d 59 .** rule N-Y
0f50: 59 4e 53 54 41 54 45 2e 20 20 4e 75 6d 62 65 72 YNSTATE. Number
0f60: 20 59 59 4e 53 54 41 54 45 2b 59 59 4e 52 55 4c YYNSTATE+YYNRUL
0f70: 45 20 6d 65 61 6e 73 20 74 68 61 74 20 61 20 73 E means that a s
0f80: 79 6e 74 61 78 0a 2a 2a 20 20 20 20 20 65 72 72 yntax.** err
0f90: 6f 72 20 68 61 73 20 6f 63 63 75 72 72 65 64 2e or has occurred.
0fa0: 20 20 4e 75 6d 62 65 72 20 59 59 4e 53 54 41 54 Number YYNSTAT
0fb0: 45 2b 59 59 4e 52 55 4c 45 2b 31 20 6d 65 61 6e E+YYNRULE+1 mean
0fc0: 73 20 74 68 65 20 70 61 72 73 65 72 0a 2a 2a 20 s the parser.**
0fd0: 20 20 20 20 61 63 63 65 70 74 73 20 69 74 73 20 accepts its
0fe0: 69 6e 70 75 74 2e 0a 2a 2a 0a 2a 2a 20 20 2b 20 input..**.** +
0ff0: 20 41 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 A pointer to th
1000: 65 20 6e 65 78 74 20 65 6e 74 72 79 20 77 69 74 e next entry wit
1010: 68 20 74 68 65 20 73 61 6d 65 20 68 61 73 68 20 h the same hash
1020: 76 61 6c 75 65 2e 0a 2a 2a 0a 2a 2a 20 54 68 65 value..**.** The
1030: 20 61 63 74 69 6f 6e 20 74 61 62 6c 65 20 69 73 action table is
1040: 20 72 65 61 6c 6c 79 20 61 20 73 65 72 69 65 73 really a series
1050: 20 6f 66 20 68 61 73 68 20 74 61 62 6c 65 73 2e of hash tables.
1060: 20 20 45 61 63 68 20 68 61 73 68 0a 2a 2a 20 74 Each hash.** t
1070: 61 62 6c 65 20 63 6f 6e 74 61 69 6e 73 20 61 20 able contains a
1080: 6e 75 6d 62 65 72 20 6f 66 20 65 6e 74 72 69 65 number of entrie
1090: 73 20 77 68 69 63 68 20 69 73 20 61 20 70 6f 77 s which is a pow
10a0: 65 72 20 6f 66 20 74 77 6f 2e 20 20 54 68 65 0a er of two. The.
10b0: 2a 2a 20 22 73 74 61 74 65 22 20 74 61 62 6c 65 ** "state" table
10c0: 20 28 77 68 69 63 68 20 66 6f 6c 6c 6f 77 73 29 (which follows)
10d0: 20 63 6f 6e 74 61 69 6e 73 20 69 6e 66 6f 72 6d contains inform
10e0: 61 74 69 6f 6e 20 61 62 6f 75 74 20 74 68 65 20 ation about the
10f0: 73 74 61 72 74 69 6e 67 0a 2a 2a 20 70 6f 69 6e starting.** poin
1100: 74 20 61 6e 64 20 73 69 7a 65 20 6f 66 20 65 61 t and size of ea
1110: 63 68 20 68 61 73 68 20 74 61 62 6c 65 2e 0a 2a ch hash table..*
1120: 2f 0a 73 74 72 75 63 74 20 79 79 41 63 74 69 6f /.struct yyActio
1130: 6e 45 6e 74 72 79 20 7b 0a 20 20 59 59 43 4f 44 nEntry {. YYCOD
1140: 45 54 59 50 45 20 20 20 6c 6f 6f 6b 61 68 65 61 ETYPE lookahea
1150: 64 3b 20 20 20 2f 2a 20 54 68 65 20 76 61 6c 75 d; /* The valu
1160: 65 20 6f 66 20 74 68 65 20 6c 6f 6f 6b 2d 61 68 e of the look-ah
1170: 65 61 64 20 74 6f 6b 65 6e 20 2a 2f 0a 20 20 59 ead token */. Y
1180: 59 41 43 54 49 4f 4e 54 59 50 45 20 61 63 74 69 YACTIONTYPE acti
1190: 6f 6e 3b 20 20 20 20 20 20 2f 2a 20 41 63 74 69 on; /* Acti
11a0: 6f 6e 20 74 6f 20 74 61 6b 65 20 66 6f 72 20 74 on to take for t
11b0: 68 69 73 20 6c 6f 6f 6b 2d 61 68 65 61 64 20 2a his look-ahead *
11c0: 2f 0a 20 20 73 74 72 75 63 74 20 79 79 41 63 74 /. struct yyAct
11d0: 69 6f 6e 45 6e 74 72 79 20 2a 6e 65 78 74 3b 20 ionEntry *next;
11e0: 2f 2a 20 4e 65 78 74 20 6c 6f 6f 6b 2d 61 68 65 /* Next look-ahe
11f0: 61 64 20 77 69 74 68 20 74 68 65 20 73 61 6d 65 ad with the same
1200: 20 68 61 73 68 2c 20 6f 72 20 4e 55 4c 4c 20 2a hash, or NULL *
1210: 2f 0a 7d 3b 0a 73 74 61 74 69 63 20 73 74 72 75 /.};.static stru
1220: 63 74 20 79 79 41 63 74 69 6f 6e 45 6e 74 72 79 ct yyActionEntry
1230: 20 79 79 41 63 74 69 6f 6e 54 61 62 6c 65 5b 5d yyActionTable[]
1240: 20 3d 20 7b 0a 25 25 0a 7d 3b 0a 0a 2f 2a 20 54 = {.%%.};../* T
1250: 68 65 20 73 74 61 74 65 20 74 61 62 6c 65 20 63 he state table c
1260: 6f 6e 74 61 69 6e 73 20 69 6e 66 6f 72 6d 61 74 ontains informat
1270: 69 6f 6e 20 6e 65 65 64 65 64 20 74 6f 20 6c 6f ion needed to lo
1280: 6f 6b 20 75 70 20 74 68 65 20 63 6f 72 72 65 63 ok up the correc
1290: 74 0a 2a 2a 20 61 63 74 69 6f 6e 20 69 6e 20 74 t.** action in t
12a0: 68 65 20 61 63 74 69 6f 6e 20 74 61 62 6c 65 2c he action table,
12b0: 20 67 69 76 65 6e 20 74 68 65 20 63 75 72 72 65 given the curre
12c0: 6e 74 20 73 74 61 74 65 20 6f 66 20 74 68 65 20 nt state of the
12d0: 70 61 72 73 65 72 2e 0a 2a 2a 20 49 6e 66 6f 72 parser..** Infor
12e0: 6d 61 74 69 6f 6e 20 6e 65 65 64 65 64 20 69 6e mation needed in
12f0: 63 6c 75 64 65 73 3a 0a 2a 2a 0a 2a 2a 20 20 2b cludes:.**.** +
1300: 20 20 41 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 A pointer to t
1310: 68 65 20 73 74 61 72 74 20 6f 66 20 74 68 65 20 he start of the
1320: 61 63 74 69 6f 6e 20 68 61 73 68 20 74 61 62 6c action hash tabl
1330: 65 20 69 6e 20 79 79 41 63 74 69 6f 6e 54 61 62 e in yyActionTab
1340: 6c 65 2e 0a 2a 2a 0a 2a 2a 20 20 2b 20 20 41 20 le..**.** + A
1350: 6d 61 73 6b 20 75 73 65 64 20 74 6f 20 68 61 73 mask used to has
1360: 68 20 74 68 65 20 6c 6f 6f 6b 2d 61 68 65 61 64 h the look-ahead
1370: 20 74 6f 6b 65 6e 2e 20 20 54 68 65 20 6d 61 73 token. The mas
1380: 6b 20 69 73 20 61 6e 20 69 6e 74 65 67 65 72 0a k is an integer.
1390: 2a 2a 20 20 20 20 20 77 68 69 63 68 20 69 73 20 ** which is
13a0: 6f 6e 65 20 6c 65 73 73 20 74 68 61 6e 20 74 68 one less than th
13b0: 65 20 73 69 7a 65 20 6f 66 20 74 68 65 20 68 61 e size of the ha
13c0: 73 68 20 74 61 62 6c 65 2e 20 20 0a 2a 2a 0a 2a sh table. .**.*
13d0: 2a 20 20 2b 20 20 54 68 65 20 64 65 66 61 75 6c * + The defaul
13e0: 74 20 61 63 74 69 6f 6e 2e 20 20 54 68 69 73 20 t action. This
13f0: 69 73 20 74 68 65 20 61 63 74 69 6f 6e 20 74 6f is the action to
1400: 20 74 61 6b 65 20 69 66 20 6e 6f 20 65 6e 74 72 take if no entr
1410: 79 20 66 6f 72 0a 2a 2a 20 20 20 20 20 74 68 65 y for.** the
1420: 20 67 69 76 65 6e 20 6c 6f 6f 6b 2d 61 68 65 61 given look-ahea
1430: 64 20 69 73 20 66 6f 75 6e 64 20 69 6e 20 74 68 d is found in th
1440: 65 20 61 63 74 69 6f 6e 20 68 61 73 68 20 74 61 e action hash ta
1450: 62 6c 65 2e 0a 2a 2f 0a 73 74 72 75 63 74 20 79 ble..*/.struct y
1460: 79 53 74 61 74 65 45 6e 74 72 79 20 7b 0a 20 20 yStateEntry {.
1470: 73 74 72 75 63 74 20 79 79 41 63 74 69 6f 6e 45 struct yyActionE
1480: 6e 74 72 79 20 2a 68 61 73 68 74 62 6c 3b 20 2f ntry *hashtbl; /
1490: 2a 20 53 74 61 72 74 20 6f 66 20 74 68 65 20 68 * Start of the h
14a0: 61 73 68 20 74 61 62 6c 65 20 69 6e 20 79 79 41 ash table in yyA
14b0: 63 74 69 6f 6e 54 61 62 6c 65 20 2a 2f 0a 20 20 ctionTable */.
14c0: 69 6e 74 20 6d 61 73 6b 3b 20 20 20 20 20 20 20 int mask;
14d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f /
14e0: 2a 20 4d 61 73 6b 20 75 73 65 64 20 66 6f 72 20 * Mask used for
14f0: 68 61 73 68 69 6e 67 20 74 68 65 20 6c 6f 6f 6b hashing the look
1500: 2d 61 68 65 61 64 20 2a 2f 0a 20 20 59 59 41 43 -ahead */. YYAC
1510: 54 49 4f 4e 54 59 50 45 20 61 63 74 69 6f 6e 44 TIONTYPE actionD
1520: 65 66 61 75 6c 74 3b 20 20 20 20 2f 2a 20 44 65 efault; /* De
1530: 66 61 75 6c 74 20 61 63 74 69 6f 6e 20 69 66 20 fault action if
1540: 6c 6f 6f 6b 2d 61 68 65 61 64 20 6e 6f 74 20 66 look-ahead not f
1550: 6f 75 6e 64 20 2a 2f 0a 7d 3b 0a 73 74 61 74 69 ound */.};.stati
1560: 63 20 73 74 72 75 63 74 20 79 79 53 74 61 74 65 c struct yyState
1570: 45 6e 74 72 79 20 79 79 53 74 61 74 65 54 61 62 Entry yyStateTab
1580: 6c 65 5b 5d 20 3d 20 7b 0a 25 25 0a 7d 3b 0a 0a le[] = {.%%.};..
1590: 2f 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 /* The following
15a0: 20 73 74 72 75 63 74 75 72 65 20 72 65 70 72 65 structure repre
15b0: 73 65 6e 74 73 20 61 20 73 69 6e 67 6c 65 20 65 sents a single e
15c0: 6c 65 6d 65 6e 74 20 6f 66 20 74 68 65 0a 2a 2a lement of the.**
15d0: 20 70 61 72 73 65 72 27 73 20 73 74 61 63 6b 2e parser's stack.
15e0: 20 20 49 6e 66 6f 72 6d 61 74 69 6f 6e 20 73 74 Information st
15f0: 6f 72 65 64 20 69 6e 63 6c 75 64 65 73 3a 0a 2a ored includes:.*
1600: 2a 0a 2a 2a 20 20 20 2b 20 20 54 68 65 20 73 74 *.** + The st
1610: 61 74 65 20 6e 75 6d 62 65 72 20 66 6f 72 20 74 ate number for t
1620: 68 65 20 70 61 72 73 65 72 20 61 74 20 74 68 69 he parser at thi
1630: 73 20 6c 65 76 65 6c 20 6f 66 20 74 68 65 20 73 s level of the s
1640: 74 61 63 6b 2e 0a 2a 2a 0a 2a 2a 20 20 20 2b 20 tack..**.** +
1650: 20 54 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 The value of th
1660: 65 20 74 6f 6b 65 6e 20 73 74 6f 72 65 64 20 61 e token stored a
1670: 74 20 74 68 69 73 20 6c 65 76 65 6c 20 6f 66 20 t this level of
1680: 74 68 65 20 73 74 61 63 6b 2e 0a 2a 2a 20 20 20 the stack..**
1690: 20 20 20 28 49 6e 20 6f 74 68 65 72 20 77 6f 72 (In other wor
16a0: 64 73 2c 20 74 68 65 20 22 6d 61 6a 6f 72 22 20 ds, the "major"
16b0: 74 6f 6b 65 6e 2e 29 0a 2a 2a 0a 2a 2a 20 20 20 token.).**.**
16c0: 2b 20 20 54 68 65 20 73 65 6d 61 6e 74 69 63 20 + The semantic
16d0: 76 61 6c 75 65 20 73 74 6f 72 65 64 20 61 74 20 value stored at
16e0: 74 68 69 73 20 6c 65 76 65 6c 20 6f 66 20 74 68 this level of th
16f0: 65 20 73 74 61 63 6b 2e 20 20 54 68 69 73 20 69 e stack. This i
1700: 73 0a 2a 2a 20 20 20 20 20 20 74 68 65 20 69 6e s.** the in
1710: 66 6f 72 6d 61 74 69 6f 6e 20 75 73 65 64 20 62 formation used b
1720: 79 20 74 68 65 20 61 63 74 69 6f 6e 20 72 6f 75 y the action rou
1730: 74 69 6e 65 73 20 69 6e 20 74 68 65 20 67 72 61 tines in the gra
1740: 6d 6d 61 72 2e 0a 2a 2a 20 20 20 20 20 20 49 74 mmar..** It
1750: 20 69 73 20 73 6f 6d 65 74 69 6d 65 73 20 63 61 is sometimes ca
1760: 6c 6c 65 64 20 74 68 65 20 22 6d 69 6e 6f 72 22 lled the "minor"
1770: 20 74 6f 6b 65 6e 2e 0a 2a 2f 0a 73 74 72 75 63 token..*/.struc
1780: 74 20 79 79 53 74 61 63 6b 45 6e 74 72 79 20 7b t yyStackEntry {
1790: 0a 20 20 69 6e 74 20 73 74 61 74 65 6e 6f 3b 20 . int stateno;
17a0: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 73 74 61 /* The sta
17b0: 74 65 2d 6e 75 6d 62 65 72 20 2a 2f 0a 20 20 69 te-number */. i
17c0: 6e 74 20 6d 61 6a 6f 72 3b 20 20 20 20 20 20 20 nt major;
17d0: 20 20 2f 2a 20 54 68 65 20 6d 61 6a 6f 72 20 74 /* The major t
17e0: 6f 6b 65 6e 20 76 61 6c 75 65 2e 20 20 54 68 69 oken value. Thi
17f0: 73 20 69 73 20 74 68 65 20 63 6f 64 65 0a 20 20 s is the code.
1800: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1810: 20 20 20 2a 2a 20 6e 75 6d 62 65 72 20 66 6f 72 ** number for
1820: 20 74 68 65 20 74 6f 6b 65 6e 20 61 74 20 74 68 the token at th
1830: 69 73 20 73 74 61 63 6b 20 6c 65 76 65 6c 20 2a is stack level *
1840: 2f 0a 20 20 59 59 4d 49 4e 4f 52 54 59 50 45 20 /. YYMINORTYPE
1850: 6d 69 6e 6f 72 3b 20 2f 2a 20 54 68 65 20 75 73 minor; /* The us
1860: 65 72 2d 73 75 70 70 6c 69 65 64 20 6d 69 6e 6f er-supplied mino
1870: 72 20 74 6f 6b 65 6e 20 76 61 6c 75 65 2e 20 20 r token value.
1880: 54 68 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 This.
1890: 20 20 20 20 20 20 20 20 20 20 2a 2a 20 69 73 20 ** is
18a0: 74 68 65 20 76 61 6c 75 65 20 6f 66 20 74 68 65 the value of the
18b0: 20 74 6f 6b 65 6e 20 20 2a 2f 0a 7d 3b 0a 0a 2f token */.};../
18c0: 2a 20 54 68 65 20 73 74 61 74 65 20 6f 66 20 74 * The state of t
18d0: 68 65 20 70 61 72 73 65 72 20 69 73 20 63 6f 6d he parser is com
18e0: 70 6c 65 74 65 6c 79 20 63 6f 6e 74 61 69 6e 65 pletely containe
18f0: 64 20 69 6e 20 61 6e 20 69 6e 73 74 61 6e 63 65 d in an instance
1900: 20 6f 66 0a 2a 2a 20 74 68 65 20 66 6f 6c 6c 6f of.** the follo
1910: 77 69 6e 67 20 73 74 72 75 63 74 75 72 65 20 2a wing structure *
1920: 2f 0a 73 74 72 75 63 74 20 79 79 50 61 72 73 65 /.struct yyParse
1930: 72 20 7b 0a 20 20 69 6e 74 20 69 64 78 3b 20 20 r {. int idx;
1940: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
1950: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 49 6e 64 /* Ind
1960: 65 78 20 6f 66 20 74 6f 70 20 65 6c 65 6d 65 6e ex of top elemen
1970: 74 20 69 6e 20 73 74 61 63 6b 20 2a 2f 0a 20 20 t in stack */.
1980: 69 6e 74 20 65 72 72 63 6e 74 3b 20 20 20 20 20 int errcnt;
1990: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
19a0: 20 20 20 20 2f 2a 20 53 68 69 66 74 73 20 6c 65 /* Shifts le
19b0: 66 74 20 62 65 66 6f 72 65 20 6f 75 74 20 6f 66 ft before out of
19c0: 20 74 68 65 20 65 72 72 6f 72 20 2a 2f 0a 20 20 the error */.
19d0: 73 74 72 75 63 74 20 79 79 53 74 61 63 6b 45 6e struct yyStackEn
19e0: 74 72 79 20 2a 74 6f 70 3b 20 20 20 20 20 20 20 try *top;
19f0: 20 20 20 20 2f 2a 20 50 6f 69 6e 74 65 72 20 74 /* Pointer t
1a00: 6f 20 74 68 65 20 74 6f 70 20 73 74 61 63 6b 20 o the top stack
1a10: 65 6c 65 6d 65 6e 74 20 2a 2f 0a 20 20 73 74 72 element */. str
1a20: 75 63 74 20 79 79 53 74 61 63 6b 45 6e 74 72 79 uct yyStackEntry
1a30: 20 73 74 61 63 6b 5b 59 59 53 54 41 43 4b 44 45 stack[YYSTACKDE
1a40: 50 54 48 5d 3b 20 20 2f 2a 20 54 68 65 20 70 61 PTH]; /* The pa
1a50: 72 73 65 72 27 73 20 73 74 61 63 6b 20 2a 2f 0a rser's stack */.
1a60: 7d 3b 0a 74 79 70 65 64 65 66 20 73 74 72 75 63 };.typedef struc
1a70: 74 20 79 79 50 61 72 73 65 72 20 79 79 50 61 72 t yyParser yyPar
1a80: 73 65 72 3b 0a 0a 23 69 66 6e 64 65 66 20 4e 44 ser;..#ifndef ND
1a90: 45 42 55 47 0a 23 69 6e 63 6c 75 64 65 20 3c 73 EBUG.#include <s
1aa0: 74 64 69 6f 2e 68 3e 0a 73 74 61 74 69 63 20 46 tdio.h>.static F
1ab0: 49 4c 45 20 2a 79 79 54 72 61 63 65 46 49 4c 45 ILE *yyTraceFILE
1ac0: 20 3d 20 30 3b 0a 73 74 61 74 69 63 20 63 68 61 = 0;.static cha
1ad0: 72 20 2a 79 79 54 72 61 63 65 50 72 6f 6d 70 74 r *yyTracePrompt
1ae0: 20 3d 20 30 3b 0a 0a 2f 2a 20 0a 2a 2a 20 54 75 = 0;../* .** Tu
1af0: 72 6e 20 70 61 72 73 65 72 20 74 72 61 63 69 6e rn parser tracin
1b00: 67 20 6f 6e 20 62 79 20 67 69 76 69 6e 67 20 61 g on by giving a
1b10: 20 73 74 72 65 61 6d 20 74 6f 20 77 68 69 63 68 stream to which
1b20: 20 74 6f 20 77 72 69 74 65 20 74 68 65 20 74 72 to write the tr
1b30: 61 63 65 0a 2a 2a 20 61 6e 64 20 61 20 70 72 6f ace.** and a pro
1b40: 6d 70 74 20 74 6f 20 70 72 65 66 61 63 65 20 65 mpt to preface e
1b50: 61 63 68 20 74 72 61 63 65 20 6d 65 73 73 61 67 ach trace messag
1b60: 65 2e 20 20 54 72 61 63 69 6e 67 20 69 73 20 74 e. Tracing is t
1b70: 75 72 6e 65 64 20 6f 66 66 0a 2a 2a 20 62 79 20 urned off.** by
1b80: 6d 61 6b 69 6e 67 20 65 69 74 68 65 72 20 61 72 making either ar
1b90: 67 75 6d 65 6e 74 20 4e 55 4c 4c 20 0a 2a 2a 0a gument NULL .**.
1ba0: 2a 2a 20 49 6e 70 75 74 73 3a 0a 2a 2a 20 3c 75 ** Inputs:.** <u
1bb0: 6c 3e 0a 2a 2a 20 3c 6c 69 3e 20 41 20 46 49 4c l>.** <li> A FIL
1bc0: 45 2a 20 74 6f 20 77 68 69 63 68 20 74 72 61 63 E* to which trac
1bd0: 65 20 6f 75 74 70 75 74 20 73 68 6f 75 6c 64 20 e output should
1be0: 62 65 20 77 72 69 74 74 65 6e 2e 0a 2a 2a 20 20 be written..**
1bf0: 20 20 20 20 49 66 20 4e 55 4c 4c 2c 20 74 68 65 If NULL, the
1c00: 6e 20 74 72 61 63 69 6e 67 20 69 73 20 74 75 72 n tracing is tur
1c10: 6e 65 64 20 6f 66 66 2e 0a 2a 2a 20 3c 6c 69 3e ned off..** <li>
1c20: 20 41 20 70 72 65 66 69 78 20 73 74 72 69 6e 67 A prefix string
1c30: 20 77 72 69 74 74 65 6e 20 61 74 20 74 68 65 20 written at the
1c40: 62 65 67 69 6e 6e 69 6e 67 20 6f 66 20 65 76 65 beginning of eve
1c50: 72 79 0a 2a 2a 20 20 20 20 20 20 6c 69 6e 65 20 ry.** line
1c60: 6f 66 20 74 72 61 63 65 20 6f 75 74 70 75 74 2e of trace output.
1c70: 20 20 49 66 20 4e 55 4c 4c 2c 20 74 68 65 6e 20 If NULL, then
1c80: 74 72 61 63 69 6e 67 20 69 73 0a 2a 2a 20 20 20 tracing is.**
1c90: 20 20 20 74 75 72 6e 65 64 20 6f 66 66 2e 0a 2a turned off..*
1ca0: 2a 20 3c 2f 75 6c 3e 0a 2a 2a 0a 2a 2a 20 4f 75 * </ul>.**.** Ou
1cb0: 74 70 75 74 73 3a 0a 2a 2a 20 4e 6f 6e 65 2e 0a tputs:.** None..
1cc0: 2a 2f 0a 76 6f 69 64 20 50 61 72 73 65 54 72 61 */.void ParseTra
1cd0: 63 65 28 46 49 4c 45 20 2a 54 72 61 63 65 46 49 ce(FILE *TraceFI
1ce0: 4c 45 2c 20 63 68 61 72 20 2a 7a 54 72 61 63 65 LE, char *zTrace
1cf0: 50 72 6f 6d 70 74 29 7b 0a 20 20 79 79 54 72 61 Prompt){. yyTra
1d00: 63 65 46 49 4c 45 20 3d 20 54 72 61 63 65 46 49 ceFILE = TraceFI
1d10: 4c 45 3b 0a 20 20 79 79 54 72 61 63 65 50 72 6f LE;. yyTracePro
1d20: 6d 70 74 20 3d 20 7a 54 72 61 63 65 50 72 6f 6d mpt = zTraceProm
1d30: 70 74 3b 0a 20 20 69 66 28 20 79 79 54 72 61 63 pt;. if( yyTrac
1d40: 65 46 49 4c 45 3d 3d 30 20 29 20 79 79 54 72 61 eFILE==0 ) yyTra
1d50: 63 65 50 72 6f 6d 70 74 20 3d 20 30 3b 0a 20 20 cePrompt = 0;.
1d60: 65 6c 73 65 20 69 66 28 20 79 79 54 72 61 63 65 else if( yyTrace
1d70: 50 72 6f 6d 70 74 3d 3d 30 20 29 20 79 79 54 72 Prompt==0 ) yyTr
1d80: 61 63 65 46 49 4c 45 20 3d 20 30 3b 0a 7d 0a 0a aceFILE = 0;.}..
1d90: 2f 2a 20 46 6f 72 20 74 72 61 63 69 6e 67 20 73 /* For tracing s
1da0: 68 69 66 74 73 2c 20 74 68 65 20 6e 61 6d 65 73 hifts, the names
1db0: 20 6f 66 20 61 6c 6c 20 74 65 72 6d 69 6e 61 6c of all terminal
1dc0: 73 20 61 6e 64 20 6e 6f 6e 74 65 72 6d 69 6e 61 s and nontermina
1dd0: 6c 73 0a 2a 2a 20 61 72 65 20 72 65 71 75 69 72 ls.** are requir
1de0: 65 64 2e 20 20 54 68 65 20 66 6f 6c 6c 6f 77 69 ed. The followi
1df0: 6e 67 20 74 61 62 6c 65 20 73 75 70 70 6c 69 65 ng table supplie
1e00: 73 20 74 68 65 73 65 20 6e 61 6d 65 73 20 2a 2f s these names */
1e10: 0a 73 74 61 74 69 63 20 63 68 61 72 20 2a 79 79 .static char *yy
1e20: 54 6f 6b 65 6e 4e 61 6d 65 5b 5d 20 3d 20 7b 20 TokenName[] = {
1e30: 0a 25 25 0a 7d 3b 0a 23 64 65 66 69 6e 65 20 59 .%%.};.#define Y
1e40: 59 54 52 41 43 45 28 58 29 20 69 66 28 20 79 79 YTRACE(X) if( yy
1e50: 54 72 61 63 65 46 49 4c 45 20 29 20 66 70 72 69 TraceFILE ) fpri
1e60: 6e 74 66 28 79 79 54 72 61 63 65 46 49 4c 45 2c ntf(yyTraceFILE,
1e70: 22 25 73 52 65 64 75 63 65 20 5b 25 73 5d 2e 5c "%sReduce [%s].\
1e80: 6e 22 2c 79 79 54 72 61 63 65 50 72 6f 6d 70 74 n",yyTracePrompt
1e90: 2c 58 29 3b 0a 23 65 6c 73 65 0a 23 64 65 66 69 ,X);.#else.#defi
1ea0: 6e 65 20 59 59 54 52 41 43 45 28 58 29 0a 23 65 ne YYTRACE(X).#e
1eb0: 6e 64 69 66 0a 0a 0a 2f 2a 0a 2a 2a 20 54 68 69 ndif.../*.** Thi
1ec0: 73 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 s function retur
1ed0: 6e 73 20 74 68 65 20 73 79 6d 62 6f 6c 69 63 20 ns the symbolic
1ee0: 6e 61 6d 65 20 61 73 73 6f 63 69 61 74 65 64 20 name associated
1ef0: 77 69 74 68 20 61 20 74 6f 6b 65 6e 0a 2a 2a 20 with a token.**
1f00: 76 61 6c 75 65 2e 0a 2a 2f 0a 63 6f 6e 73 74 20 value..*/.const
1f10: 63 68 61 72 20 2a 50 61 72 73 65 54 6f 6b 65 6e char *ParseToken
1f20: 4e 61 6d 65 28 69 6e 74 20 74 6f 6b 65 6e 54 79 Name(int tokenTy
1f30: 70 65 29 7b 0a 23 69 66 6e 64 65 66 20 4e 44 45 pe){.#ifndef NDE
1f40: 42 55 47 0a 20 20 69 66 28 20 74 6f 6b 65 6e 54 BUG. if( tokenT
1f50: 79 70 65 3e 30 20 26 26 20 74 6f 6b 65 6e 54 79 ype>0 && tokenTy
1f60: 70 65 3c 28 73 69 7a 65 6f 66 28 79 79 54 6f 6b pe<(sizeof(yyTok
1f70: 65 6e 4e 61 6d 65 29 2f 73 69 7a 65 6f 66 28 79 enName)/sizeof(y
1f80: 79 54 6f 6b 65 6e 4e 61 6d 65 5b 30 5d 29 29 20 yTokenName[0]))
1f90: 29 7b 0a 20 20 20 20 72 65 74 75 72 6e 20 79 79 ){. return yy
1fa0: 54 6f 6b 65 6e 4e 61 6d 65 5b 74 6f 6b 65 6e 54 TokenName[tokenT
1fb0: 79 70 65 5d 3b 0a 20 20 7d 65 6c 73 65 7b 0a 20 ype];. }else{.
1fc0: 20 20 20 72 65 74 75 72 6e 20 22 55 6e 6b 6e 6f return "Unkno
1fd0: 77 6e 22 3b 0a 20 20 7d 0a 23 65 6c 73 65 0a 20 wn";. }.#else.
1fe0: 20 72 65 74 75 72 6e 20 22 22 3b 0a 23 65 6e 64 return "";.#end
1ff0: 69 66 0a 7d 0a 0a 2f 2a 20 0a 2a 2a 20 54 68 69 if.}../* .** Thi
2000: 73 20 66 75 6e 63 74 69 6f 6e 20 61 6c 6c 6f 63 s function alloc
2010: 61 74 65 73 20 61 20 6e 65 77 20 70 61 72 73 65 ates a new parse
2020: 72 2e 0a 2a 2a 20 54 68 65 20 6f 6e 6c 79 20 61 r..** The only a
2030: 72 67 75 6d 65 6e 74 20 69 73 20 61 20 70 6f 69 rgument is a poi
2040: 6e 74 65 72 20 74 6f 20 61 20 66 75 6e 63 74 69 nter to a functi
2050: 6f 6e 20 77 68 69 63 68 20 77 6f 72 6b 73 20 6c on which works l
2060: 69 6b 65 0a 2a 2a 20 6d 61 6c 6c 6f 63 2e 0a 2a ike.** malloc..*
2070: 2a 0a 2a 2a 20 49 6e 70 75 74 73 3a 0a 2a 2a 20 *.** Inputs:.**
2080: 41 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 65 A pointer to the
2090: 20 66 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 74 function used t
20a0: 6f 20 61 6c 6c 6f 63 61 74 65 20 6d 65 6d 6f 72 o allocate memor
20b0: 79 2e 0a 2a 2a 0a 2a 2a 20 4f 75 74 70 75 74 73 y..**.** Outputs
20c0: 3a 0a 2a 2a 20 41 20 70 6f 69 6e 74 65 72 20 74 :.** A pointer t
20d0: 6f 20 61 20 70 61 72 73 65 72 2e 20 20 54 68 69 o a parser. Thi
20e0: 73 20 70 6f 69 6e 74 65 72 20 69 73 20 75 73 65 s pointer is use
20f0: 64 20 69 6e 20 73 75 62 73 65 71 75 65 6e 74 20 d in subsequent
2100: 63 61 6c 6c 73 0a 2a 2a 20 74 6f 20 50 61 72 73 calls.** to Pars
2110: 65 20 61 6e 64 20 50 61 72 73 65 46 72 65 65 2e e and ParseFree.
2120: 0a 2a 2f 0a 76 6f 69 64 20 2a 50 61 72 73 65 41 .*/.void *ParseA
2130: 6c 6c 6f 63 28 76 6f 69 64 20 2a 28 2a 6d 61 6c lloc(void *(*mal
2140: 6c 6f 63 50 72 6f 63 29 28 69 6e 74 29 29 7b 0a locProc)(int)){.
2150: 20 20 79 79 50 61 72 73 65 72 20 2a 70 50 61 72 yyParser *pPar
2160: 73 65 72 3b 0a 20 20 70 50 61 72 73 65 72 20 3d ser;. pParser =
2170: 20 28 79 79 50 61 72 73 65 72 2a 29 28 2a 6d 61 (yyParser*)(*ma
2180: 6c 6c 6f 63 50 72 6f 63 29 28 20 28 69 6e 74 29 llocProc)( (int)
2190: 73 69 7a 65 6f 66 28 79 79 50 61 72 73 65 72 29 sizeof(yyParser)
21a0: 20 29 3b 0a 20 20 69 66 28 20 70 50 61 72 73 65 );. if( pParse
21b0: 72 20 29 7b 0a 20 20 20 20 70 50 61 72 73 65 72 r ){. pParser
21c0: 2d 3e 69 64 78 20 3d 20 2d 31 3b 0a 20 20 7d 0a ->idx = -1;. }.
21d0: 20 20 72 65 74 75 72 6e 20 70 50 61 72 73 65 72 return pParser
21e0: 3b 0a 7d 0a 0a 2f 2a 20 54 68 65 20 66 6f 6c 6c ;.}../* The foll
21f0: 6f 77 69 6e 67 20 66 75 6e 63 74 69 6f 6e 20 64 owing function d
2200: 65 6c 65 74 65 73 20 74 68 65 20 76 61 6c 75 65 eletes the value
2210: 20 61 73 73 6f 63 69 61 74 65 64 20 77 69 74 68 associated with
2220: 20 61 0a 2a 2a 20 73 79 6d 62 6f 6c 2e 20 20 54 a.** symbol. T
2230: 68 65 20 73 79 6d 62 6f 6c 20 63 61 6e 20 62 65 he symbol can be
2240: 20 65 69 74 68 65 72 20 61 20 74 65 72 6d 69 6e either a termin
2250: 61 6c 20 6f 72 20 6e 6f 6e 74 65 72 6d 69 6e 61 al or nontermina
2260: 6c 2e 0a 2a 2a 20 22 79 79 6d 61 6a 6f 72 22 20 l..** "yymajor"
2270: 69 73 20 74 68 65 20 73 79 6d 62 6f 6c 20 63 6f is the symbol co
2280: 64 65 2c 20 61 6e 64 20 22 79 79 70 6d 69 6e 6f de, and "yypmino
2290: 72 22 20 69 73 20 61 20 70 6f 69 6e 74 65 72 20 r" is a pointer
22a0: 74 6f 0a 2a 2a 20 74 68 65 20 76 61 6c 75 65 2e to.** the value.
22b0: 0a 2a 2f 0a 73 74 61 74 69 63 20 76 6f 69 64 20 .*/.static void
22c0: 79 79 5f 64 65 73 74 72 75 63 74 6f 72 28 59 59 yy_destructor(YY
22d0: 43 4f 44 45 54 59 50 45 20 79 79 6d 61 6a 6f 72 CODETYPE yymajor
22e0: 2c 20 59 59 4d 49 4e 4f 52 54 59 50 45 20 2a 79 , YYMINORTYPE *y
22f0: 79 70 6d 69 6e 6f 72 29 7b 0a 20 20 73 77 69 74 ypminor){. swit
2300: 63 68 28 20 79 79 6d 61 6a 6f 72 20 29 7b 0a 20 ch( yymajor ){.
2310: 20 20 20 2f 2a 20 48 65 72 65 20 69 73 20 69 6e /* Here is in
2320: 73 65 72 74 65 64 20 74 68 65 20 61 63 74 69 6f serted the actio
2330: 6e 73 20 77 68 69 63 68 20 74 61 6b 65 20 70 6c ns which take pl
2340: 61 63 65 20 77 68 65 6e 20 61 0a 20 20 20 20 2a ace when a. *
2350: 2a 20 74 65 72 6d 69 6e 61 6c 20 6f 72 20 6e 6f * terminal or no
2360: 6e 2d 74 65 72 6d 69 6e 61 6c 20 69 73 20 64 65 n-terminal is de
2370: 73 74 72 6f 79 65 64 2e 20 20 54 68 69 73 20 63 stroyed. This c
2380: 61 6e 20 68 61 70 70 65 6e 0a 20 20 20 20 2a 2a an happen. **
2390: 20 77 68 65 6e 20 74 68 65 20 73 79 6d 62 6f 6c when the symbol
23a0: 20 69 73 20 70 6f 70 70 65 64 20 66 72 6f 6d 20 is popped from
23b0: 74 68 65 20 73 74 61 63 6b 20 64 75 72 69 6e 67 the stack during
23c0: 20 61 0a 20 20 20 20 2a 2a 20 72 65 64 75 63 65 a. ** reduce
23d0: 20 6f 72 20 64 75 72 69 6e 67 20 65 72 72 6f 72 or during error
23e0: 20 70 72 6f 63 65 73 73 69 6e 67 20 6f 72 20 77 processing or w
23f0: 68 65 6e 20 61 20 70 61 72 73 65 72 20 69 73 20 hen a parser is
2400: 0a 20 20 20 20 2a 2a 20 62 65 69 6e 67 20 64 65 . ** being de
2410: 73 74 72 6f 79 65 64 20 62 65 66 6f 72 65 20 69 stroyed before i
2420: 74 20 69 73 20 66 69 6e 69 73 68 65 64 20 70 61 t is finished pa
2430: 72 73 69 6e 67 2e 0a 20 20 20 20 2a 2a 0a 20 20 rsing.. **.
2440: 20 20 2a 2a 20 4e 6f 74 65 3a 20 64 75 72 69 6e ** Note: durin
2450: 67 20 61 20 72 65 64 75 63 65 2c 20 74 68 65 20 g a reduce, the
2460: 6f 6e 6c 79 20 73 79 6d 62 6f 6c 73 20 64 65 73 only symbols des
2470: 74 72 6f 79 65 64 20 61 72 65 20 74 68 6f 73 65 troyed are those
2480: 0a 20 20 20 20 2a 2a 20 77 68 69 63 68 20 61 70 . ** which ap
2490: 70 65 61 72 20 6f 6e 20 74 68 65 20 52 48 53 20 pear on the RHS
24a0: 6f 66 20 74 68 65 20 72 75 6c 65 2c 20 62 75 74 of the rule, but
24b0: 20 77 68 69 63 68 20 61 72 65 20 6e 6f 74 20 75 which are not u
24c0: 73 65 64 0a 20 20 20 20 2a 2a 20 69 6e 73 69 64 sed. ** insid
24d0: 65 20 74 68 65 20 43 20 63 6f 64 65 2e 0a 20 20 e the C code..
24e0: 20 20 2a 2f 0a 25 25 0a 20 20 20 20 64 65 66 61 */.%%. defa
24f0: 75 6c 74 3a 20 20 62 72 65 61 6b 3b 20 20 20 2f ult: break; /
2500: 2a 20 49 66 20 6e 6f 20 64 65 73 74 72 75 63 74 * If no destruct
2510: 6f 72 20 61 63 74 69 6f 6e 20 73 70 65 63 69 66 or action specif
2520: 69 65 64 3a 20 64 6f 20 6e 6f 74 68 69 6e 67 20 ied: do nothing
2530: 2a 2f 0a 20 20 7d 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 */. }.}../*.**
2540: 50 6f 70 20 74 68 65 20 70 61 72 73 65 72 27 73 Pop the parser's
2550: 20 73 74 61 63 6b 20 6f 6e 63 65 2e 0a 2a 2a 0a stack once..**.
2560: 2a 2a 20 49 66 20 74 68 65 72 65 20 69 73 20 61 ** If there is a
2570: 20 64 65 73 74 72 75 63 74 6f 72 20 72 6f 75 74 destructor rout
2580: 69 6e 65 20 61 73 73 6f 63 69 61 74 65 64 20 77 ine associated w
2590: 69 74 68 20 74 68 65 20 74 6f 6b 65 6e 20 77 68 ith the token wh
25a0: 69 63 68 0a 2a 2a 20 69 73 20 70 6f 70 70 65 64 ich.** is popped
25b0: 20 66 72 6f 6d 20 74 68 65 20 73 74 61 63 6b 2c from the stack,
25c0: 20 74 68 65 6e 20 63 61 6c 6c 20 69 74 2e 0a 2a then call it..*
25d0: 2a 0a 2a 2a 20 52 65 74 75 72 6e 20 74 68 65 20 *.** Return the
25e0: 6d 61 6a 6f 72 20 74 6f 6b 65 6e 20 6e 75 6d 62 major token numb
25f0: 65 72 20 66 6f 72 20 74 68 65 20 73 79 6d 62 6f er for the symbo
2600: 6c 20 70 6f 70 70 65 64 2e 0a 2a 2f 0a 73 74 61 l popped..*/.sta
2610: 74 69 63 20 69 6e 74 20 79 79 5f 70 6f 70 5f 70 tic int yy_pop_p
2620: 61 72 73 65 72 5f 73 74 61 63 6b 28 79 79 50 61 arser_stack(yyPa
2630: 72 73 65 72 20 2a 70 50 61 72 73 65 72 29 7b 0a rser *pParser){.
2640: 20 20 59 59 43 4f 44 45 54 59 50 45 20 79 79 6d YYCODETYPE yym
2650: 61 6a 6f 72 3b 0a 0a 20 20 69 66 28 20 70 50 61 ajor;.. if( pPa
2660: 72 73 65 72 2d 3e 69 64 78 3c 30 20 29 20 72 65 rser->idx<0 ) re
2670: 74 75 72 6e 20 30 3b 0a 23 69 66 6e 64 65 66 20 turn 0;.#ifndef
2680: 4e 44 45 42 55 47 0a 20 20 69 66 28 20 79 79 54 NDEBUG. if( yyT
2690: 72 61 63 65 46 49 4c 45 20 26 26 20 70 50 61 72 raceFILE && pPar
26a0: 73 65 72 2d 3e 69 64 78 3e 3d 30 20 29 7b 0a 20 ser->idx>=0 ){.
26b0: 20 20 20 66 70 72 69 6e 74 66 28 79 79 54 72 61 fprintf(yyTra
26c0: 63 65 46 49 4c 45 2c 22 25 73 50 6f 70 70 69 6e ceFILE,"%sPoppin
26d0: 67 20 25 73 5c 6e 22 2c 0a 20 20 20 20 20 20 79 g %s\n",. y
26e0: 79 54 72 61 63 65 50 72 6f 6d 70 74 2c 0a 20 20 yTracePrompt,.
26f0: 20 20 20 20 79 79 54 6f 6b 65 6e 4e 61 6d 65 5b yyTokenName[
2700: 70 50 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 6d 61 pParser->top->ma
2710: 6a 6f 72 5d 29 3b 0a 20 20 7d 0a 23 65 6e 64 69 jor]);. }.#endi
2720: 66 0a 20 20 79 79 6d 61 6a 6f 72 20 3d 20 70 50 f. yymajor = pP
2730: 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 6d 61 6a 6f arser->top->majo
2740: 72 3b 0a 20 20 79 79 5f 64 65 73 74 72 75 63 74 r;. yy_destruct
2750: 6f 72 28 20 79 79 6d 61 6a 6f 72 2c 20 26 70 50 or( yymajor, &pP
2760: 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 6d 69 6e 6f arser->top->mino
2770: 72 29 3b 0a 20 20 70 50 61 72 73 65 72 2d 3e 69 r);. pParser->i
2780: 64 78 2d 2d 3b 0a 20 20 70 50 61 72 73 65 72 2d dx--;. pParser-
2790: 3e 74 6f 70 2d 2d 3b 0a 20 20 72 65 74 75 72 6e >top--;. return
27a0: 20 79 79 6d 61 6a 6f 72 3b 0a 7d 0a 0a 2f 2a 20 yymajor;.}../*
27b0: 0a 2a 2a 20 44 65 61 6c 6c 6f 63 61 74 65 20 61 .** Deallocate a
27c0: 6e 64 20 64 65 73 74 72 6f 79 20 61 20 70 61 72 nd destroy a par
27d0: 73 65 72 2e 20 20 44 65 73 74 72 75 63 74 6f 72 ser. Destructor
27e0: 73 20 61 72 65 20 61 6c 6c 20 63 61 6c 6c 65 64 s are all called
27f0: 20 66 6f 72 0a 2a 2a 20 61 6c 6c 20 73 74 61 63 for.** all stac
2800: 6b 20 65 6c 65 6d 65 6e 74 73 20 62 65 66 6f 72 k elements befor
2810: 65 20 73 68 75 74 74 69 6e 67 20 74 68 65 20 70 e shutting the p
2820: 61 72 73 65 72 20 64 6f 77 6e 2e 0a 2a 2a 0a 2a arser down..**.*
2830: 2a 20 49 6e 70 75 74 73 3a 0a 2a 2a 20 3c 75 6c * Inputs:.** <ul
2840: 3e 0a 2a 2a 20 3c 6c 69 3e 20 20 41 20 70 6f 69 >.** <li> A poi
2850: 6e 74 65 72 20 74 6f 20 74 68 65 20 70 61 72 73 nter to the pars
2860: 65 72 2e 20 20 54 68 69 73 20 73 68 6f 75 6c 64 er. This should
2870: 20 62 65 20 61 20 70 6f 69 6e 74 65 72 0a 2a 2a be a pointer.**
2880: 20 20 20 20 20 20 20 6f 62 74 61 69 6e 65 64 20 obtained
2890: 66 72 6f 6d 20 50 61 72 73 65 41 6c 6c 6f 63 2e from ParseAlloc.
28a0: 0a 2a 2a 20 3c 6c 69 3e 20 20 41 20 70 6f 69 6e .** <li> A poin
28b0: 74 65 72 20 74 6f 20 61 20 66 75 6e 63 74 69 6f ter to a functio
28c0: 6e 20 75 73 65 64 20 74 6f 20 72 65 63 6c 61 69 n used to reclai
28d0: 6d 20 6d 65 6d 6f 72 79 20 6f 62 74 61 69 6e 65 m memory obtaine
28e0: 64 0a 2a 2a 20 20 20 20 20 20 20 66 72 6f 6d 20 d.** from
28f0: 6d 61 6c 6c 6f 63 2e 0a 2a 2a 20 3c 2f 75 6c 3e malloc..** </ul>
2900: 0a 2a 2f 0a 76 6f 69 64 20 50 61 72 73 65 46 72 .*/.void ParseFr
2910: 65 65 28 0a 20 20 76 6f 69 64 20 2a 70 2c 20 20 ee(. void *p,
2920: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2930: 20 20 2f 2a 20 54 68 65 20 70 61 72 73 65 72 20 /* The parser
2940: 74 6f 20 62 65 20 64 65 6c 65 74 65 64 20 2a 2f to be deleted */
2950: 0a 20 20 76 6f 69 64 20 28 2a 66 72 65 65 50 72 . void (*freePr
2960: 6f 63 29 28 76 6f 69 64 2a 29 20 20 20 20 20 2f oc)(void*) /
2970: 2a 20 46 75 6e 63 74 69 6f 6e 20 75 73 65 64 20 * Function used
2980: 74 6f 20 72 65 63 6c 61 69 6d 20 6d 65 6d 6f 72 to reclaim memor
2990: 79 20 2a 2f 0a 29 7b 0a 20 20 79 79 50 61 72 73 y */.){. yyPars
29a0: 65 72 20 2a 70 50 61 72 73 65 72 20 3d 20 28 79 er *pParser = (y
29b0: 79 50 61 72 73 65 72 2a 29 70 3b 0a 20 20 69 66 yParser*)p;. if
29c0: 28 20 70 50 61 72 73 65 72 3d 3d 30 20 29 20 72 ( pParser==0 ) r
29d0: 65 74 75 72 6e 3b 0a 20 20 77 68 69 6c 65 28 20 eturn;. while(
29e0: 70 50 61 72 73 65 72 2d 3e 69 64 78 3e 3d 30 20 pParser->idx>=0
29f0: 29 20 79 79 5f 70 6f 70 5f 70 61 72 73 65 72 5f ) yy_pop_parser_
2a00: 73 74 61 63 6b 28 70 50 61 72 73 65 72 29 3b 0a stack(pParser);.
2a10: 20 20 28 2a 66 72 65 65 50 72 6f 63 29 28 28 76 (*freeProc)((v
2a20: 6f 69 64 2a 29 70 50 61 72 73 65 72 29 3b 0a 7d oid*)pParser);.}
2a30: 0a 0a 2f 2a 0a 2a 2a 20 46 69 6e 64 20 74 68 65 ../*.** Find the
2a40: 20 61 70 70 72 6f 70 72 69 61 74 65 20 61 63 74 appropriate act
2a50: 69 6f 6e 20 66 6f 72 20 61 20 70 61 72 73 65 72 ion for a parser
2a60: 20 67 69 76 65 6e 20 74 68 65 20 6c 6f 6f 6b 2d given the look-
2a70: 61 68 65 61 64 20 74 6f 6b 65 6e 2e 0a 2a 2a 0a ahead token..**.
2a80: 2a 2a 20 49 66 20 74 68 65 20 6c 6f 6f 6b 2d 61 ** If the look-a
2a90: 68 65 61 64 20 74 6f 6b 65 6e 20 69 73 20 59 59 head token is YY
2aa0: 4e 4f 43 4f 44 45 2c 20 74 68 65 6e 20 63 68 65 NOCODE, then che
2ab0: 63 6b 20 74 6f 20 73 65 65 20 69 66 20 74 68 65 ck to see if the
2ac0: 20 61 63 74 69 6f 6e 20 69 73 0a 2a 2a 20 69 6e action is.** in
2ad0: 64 65 70 65 6e 64 65 6e 74 20 6f 66 20 74 68 65 dependent of the
2ae0: 20 6c 6f 6f 6b 2d 61 68 65 61 64 2e 20 20 49 66 look-ahead. If
2af0: 20 69 74 20 69 73 2c 20 72 65 74 75 72 6e 20 74 it is, return t
2b00: 68 65 20 61 63 74 69 6f 6e 2c 20 6f 74 68 65 72 he action, other
2b10: 77 69 73 65 0a 2a 2a 20 72 65 74 75 72 6e 20 59 wise.** return Y
2b20: 59 5f 4e 4f 5f 41 43 54 49 4f 4e 2e 0a 2a 2f 0a Y_NO_ACTION..*/.
2b30: 73 74 61 74 69 63 20 69 6e 74 20 79 79 5f 66 69 static int yy_fi
2b40: 6e 64 5f 70 61 72 73 65 72 5f 61 63 74 69 6f 6e nd_parser_action
2b50: 28 0a 20 20 79 79 50 61 72 73 65 72 20 2a 70 50 (. yyParser *pP
2b60: 61 72 73 65 72 2c 20 20 20 20 20 20 20 20 2f 2a arser, /*
2b70: 20 54 68 65 20 70 61 72 73 65 72 20 2a 2f 0a 20 The parser */.
2b80: 20 69 6e 74 20 69 4c 6f 6f 6b 41 68 65 61 64 20 int iLookAhead
2b90: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 /* T
2ba0: 68 65 20 6c 6f 6f 6b 2d 61 68 65 61 64 20 74 6f he look-ahead to
2bb0: 6b 65 6e 20 2a 2f 0a 29 7b 0a 20 20 73 74 72 75 ken */.){. stru
2bc0: 63 74 20 79 79 53 74 61 74 65 45 6e 74 72 79 20 ct yyStateEntry
2bd0: 2a 70 53 74 61 74 65 3b 20 20 20 2f 2a 20 41 70 *pState; /* Ap
2be0: 70 72 6f 70 72 69 61 74 65 20 65 6e 74 72 79 20 propriate entry
2bf0: 69 6e 20 74 68 65 20 73 74 61 74 65 20 74 61 62 in the state tab
2c00: 6c 65 20 2a 2f 0a 20 20 73 74 72 75 63 74 20 79 le */. struct y
2c10: 79 41 63 74 69 6f 6e 45 6e 74 72 79 20 2a 70 41 yActionEntry *pA
2c20: 63 74 69 6f 6e 3b 20 2f 2a 20 41 63 74 69 6f 6e ction; /* Action
2c30: 20 61 70 70 72 6f 70 72 69 61 74 65 20 66 6f 72 appropriate for
2c40: 20 74 68 65 20 6c 6f 6f 6b 2d 61 68 65 61 64 20 the look-ahead
2c50: 2a 2f 0a 20 0a 20 20 2f 2a 20 69 66 28 20 70 50 */. . /* if( pP
2c60: 61 72 73 65 72 2d 3e 69 64 78 3c 30 20 29 20 72 arser->idx<0 ) r
2c70: 65 74 75 72 6e 20 59 59 5f 4e 4f 5f 41 43 54 49 eturn YY_NO_ACTI
2c80: 4f 4e 3b 20 20 2a 2f 0a 20 20 70 53 74 61 74 65 ON; */. pState
2c90: 20 3d 20 26 79 79 53 74 61 74 65 54 61 62 6c 65 = &yyStateTable
2ca0: 5b 70 50 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 73 [pParser->top->s
2cb0: 74 61 74 65 6e 6f 5d 3b 0a 20 20 69 66 28 20 69 tateno];. if( i
2cc0: 4c 6f 6f 6b 41 68 65 61 64 21 3d 59 59 4e 4f 43 LookAhead!=YYNOC
2cd0: 4f 44 45 20 29 7b 0a 20 20 20 20 70 41 63 74 69 ODE ){. pActi
2ce0: 6f 6e 20 3d 20 26 70 53 74 61 74 65 2d 3e 68 61 on = &pState->ha
2cf0: 73 68 74 62 6c 5b 69 4c 6f 6f 6b 41 68 65 61 64 shtbl[iLookAhead
2d00: 20 26 20 70 53 74 61 74 65 2d 3e 6d 61 73 6b 5d & pState->mask]
2d10: 3b 0a 20 20 20 20 77 68 69 6c 65 28 20 70 41 63 ;. while( pAc
2d20: 74 69 6f 6e 20 29 7b 0a 20 20 20 20 20 20 69 66 tion ){. if
2d30: 28 20 70 41 63 74 69 6f 6e 2d 3e 6c 6f 6f 6b 61 ( pAction->looka
2d40: 68 65 61 64 3d 3d 69 4c 6f 6f 6b 41 68 65 61 64 head==iLookAhead
2d50: 20 29 20 72 65 74 75 72 6e 20 70 41 63 74 69 6f ) return pActio
2d60: 6e 2d 3e 61 63 74 69 6f 6e 3b 0a 20 20 20 20 20 n->action;.
2d70: 20 70 41 63 74 69 6f 6e 20 3d 20 70 41 63 74 69 pAction = pActi
2d80: 6f 6e 2d 3e 6e 65 78 74 3b 0a 20 20 20 20 7d 0a on->next;. }.
2d90: 20 20 7d 65 6c 73 65 20 69 66 28 20 70 53 74 61 }else if( pSta
2da0: 74 65 2d 3e 6d 61 73 6b 21 3d 30 20 7c 7c 20 70 te->mask!=0 || p
2db0: 53 74 61 74 65 2d 3e 68 61 73 68 74 62 6c 2d 3e State->hashtbl->
2dc0: 6c 6f 6f 6b 61 68 65 61 64 21 3d 59 59 4e 4f 43 lookahead!=YYNOC
2dd0: 4f 44 45 20 29 7b 0a 20 20 20 20 72 65 74 75 72 ODE ){. retur
2de0: 6e 20 59 59 5f 4e 4f 5f 41 43 54 49 4f 4e 3b 0a n YY_NO_ACTION;.
2df0: 20 20 7d 0a 20 20 72 65 74 75 72 6e 20 70 53 74 }. return pSt
2e00: 61 74 65 2d 3e 61 63 74 69 6f 6e 44 65 66 61 75 ate->actionDefau
2e10: 6c 74 3b 0a 7d 0a 0a 2f 2a 0a 2a 2a 20 50 65 72 lt;.}../*.** Per
2e20: 66 6f 72 6d 20 61 20 73 68 69 66 74 20 61 63 74 form a shift act
2e30: 69 6f 6e 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 ion..*/.static v
2e40: 6f 69 64 20 79 79 5f 73 68 69 66 74 28 0a 20 20 oid yy_shift(.
2e50: 79 79 50 61 72 73 65 72 20 2a 79 79 70 50 61 72 yyParser *yypPar
2e60: 73 65 72 2c 20 20 20 20 20 20 20 20 20 20 2f 2a ser, /*
2e70: 20 54 68 65 20 70 61 72 73 65 72 20 74 6f 20 62 The parser to b
2e80: 65 20 73 68 69 66 74 65 64 20 2a 2f 0a 20 20 69 e shifted */. i
2e90: 6e 74 20 79 79 4e 65 77 53 74 61 74 65 2c 20 20 nt yyNewState,
2ea0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
2eb0: 54 68 65 20 6e 65 77 20 73 74 61 74 65 20 74 6f The new state to
2ec0: 20 73 68 69 66 74 20 69 6e 20 2a 2f 0a 20 20 69 shift in */. i
2ed0: 6e 74 20 79 79 4d 61 6a 6f 72 2c 20 20 20 20 20 nt yyMajor,
2ee0: 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 /*
2ef0: 54 68 65 20 6d 61 6a 6f 72 20 74 6f 6b 65 6e 20 The major token
2f00: 74 6f 20 73 68 69 66 74 20 69 6e 20 2a 2f 0a 20 to shift in */.
2f10: 20 59 59 4d 49 4e 4f 52 54 59 50 45 20 2a 79 79 YYMINORTYPE *yy
2f20: 70 4d 69 6e 6f 72 20 20 20 20 20 20 20 20 20 2f pMinor /
2f30: 2a 20 50 6f 69 6e 74 65 72 20 6f 74 20 74 68 65 * Pointer ot the
2f40: 20 6d 69 6e 6f 72 20 74 6f 6b 65 6e 20 74 6f 20 minor token to
2f50: 73 68 69 66 74 20 69 6e 20 2a 2f 0a 29 7b 0a 20 shift in */.){.
2f60: 20 79 79 70 50 61 72 73 65 72 2d 3e 69 64 78 2b yypParser->idx+
2f70: 2b 3b 0a 20 20 79 79 70 50 61 72 73 65 72 2d 3e +;. yypParser->
2f80: 74 6f 70 2b 2b 3b 0a 20 20 69 66 28 20 79 79 70 top++;. if( yyp
2f90: 50 61 72 73 65 72 2d 3e 69 64 78 3e 3d 59 59 53 Parser->idx>=YYS
2fa0: 54 41 43 4b 44 45 50 54 48 20 29 7b 0a 20 20 20 TACKDEPTH ){.
2fb0: 20 20 79 79 70 50 61 72 73 65 72 2d 3e 69 64 78 yypParser->idx
2fc0: 2d 2d 3b 0a 20 20 20 20 20 79 79 70 50 61 72 73 --;. yypPars
2fd0: 65 72 2d 3e 74 6f 70 2d 2d 3b 0a 23 69 66 6e 64 er->top--;.#ifnd
2fe0: 65 66 20 4e 44 45 42 55 47 0a 20 20 20 20 20 69 ef NDEBUG. i
2ff0: 66 28 20 79 79 54 72 61 63 65 46 49 4c 45 20 29 f( yyTraceFILE )
3000: 7b 0a 20 20 20 20 20 20 20 66 70 72 69 6e 74 66 {. fprintf
3010: 28 79 79 54 72 61 63 65 46 49 4c 45 2c 22 25 73 (yyTraceFILE,"%s
3020: 53 74 61 63 6b 20 4f 76 65 72 66 6c 6f 77 21 5c Stack Overflow!\
3030: 6e 22 2c 79 79 54 72 61 63 65 50 72 6f 6d 70 74 n",yyTracePrompt
3040: 29 3b 0a 20 20 20 20 20 7d 0a 23 65 6e 64 69 66 );. }.#endif
3050: 0a 20 20 20 20 20 77 68 69 6c 65 28 20 79 79 70 . while( yyp
3060: 50 61 72 73 65 72 2d 3e 69 64 78 3e 3d 30 20 29 Parser->idx>=0 )
3070: 20 79 79 5f 70 6f 70 5f 70 61 72 73 65 72 5f 73 yy_pop_parser_s
3080: 74 61 63 6b 28 79 79 70 50 61 72 73 65 72 29 3b tack(yypParser);
3090: 0a 20 20 20 20 20 2f 2a 20 48 65 72 65 20 63 6f . /* Here co
30a0: 64 65 20 69 73 20 69 6e 73 65 72 74 65 64 20 77 de is inserted w
30b0: 68 69 63 68 20 77 69 6c 6c 20 65 78 65 63 75 74 hich will execut
30c0: 65 20 69 66 20 74 68 65 20 70 61 72 73 65 72 0a e if the parser.
30d0: 20 20 20 20 20 2a 2a 20 73 74 61 63 6b 20 65 76 ** stack ev
30e0: 65 72 79 20 6f 76 65 72 66 6c 6f 77 73 20 2a 2f ery overflows */
30f0: 0a 25 25 0a 20 20 20 20 20 72 65 74 75 72 6e 3b .%%. return;
3100: 0a 20 20 7d 0a 20 20 79 79 70 50 61 72 73 65 72 . }. yypParser
3110: 2d 3e 74 6f 70 2d 3e 73 74 61 74 65 6e 6f 20 3d ->top->stateno =
3120: 20 79 79 4e 65 77 53 74 61 74 65 3b 0a 20 20 79 yyNewState;. y
3130: 79 70 50 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 6d ypParser->top->m
3140: 61 6a 6f 72 20 3d 20 79 79 4d 61 6a 6f 72 3b 0a ajor = yyMajor;.
3150: 20 20 79 79 70 50 61 72 73 65 72 2d 3e 74 6f 70 yypParser->top
3160: 2d 3e 6d 69 6e 6f 72 20 3d 20 2a 79 79 70 4d 69 ->minor = *yypMi
3170: 6e 6f 72 3b 0a 23 69 66 6e 64 65 66 20 4e 44 45 nor;.#ifndef NDE
3180: 42 55 47 0a 20 20 69 66 28 20 79 79 54 72 61 63 BUG. if( yyTrac
3190: 65 46 49 4c 45 20 26 26 20 79 79 70 50 61 72 73 eFILE && yypPars
31a0: 65 72 2d 3e 69 64 78 3e 30 20 29 7b 0a 20 20 20 er->idx>0 ){.
31b0: 20 69 6e 74 20 69 3b 0a 20 20 20 20 66 70 72 69 int i;. fpri
31c0: 6e 74 66 28 79 79 54 72 61 63 65 46 49 4c 45 2c ntf(yyTraceFILE,
31d0: 22 25 73 53 68 69 66 74 20 25 64 5c 6e 22 2c 79 "%sShift %d\n",y
31e0: 79 54 72 61 63 65 50 72 6f 6d 70 74 2c 79 79 4e yTracePrompt,yyN
31f0: 65 77 53 74 61 74 65 29 3b 0a 20 20 20 20 66 70 ewState);. fp
3200: 72 69 6e 74 66 28 79 79 54 72 61 63 65 46 49 4c rintf(yyTraceFIL
3210: 45 2c 22 25 73 53 74 61 63 6b 3a 22 2c 79 79 54 E,"%sStack:",yyT
3220: 72 61 63 65 50 72 6f 6d 70 74 29 3b 0a 20 20 20 racePrompt);.
3230: 20 66 6f 72 28 69 3d 31 3b 20 69 3c 3d 79 79 70 for(i=1; i<=yyp
3240: 50 61 72 73 65 72 2d 3e 69 64 78 3b 20 69 2b 2b Parser->idx; i++
3250: 29 0a 20 20 20 20 20 20 66 70 72 69 6e 74 66 28 ). fprintf(
3260: 79 79 54 72 61 63 65 46 49 4c 45 2c 22 20 25 73 yyTraceFILE," %s
3270: 22 2c 79 79 54 6f 6b 65 6e 4e 61 6d 65 5b 79 79 ",yyTokenName[yy
3280: 70 50 61 72 73 65 72 2d 3e 73 74 61 63 6b 5b 69 pParser->stack[i
3290: 5d 2e 6d 61 6a 6f 72 5d 29 3b 0a 20 20 20 20 66 ].major]);. f
32a0: 70 72 69 6e 74 66 28 79 79 54 72 61 63 65 46 49 printf(yyTraceFI
32b0: 4c 45 2c 22 5c 6e 22 29 3b 0a 20 20 7d 0a 23 65 LE,"\n");. }.#e
32c0: 6e 64 69 66 0a 7d 0a 0a 2f 2a 20 54 68 65 20 66 ndif.}../* The f
32d0: 6f 6c 6c 6f 77 69 6e 67 20 74 61 62 6c 65 20 63 ollowing table c
32e0: 6f 6e 74 61 69 6e 73 20 69 6e 66 6f 72 6d 61 74 ontains informat
32f0: 69 6f 6e 20 61 62 6f 75 74 20 65 76 65 72 79 20 ion about every
3300: 72 75 6c 65 20 74 68 61 74 0a 2a 2a 20 69 73 20 rule that.** is
3310: 75 73 65 64 20 64 75 72 69 6e 67 20 74 68 65 20 used during the
3320: 72 65 64 75 63 65 2e 0a 2a 2f 0a 73 74 61 74 69 reduce..*/.stati
3330: 63 20 73 74 72 75 63 74 20 7b 0a 20 20 59 59 43 c struct {. YYC
3340: 4f 44 45 54 59 50 45 20 6c 68 73 3b 20 20 20 20 ODETYPE lhs;
3350: 20 20 20 20 20 2f 2a 20 53 79 6d 62 6f 6c 20 6f /* Symbol o
3360: 6e 20 74 68 65 20 6c 65 66 74 2d 68 61 6e 64 20 n the left-hand
3370: 73 69 64 65 20 6f 66 20 74 68 65 20 72 75 6c 65 side of the rule
3380: 20 2a 2f 0a 20 20 75 6e 73 69 67 6e 65 64 20 63 */. unsigned c
3390: 68 61 72 20 6e 72 68 73 3b 20 20 20 20 20 2f 2a har nrhs; /*
33a0: 20 4e 75 6d 62 65 72 20 6f 66 20 72 69 67 68 74 Number of right
33b0: 2d 68 61 6e 64 20 73 69 64 65 20 73 79 6d 62 6f -hand side symbo
33c0: 6c 73 20 69 6e 20 74 68 65 20 72 75 6c 65 20 2a ls in the rule *
33d0: 2f 0a 7d 20 79 79 52 75 6c 65 49 6e 66 6f 5b 5d /.} yyRuleInfo[]
33e0: 20 3d 20 7b 0a 25 25 0a 7d 3b 0a 0a 73 74 61 74 = {.%%.};..stat
33f0: 69 63 20 76 6f 69 64 20 79 79 5f 61 63 63 65 70 ic void yy_accep
3400: 74 28 79 79 50 61 72 73 65 72 20 2a 20 20 50 61 t(yyParser * Pa
3410: 72 73 65 41 4e 53 49 41 52 47 44 45 43 4c 29 3b rseANSIARGDECL);
3420: 20 20 2f 2a 20 46 6f 72 77 61 72 64 20 44 65 63 /* Forward Dec
3430: 6c 61 72 61 74 69 6f 6e 20 2a 2f 0a 0a 2f 2a 0a laration */../*.
3440: 2a 2a 20 50 65 72 66 6f 72 6d 20 61 20 72 65 64 ** Perform a red
3450: 75 63 65 20 61 63 74 69 6f 6e 20 61 6e 64 20 74 uce action and t
3460: 68 65 20 73 68 69 66 74 20 74 68 61 74 20 6d 75 he shift that mu
3470: 73 74 20 69 6d 6d 65 64 69 61 74 65 6c 79 0a 2a st immediately.*
3480: 2a 20 66 6f 6c 6c 6f 77 20 74 68 65 20 72 65 64 * follow the red
3490: 75 63 65 2e 0a 2a 2f 0a 73 74 61 74 69 63 20 76 uce..*/.static v
34a0: 6f 69 64 20 79 79 5f 72 65 64 75 63 65 28 0a 20 oid yy_reduce(.
34b0: 20 79 79 50 61 72 73 65 72 20 2a 79 79 70 50 61 yyParser *yypPa
34c0: 72 73 65 72 2c 20 20 20 20 20 20 20 20 20 2f 2a rser, /*
34d0: 20 54 68 65 20 70 61 72 73 65 72 20 2a 2f 0a 20 The parser */.
34e0: 20 69 6e 74 20 79 79 72 75 6c 65 6e 6f 20 20 20 int yyruleno
34f0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a /*
3500: 20 4e 75 6d 62 65 72 20 6f 66 20 74 68 65 20 72 Number of the r
3510: 75 6c 65 20 62 79 20 77 68 69 63 68 20 74 6f 20 ule by which to
3520: 72 65 64 75 63 65 20 2a 2f 0a 20 20 50 61 72 73 reduce */. Pars
3530: 65 41 4e 53 49 41 52 47 44 45 43 4c 0a 29 7b 0a eANSIARGDECL.){.
3540: 20 20 69 6e 74 20 79 79 67 6f 74 6f 3b 20 20 20 int yygoto;
3550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
3560: 20 20 2f 2a 20 54 68 65 20 6e 65 78 74 20 73 74 /* The next st
3570: 61 74 65 20 2a 2f 0a 20 20 69 6e 74 20 79 79 61 ate */. int yya
3580: 63 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 20 ct;
3590: 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 /* The
35a0: 6e 65 78 74 20 61 63 74 69 6f 6e 20 2a 2f 0a 20 next action */.
35b0: 20 59 59 4d 49 4e 4f 52 54 59 50 45 20 79 79 67 YYMINORTYPE yyg
35c0: 6f 74 6f 6d 69 6e 6f 72 3b 20 20 20 20 20 20 20 otominor;
35d0: 20 2f 2a 20 54 68 65 20 4c 48 53 20 6f 66 20 74 /* The LHS of t
35e0: 68 65 20 72 75 6c 65 20 72 65 64 75 63 65 64 20 he rule reduced
35f0: 2a 2f 0a 20 20 73 74 72 75 63 74 20 79 79 53 74 */. struct yySt
3600: 61 63 6b 45 6e 74 72 79 20 2a 79 79 6d 73 70 3b ackEntry *yymsp;
3610: 20 20 20 20 20 2f 2a 20 54 68 65 20 74 6f 70 20 /* The top
3620: 6f 66 20 74 68 65 20 70 61 72 73 65 72 27 73 20 of the parser's
3630: 73 74 61 63 6b 20 2a 2f 0a 20 20 69 6e 74 20 79 stack */. int y
3640: 79 73 69 7a 65 3b 20 20 20 20 20 20 20 20 20 20 ysize;
3650: 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 41 6d /* Am
3660: 6f 75 6e 74 20 74 6f 20 70 6f 70 20 74 68 65 20 ount to pop the
3670: 73 74 61 63 6b 20 2a 2f 0a 20 20 79 79 6d 73 70 stack */. yymsp
3680: 20 3d 20 79 79 70 50 61 72 73 65 72 2d 3e 74 6f = yypParser->to
3690: 70 3b 0a 20 20 73 77 69 74 63 68 28 20 79 79 72 p;. switch( yyr
36a0: 75 6c 65 6e 6f 20 29 7b 0a 20 20 2f 2a 20 42 65 uleno ){. /* Be
36b0: 67 69 6e 6e 69 6e 67 20 68 65 72 65 20 61 72 65 ginning here are
36c0: 20 74 68 65 20 72 65 64 75 63 74 69 6f 6e 20 63 the reduction c
36d0: 61 73 65 73 2e 20 20 41 20 74 79 70 69 63 61 6c ases. A typical
36e0: 20 65 78 61 6d 70 6c 65 0a 20 20 2a 2a 20 66 6f example. ** fo
36f0: 6c 6c 6f 77 73 3a 0a 20 20 2a 2a 20 20 20 63 61 llows:. ** ca
3700: 73 65 20 30 3a 0a 20 20 2a 2a 20 20 20 20 20 59 se 0:. ** Y
3710: 59 54 52 41 43 45 28 22 3c 74 65 78 74 20 6f 66 YTRACE("<text of
3720: 20 74 68 65 20 72 75 6c 65 3e 22 29 3b 0a 20 20 the rule>");.
3730: 2a 2a 20 20 23 6c 69 6e 65 20 3c 6c 69 6e 65 6e ** #line <linen
3740: 6f 3e 20 3c 67 72 61 6d 6d 61 72 66 69 6c 65 3e o> <grammarfile>
3750: 0a 20 20 2a 2a 20 20 20 20 20 7b 20 2e 2e 2e 20 . ** { ...
3760: 7d 20 20 20 20 20 20 20 20 20 20 20 2f 2f 20 55 } // U
3770: 73 65 72 20 73 75 70 70 6c 69 65 64 20 63 6f 64 ser supplied cod
3780: 65 0a 20 20 2a 2a 20 20 23 6c 69 6e 65 20 3c 6c e. ** #line <l
3790: 69 6e 65 6e 6f 3e 20 3c 74 68 69 73 66 69 6c 65 ineno> <thisfile
37a0: 3e 0a 20 20 2a 2a 20 20 20 20 20 62 72 65 61 6b >. ** break
37b0: 3b 0a 20 20 2a 2f 0a 25 25 0a 20 20 7d 3b 0a 20 ;. */.%%. };.
37c0: 20 79 79 67 6f 74 6f 20 3d 20 79 79 52 75 6c 65 yygoto = yyRule
37d0: 49 6e 66 6f 5b 79 79 72 75 6c 65 6e 6f 5d 2e 6c Info[yyruleno].l
37e0: 68 73 3b 0a 20 20 79 79 73 69 7a 65 20 3d 20 79 hs;. yysize = y
37f0: 79 52 75 6c 65 49 6e 66 6f 5b 79 79 72 75 6c 65 yRuleInfo[yyrule
3800: 6e 6f 5d 2e 6e 72 68 73 3b 0a 20 20 79 79 70 50 no].nrhs;. yypP
3810: 61 72 73 65 72 2d 3e 69 64 78 20 2d 3d 20 79 79 arser->idx -= yy
3820: 73 69 7a 65 3b 0a 20 20 79 79 70 50 61 72 73 65 size;. yypParse
3830: 72 2d 3e 74 6f 70 20 2d 3d 20 79 79 73 69 7a 65 r->top -= yysize
3840: 3b 0a 20 20 79 79 61 63 74 20 3d 20 79 79 5f 66 ;. yyact = yy_f
3850: 69 6e 64 5f 70 61 72 73 65 72 5f 61 63 74 69 6f ind_parser_actio
3860: 6e 28 79 79 70 50 61 72 73 65 72 2c 79 79 67 6f n(yypParser,yygo
3870: 74 6f 29 3b 0a 20 20 69 66 28 20 79 79 61 63 74 to);. if( yyact
3880: 20 3c 20 59 59 4e 53 54 41 54 45 20 29 7b 0a 20 < YYNSTATE ){.
3890: 20 20 20 79 79 5f 73 68 69 66 74 28 79 79 70 50 yy_shift(yypP
38a0: 61 72 73 65 72 2c 79 79 61 63 74 2c 79 79 67 6f arser,yyact,yygo
38b0: 74 6f 2c 26 79 79 67 6f 74 6f 6d 69 6e 6f 72 29 to,&yygotominor)
38c0: 3b 0a 20 20 7d 65 6c 73 65 20 69 66 28 20 79 79 ;. }else if( yy
38d0: 61 63 74 20 3d 3d 20 59 59 4e 53 54 41 54 45 20 act == YYNSTATE
38e0: 2b 20 59 59 4e 52 55 4c 45 20 2b 20 31 20 29 7b + YYNRULE + 1 ){
38f0: 0a 20 20 20 20 79 79 5f 61 63 63 65 70 74 28 79 . yy_accept(y
3900: 79 70 50 61 72 73 65 72 20 50 61 72 73 65 41 52 ypParser ParseAR
3910: 47 44 45 43 4c 29 3b 0a 20 20 7d 0a 7d 0a 0a 2f GDECL);. }.}../
3920: 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 69 *.** The followi
3930: 6e 67 20 63 6f 64 65 20 65 78 65 63 75 74 65 73 ng code executes
3940: 20 77 68 65 6e 20 74 68 65 20 70 61 72 73 65 20 when the parse
3950: 66 61 69 6c 73 0a 2a 2f 0a 73 74 61 74 69 63 20 fails.*/.static
3960: 76 6f 69 64 20 79 79 5f 70 61 72 73 65 5f 66 61 void yy_parse_fa
3970: 69 6c 65 64 28 0a 20 20 79 79 50 61 72 73 65 72 iled(. yyParser
3980: 20 2a 79 79 70 50 61 72 73 65 72 20 20 20 20 20 *yypParser
3990: 20 20 20 20 20 20 2f 2a 20 54 68 65 20 70 61 72 /* The par
39a0: 73 65 72 20 2a 2f 0a 20 20 50 61 72 73 65 41 4e ser */. ParseAN
39b0: 53 49 41 52 47 44 45 43 4c 20 20 20 20 20 20 20 SIARGDECL
39c0: 20 20 20 20 20 20 20 2f 2a 20 45 78 74 72 61 20 /* Extra
39d0: 61 72 67 75 6d 65 6e 74 73 20 28 69 66 20 61 6e arguments (if an
39e0: 79 29 20 2a 2f 0a 29 7b 0a 23 69 66 6e 64 65 66 y) */.){.#ifndef
39f0: 20 4e 44 45 42 55 47 0a 20 20 69 66 28 20 79 79 NDEBUG. if( yy
3a00: 54 72 61 63 65 46 49 4c 45 20 29 7b 0a 20 20 20 TraceFILE ){.
3a10: 20 66 70 72 69 6e 74 66 28 79 79 54 72 61 63 65 fprintf(yyTrace
3a20: 46 49 4c 45 2c 22 25 73 46 61 69 6c 21 5c 6e 22 FILE,"%sFail!\n"
3a30: 2c 79 79 54 72 61 63 65 50 72 6f 6d 70 74 29 3b ,yyTracePrompt);
3a40: 0a 20 20 7d 0a 23 65 6e 64 69 66 0a 20 20 77 68 . }.#endif. wh
3a50: 69 6c 65 28 20 79 79 70 50 61 72 73 65 72 2d 3e ile( yypParser->
3a60: 69 64 78 3e 3d 30 20 29 20 79 79 5f 70 6f 70 5f idx>=0 ) yy_pop_
3a70: 70 61 72 73 65 72 5f 73 74 61 63 6b 28 79 79 70 parser_stack(yyp
3a80: 50 61 72 73 65 72 29 3b 0a 20 20 2f 2a 20 48 65 Parser);. /* He
3a90: 72 65 20 63 6f 64 65 20 69 73 20 69 6e 73 65 72 re code is inser
3aa0: 74 65 64 20 77 68 69 63 68 20 77 69 6c 6c 20 62 ted which will b
3ab0: 65 20 65 78 65 63 75 74 65 64 20 77 68 65 6e 65 e executed whene
3ac0: 76 65 72 20 74 68 65 0a 20 20 2a 2a 20 70 61 72 ver the. ** par
3ad0: 73 65 72 20 66 61 69 6c 73 20 2a 2f 0a 25 25 0a ser fails */.%%.
3ae0: 7d 0a 0a 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c }../*.** The fol
3af0: 6c 6f 77 69 6e 67 20 63 6f 64 65 20 65 78 65 63 lowing code exec
3b00: 75 74 65 73 20 77 68 65 6e 20 61 20 73 79 6e 74 utes when a synt
3b10: 61 78 20 65 72 72 6f 72 20 66 69 72 73 74 20 6f ax error first o
3b20: 63 63 75 72 73 2e 0a 2a 2f 0a 73 74 61 74 69 63 ccurs..*/.static
3b30: 20 76 6f 69 64 20 79 79 5f 73 79 6e 74 61 78 5f void yy_syntax_
3b40: 65 72 72 6f 72 28 0a 20 20 79 79 50 61 72 73 65 error(. yyParse
3b50: 72 20 2a 79 79 70 50 61 72 73 65 72 2c 20 20 20 r *yypParser,
3b60: 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 70 /* The p
3b70: 61 72 73 65 72 20 2a 2f 0a 20 20 69 6e 74 20 79 arser */. int y
3b80: 79 6d 61 6a 6f 72 2c 20 20 20 20 20 20 20 20 20 ymajor,
3b90: 20 20 20 20 20 20 20 20 20 20 2f 2a 20 54 68 65 /* The
3ba0: 20 6d 61 6a 6f 72 20 74 79 70 65 20 6f 66 20 74 major type of t
3bb0: 68 65 20 65 72 72 6f 72 20 74 6f 6b 65 6e 20 2a he error token *
3bc0: 2f 0a 20 20 59 59 4d 49 4e 4f 52 54 59 50 45 20 /. YYMINORTYPE
3bd0: 79 79 6d 69 6e 6f 72 20 20 20 20 20 20 20 20 20 yyminor
3be0: 20 20 20 2f 2a 20 54 68 65 20 6d 69 6e 6f 72 20 /* The minor
3bf0: 74 79 70 65 20 6f 66 20 74 68 65 20 65 72 72 6f type of the erro
3c00: 72 20 74 6f 6b 65 6e 20 2a 2f 0a 20 20 50 61 72 r token */. Par
3c10: 73 65 41 4e 53 49 41 52 47 44 45 43 4c 20 20 20 seANSIARGDECL
3c20: 20 20 20 20 20 20 20 20 20 20 20 20 2f 2a 20 45 /* E
3c30: 78 74 72 61 20 61 72 67 75 6d 65 6e 74 73 20 28 xtra arguments (
3c40: 69 66 20 61 6e 79 29 20 2a 2f 0a 29 7b 0a 23 64 if any) */.){.#d
3c50: 65 66 69 6e 65 20 54 4f 4b 45 4e 20 28 79 79 6d efine TOKEN (yym
3c60: 69 6e 6f 72 2e 79 79 30 29 0a 25 25 0a 7d 0a 0a inor.yy0).%%.}..
3c70: 2f 2a 0a 2a 2a 20 54 68 65 20 66 6f 6c 6c 6f 77 /*.** The follow
3c80: 69 6e 67 20 69 73 20 65 78 65 63 75 74 65 64 20 ing is executed
3c90: 77 68 65 6e 20 74 68 65 20 70 61 72 73 65 72 20 when the parser
3ca0: 61 63 63 65 70 74 73 0a 2a 2f 0a 73 74 61 74 69 accepts.*/.stati
3cb0: 63 20 76 6f 69 64 20 79 79 5f 61 63 63 65 70 74 c void yy_accept
3cc0: 28 0a 20 20 79 79 50 61 72 73 65 72 20 2a 79 79 (. yyParser *yy
3cd0: 70 50 61 72 73 65 72 20 20 20 20 20 20 20 20 20 pParser
3ce0: 20 20 2f 2a 20 54 68 65 20 70 61 72 73 65 72 20 /* The parser
3cf0: 2a 2f 0a 20 20 50 61 72 73 65 41 4e 53 49 41 52 */. ParseANSIAR
3d00: 47 44 45 43 4c 20 20 20 20 20 20 20 20 20 20 20 GDECL
3d10: 20 20 20 2f 2a 20 45 78 74 72 61 20 61 72 67 75 /* Extra argu
3d20: 6d 65 6e 74 73 20 28 69 66 20 61 6e 79 29 20 2a ments (if any) *
3d30: 2f 0a 29 7b 0a 23 69 66 6e 64 65 66 20 4e 44 45 /.){.#ifndef NDE
3d40: 42 55 47 0a 20 20 69 66 28 20 79 79 54 72 61 63 BUG. if( yyTrac
3d50: 65 46 49 4c 45 20 29 7b 0a 20 20 20 20 66 70 72 eFILE ){. fpr
3d60: 69 6e 74 66 28 79 79 54 72 61 63 65 46 49 4c 45 intf(yyTraceFILE
3d70: 2c 22 25 73 41 63 63 65 70 74 21 5c 6e 22 2c 79 ,"%sAccept!\n",y
3d80: 79 54 72 61 63 65 50 72 6f 6d 70 74 29 3b 0a 20 yTracePrompt);.
3d90: 20 7d 0a 23 65 6e 64 69 66 0a 20 20 77 68 69 6c }.#endif. whil
3da0: 65 28 20 79 79 70 50 61 72 73 65 72 2d 3e 69 64 e( yypParser->id
3db0: 78 3e 3d 30 20 29 20 79 79 5f 70 6f 70 5f 70 61 x>=0 ) yy_pop_pa
3dc0: 72 73 65 72 5f 73 74 61 63 6b 28 79 79 70 50 61 rser_stack(yypPa
3dd0: 72 73 65 72 29 3b 0a 20 20 2f 2a 20 48 65 72 65 rser);. /* Here
3de0: 20 63 6f 64 65 20 69 73 20 69 6e 73 65 72 74 65 code is inserte
3df0: 64 20 77 68 69 63 68 20 77 69 6c 6c 20 62 65 20 d which will be
3e00: 65 78 65 63 75 74 65 64 20 77 68 65 6e 65 76 65 executed wheneve
3e10: 72 20 74 68 65 0a 20 20 2a 2a 20 70 61 72 73 65 r the. ** parse
3e20: 72 20 61 63 63 65 70 74 73 20 2a 2f 0a 25 25 0a r accepts */.%%.
3e30: 7d 0a 0a 2f 2a 20 54 68 65 20 6d 61 69 6e 20 70 }../* The main p
3e40: 61 72 73 65 72 20 70 72 6f 67 72 61 6d 2e 0a 2a arser program..*
3e50: 2a 20 54 68 65 20 66 69 72 73 74 20 61 72 67 75 * The first argu
3e60: 6d 65 6e 74 20 69 73 20 61 20 70 6f 69 6e 74 65 ment is a pointe
3e70: 72 20 74 6f 20 61 20 73 74 72 75 63 74 75 72 65 r to a structure
3e80: 20 6f 62 74 61 69 6e 65 64 20 66 72 6f 6d 0a 2a obtained from.*
3e90: 2a 20 22 50 61 72 73 65 41 6c 6c 6f 63 22 20 77 * "ParseAlloc" w
3ea0: 68 69 63 68 20 64 65 73 63 72 69 62 65 73 20 74 hich describes t
3eb0: 68 65 20 63 75 72 72 65 6e 74 20 73 74 61 74 65 he current state
3ec0: 20 6f 66 20 74 68 65 20 70 61 72 73 65 72 2e 0a of the parser..
3ed0: 2a 2a 20 54 68 65 20 73 65 63 6f 6e 64 20 61 72 ** The second ar
3ee0: 67 75 6d 65 6e 74 20 69 73 20 74 68 65 20 6d 61 gument is the ma
3ef0: 6a 6f 72 20 74 6f 6b 65 6e 20 6e 75 6d 62 65 72 jor token number
3f00: 2e 20 20 54 68 65 20 74 68 69 72 64 20 69 73 0a . The third is.
3f10: 2a 2a 20 74 68 65 20 6d 69 6e 6f 72 20 74 6f 6b ** the minor tok
3f20: 65 6e 2e 20 20 54 68 65 20 66 6f 75 72 74 68 20 en. The fourth
3f30: 6f 70 74 69 6f 6e 61 6c 20 61 72 67 75 6d 65 6e optional argumen
3f40: 74 20 69 73 20 77 68 61 74 65 76 65 72 20 74 68 t is whatever th
3f50: 65 0a 2a 2a 20 75 73 65 72 20 77 61 6e 74 73 20 e.** user wants
3f60: 28 61 6e 64 20 73 70 65 63 69 66 69 65 64 20 69 (and specified i
3f70: 6e 20 74 68 65 20 67 72 61 6d 6d 61 72 29 20 61 n the grammar) a
3f80: 6e 64 20 69 73 20 61 76 61 69 6c 61 62 6c 65 20 nd is available
3f90: 66 6f 72 0a 2a 2a 20 75 73 65 20 62 79 20 74 68 for.** use by th
3fa0: 65 20 61 63 74 69 6f 6e 20 72 6f 75 74 69 6e 65 e action routine
3fb0: 73 2e 0a 2a 2a 0a 2a 2a 20 49 6e 70 75 74 73 3a s..**.** Inputs:
3fc0: 0a 2a 2a 20 3c 75 6c 3e 0a 2a 2a 20 3c 6c 69 3e .** <ul>.** <li>
3fd0: 20 41 20 70 6f 69 6e 74 65 72 20 74 6f 20 74 68 A pointer to th
3fe0: 65 20 70 61 72 73 65 72 20 28 61 6e 20 6f 70 61 e parser (an opa
3ff0: 71 75 65 20 73 74 72 75 63 74 75 72 65 2e 29 0a que structure.).
4000: 2a 2a 20 3c 6c 69 3e 20 54 68 65 20 6d 61 6a 6f ** <li> The majo
4010: 72 20 74 6f 6b 65 6e 20 6e 75 6d 62 65 72 2e 0a r token number..
4020: 2a 2a 20 3c 6c 69 3e 20 54 68 65 20 6d 69 6e 6f ** <li> The mino
4030: 72 20 74 6f 6b 65 6e 20 6e 75 6d 62 65 72 2e 0a r token number..
4040: 2a 2a 20 3c 6c 69 3e 20 41 6e 20 6f 70 74 69 6f ** <li> An optio
4050: 6e 20 61 72 67 75 6d 65 6e 74 20 6f 66 20 61 20 n argument of a
4060: 67 72 61 6d 6d 61 72 2d 73 70 65 63 69 66 69 65 grammar-specifie
4070: 64 20 74 79 70 65 2e 0a 2a 2a 20 3c 2f 75 6c 3e d type..** </ul>
4080: 0a 2a 2a 0a 2a 2a 20 4f 75 74 70 75 74 73 3a 0a .**.** Outputs:.
4090: 2a 2a 20 4e 6f 6e 65 2e 0a 2a 2f 0a 76 6f 69 64 ** None..*/.void
40a0: 20 50 61 72 73 65 28 0a 20 20 76 6f 69 64 20 2a Parse(. void *
40b0: 79 79 70 2c 20 20 20 20 20 20 20 20 20 20 20 20 yyp,
40c0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 70 61 /* The pa
40d0: 72 73 65 72 20 2a 2f 0a 20 20 69 6e 74 20 79 79 rser */. int yy
40e0: 6d 61 6a 6f 72 2c 20 20 20 20 20 20 20 20 20 20 major,
40f0: 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 6d 61 /* The ma
4100: 6a 6f 72 20 74 6f 6b 65 6e 20 63 6f 64 65 20 6e jor token code n
4110: 75 6d 62 65 72 20 2a 2f 0a 20 20 50 61 72 73 65 umber */. Parse
4120: 54 4f 4b 45 4e 54 59 50 45 20 79 79 6d 69 6e 6f TOKENTYPE yymino
4130: 72 20 20 20 20 20 20 20 2f 2a 20 54 68 65 20 76 r /* The v
4140: 61 6c 75 65 20 66 6f 72 20 74 68 65 20 74 6f 6b alue for the tok
4150: 65 6e 20 2a 2f 0a 20 20 50 61 72 73 65 41 4e 53 en */. ParseANS
4160: 49 41 52 47 44 45 43 4c 0a 29 7b 0a 20 20 59 59 IARGDECL.){. YY
4170: 4d 49 4e 4f 52 54 59 50 45 20 79 79 6d 69 6e 6f MINORTYPE yymino
4180: 72 75 6e 69 6f 6e 3b 0a 20 20 69 6e 74 20 79 79 runion;. int yy
4190: 61 63 74 3b 20 20 20 20 20 20 20 20 20 20 20 20 act;
41a0: 2f 2a 20 54 68 65 20 70 61 72 73 65 72 20 61 63 /* The parser ac
41b0: 74 69 6f 6e 2e 20 2a 2f 0a 20 20 69 6e 74 20 79 tion. */. int y
41c0: 79 65 6e 64 6f 66 69 6e 70 75 74 3b 20 20 20 20 yendofinput;
41d0: 20 2f 2a 20 54 72 75 65 20 69 66 20 77 65 20 61 /* True if we a
41e0: 72 65 20 61 74 20 74 68 65 20 65 6e 64 20 6f 66 re at the end of
41f0: 20 69 6e 70 75 74 20 2a 2f 0a 20 20 69 6e 74 20 input */. int
4200: 79 79 65 72 72 6f 72 68 69 74 20 3d 20 30 3b 20 yyerrorhit = 0;
4210: 20 20 2f 2a 20 54 72 75 65 20 69 66 20 79 79 6d /* True if yym
4220: 61 6a 6f 72 20 68 61 73 20 69 6e 76 6f 6b 65 64 ajor has invoked
4230: 20 61 6e 20 65 72 72 6f 72 20 2a 2f 0a 20 20 79 an error */. y
4240: 79 50 61 72 73 65 72 20 2a 79 79 70 50 61 72 73 yParser *yypPars
4250: 65 72 3b 20 20 2f 2a 20 54 68 65 20 70 61 72 73 er; /* The pars
4260: 65 72 20 2a 2f 0a 0a 20 20 2f 2a 20 28 72 65 29 er */.. /* (re)
4270: 69 6e 69 74 69 61 6c 69 7a 65 20 74 68 65 20 70 initialize the p
4280: 61 72 73 65 72 2c 20 69 66 20 6e 65 63 65 73 73 arser, if necess
4290: 61 72 79 20 2a 2f 0a 20 20 79 79 70 50 61 72 73 ary */. yypPars
42a0: 65 72 20 3d 20 28 79 79 50 61 72 73 65 72 2a 29 er = (yyParser*)
42b0: 79 79 70 3b 0a 20 20 69 66 28 20 79 79 70 50 61 yyp;. if( yypPa
42c0: 72 73 65 72 2d 3e 69 64 78 3c 30 20 29 7b 0a 20 rser->idx<0 ){.
42d0: 20 20 20 69 66 28 20 79 79 6d 61 6a 6f 72 3d 3d if( yymajor==
42e0: 30 20 29 20 72 65 74 75 72 6e 3b 0a 20 20 20 20 0 ) return;.
42f0: 79 79 70 50 61 72 73 65 72 2d 3e 69 64 78 20 3d yypParser->idx =
4300: 20 30 3b 0a 20 20 20 20 79 79 70 50 61 72 73 65 0;. yypParse
4310: 72 2d 3e 65 72 72 63 6e 74 20 3d 20 2d 31 3b 0a r->errcnt = -1;.
4320: 20 20 20 20 79 79 70 50 61 72 73 65 72 2d 3e 74 yypParser->t
4330: 6f 70 20 3d 20 26 79 79 70 50 61 72 73 65 72 2d op = &yypParser-
4340: 3e 73 74 61 63 6b 5b 30 5d 3b 0a 20 20 20 20 79 >stack[0];. y
4350: 79 70 50 61 72 73 65 72 2d 3e 74 6f 70 2d 3e 73 ypParser->top->s
4360: 74 61 74 65 6e 6f 20 3d 20 30 3b 0a 20 20 20 20 tateno = 0;.
4370: 79 79 70 50 61 72 73 65 72 2d 3e 74 6f 70 2d 3e yypParser->top->
4380: 6d 61 6a 6f 72 20 3d 20 30 3b 0a 20 20 7d 0a 20 major = 0;. }.
4390: 20 79 79 6d 69 6e 6f 72 75 6e 69 6f 6e 2e 79 79 yyminorunion.yy
43a0: 30 20 3d 20 79 79 6d 69 6e 6f 72 3b 0a 20 20 79 0 = yyminor;. y
43b0: 79 65 6e 64 6f 66 69 6e 70 75 74 20 3d 20 28 79 yendofinput = (y
43c0: 79 6d 61 6a 6f 72 3d 3d 30 29 3b 0a 0a 23 69 66 ymajor==0);..#if
43d0: 6e 64 65 66 20 4e 44 45 42 55 47 0a 20 20 69 66 ndef NDEBUG. if
43e0: 28 20 79 79 54 72 61 63 65 46 49 4c 45 20 29 7b ( yyTraceFILE ){
43f0: 0a 20 20 20 20 66 70 72 69 6e 74 66 28 79 79 54 . fprintf(yyT
4400: 72 61 63 65 46 49 4c 45 2c 22 25 73 49 6e 70 75 raceFILE,"%sInpu
4410: 74 20 25 73 5c 6e 22 2c 79 79 54 72 61 63 65 50 t %s\n",yyTraceP
4420: 72 6f 6d 70 74 2c 79 79 54 6f 6b 65 6e 4e 61 6d rompt,yyTokenNam
4430: 65 5b 79 79 6d 61 6a 6f 72 5d 29 3b 0a 20 20 7d e[yymajor]);. }
4440: 0a 23 65 6e 64 69 66 0a 0a 20 20 64 6f 7b 0a 20 .#endif.. do{.
4450: 20 20 20 79 79 61 63 74 20 3d 20 79 79 5f 66 69 yyact = yy_fi
4460: 6e 64 5f 70 61 72 73 65 72 5f 61 63 74 69 6f 6e nd_parser_action
4470: 28 79 79 70 50 61 72 73 65 72 2c 79 79 6d 61 6a (yypParser,yymaj
4480: 6f 72 29 3b 0a 20 20 20 20 69 66 28 20 79 79 61 or);. if( yya
4490: 63 74 3c 59 59 4e 53 54 41 54 45 20 29 7b 0a 20 ct<YYNSTATE ){.
44a0: 20 20 20 20 20 79 79 5f 73 68 69 66 74 28 79 79 yy_shift(yy
44b0: 70 50 61 72 73 65 72 2c 79 79 61 63 74 2c 79 79 pParser,yyact,yy
44c0: 6d 61 6a 6f 72 2c 26 79 79 6d 69 6e 6f 72 75 6e major,&yyminorun
44d0: 69 6f 6e 29 3b 0a 20 20 20 20 20 20 79 79 70 50 ion);. yypP
44e0: 61 72 73 65 72 2d 3e 65 72 72 63 6e 74 2d 2d 3b arser->errcnt--;
44f0: 0a 20 20 20 20 20 20 69 66 28 20 79 79 65 6e 64 . if( yyend
4500: 6f 66 69 6e 70 75 74 20 26 26 20 79 79 70 50 61 ofinput && yypPa
4510: 72 73 65 72 2d 3e 69 64 78 3e 3d 30 20 29 7b 0a rser->idx>=0 ){.
4520: 20 20 20 20 20 20 20 20 79 79 6d 61 6a 6f 72 20 yymajor
4530: 3d 20 30 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 = 0;. }else
4540: 7b 0a 20 20 20 20 20 20 20 20 79 79 6d 61 6a 6f {. yymajo
4550: 72 20 3d 20 59 59 4e 4f 43 4f 44 45 3b 0a 20 20 r = YYNOCODE;.
4560: 20 20 20 20 7d 0a 20 20 20 20 7d 65 6c 73 65 20 }. }else
4570: 69 66 28 20 79 79 61 63 74 20 3c 20 59 59 4e 53 if( yyact < YYNS
4580: 54 41 54 45 20 2b 20 59 59 4e 52 55 4c 45 20 29 TATE + YYNRULE )
4590: 7b 0a 20 20 20 20 20 20 79 79 5f 72 65 64 75 63 {. yy_reduc
45a0: 65 28 79 79 70 50 61 72 73 65 72 2c 79 79 61 63 e(yypParser,yyac
45b0: 74 2d 59 59 4e 53 54 41 54 45 20 50 61 72 73 65 t-YYNSTATE Parse
45c0: 41 52 47 44 45 43 4c 29 3b 0a 20 20 20 20 7d 65 ARGDECL);. }e
45d0: 6c 73 65 20 69 66 28 20 79 79 61 63 74 20 3d 3d lse if( yyact ==
45e0: 20 59 59 5f 45 52 52 4f 52 5f 41 43 54 49 4f 4e YY_ERROR_ACTION
45f0: 20 29 7b 0a 23 69 66 6e 64 65 66 20 4e 44 45 42 ){.#ifndef NDEB
4600: 55 47 0a 20 20 20 20 20 20 69 66 28 20 79 79 54 UG. if( yyT
4610: 72 61 63 65 46 49 4c 45 20 29 7b 0a 20 20 20 20 raceFILE ){.
4620: 20 20 20 20 66 70 72 69 6e 74 66 28 79 79 54 72 fprintf(yyTr
4630: 61 63 65 46 49 4c 45 2c 22 25 73 53 79 6e 74 61 aceFILE,"%sSynta
4640: 78 20 45 72 72 6f 72 21 5c 6e 22 2c 79 79 54 72 x Error!\n",yyTr
4650: 61 63 65 50 72 6f 6d 70 74 29 3b 0a 20 20 20 20 acePrompt);.
4660: 20 20 7d 0a 23 65 6e 64 69 66 0a 23 69 66 64 65 }.#endif.#ifde
4670: 66 20 59 59 45 52 52 4f 52 53 59 4d 42 4f 4c 0a f YYERRORSYMBOL.
4680: 20 20 20 20 20 20 2f 2a 20 41 20 73 79 6e 74 61 /* A synta
4690: 78 20 65 72 72 6f 72 20 68 61 73 20 6f 63 63 75 x error has occu
46a0: 72 72 65 64 2e 0a 20 20 20 20 20 20 2a 2a 20 54 rred.. ** T
46b0: 68 65 20 72 65 73 70 6f 6e 73 65 20 74 6f 20 61 he response to a
46c0: 6e 20 65 72 72 6f 72 20 64 65 70 65 6e 64 73 20 n error depends
46d0: 75 70 6f 6e 20 77 68 65 74 68 65 72 20 6f 72 20 upon whether or
46e0: 6e 6f 74 20 74 68 65 0a 20 20 20 20 20 20 2a 2a not the. **
46f0: 20 67 72 61 6d 6d 61 72 20 64 65 66 69 6e 65 73 grammar defines
4700: 20 61 6e 20 65 72 72 6f 72 20 74 6f 6b 65 6e 20 an error token
4710: 22 45 52 52 4f 52 22 2e 20 20 0a 20 20 20 20 20 "ERROR". .
4720: 20 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 54 68 69 **. ** Thi
4730: 73 20 69 73 20 77 68 61 74 20 77 65 20 64 6f 20 s is what we do
4740: 69 66 20 74 68 65 20 67 72 61 6d 6d 61 72 20 64 if the grammar d
4750: 6f 65 73 20 64 65 66 69 6e 65 20 45 52 52 4f 52 oes define ERROR
4760: 3a 0a 20 20 20 20 20 20 2a 2a 0a 20 20 20 20 20 :. **.
4770: 20 2a 2a 20 20 2a 20 43 61 6c 6c 20 74 68 65 20 ** * Call the
4780: 25 73 79 6e 74 61 78 5f 65 72 72 6f 72 20 66 75 %syntax_error fu
4790: 6e 63 74 69 6f 6e 2e 0a 20 20 20 20 20 20 2a 2a nction.. **
47a0: 0a 20 20 20 20 20 20 2a 2a 20 20 2a 20 42 65 67 . ** * Beg
47b0: 69 6e 20 70 6f 70 70 69 6e 67 20 74 68 65 20 73 in popping the s
47c0: 74 61 63 6b 20 75 6e 74 69 6c 20 77 65 20 65 6e tack until we en
47d0: 74 65 72 20 61 20 73 74 61 74 65 20 77 68 65 72 ter a state wher
47e0: 65 0a 20 20 20 20 20 20 2a 2a 20 20 20 20 69 74 e. ** it
47f0: 20 69 73 20 6c 65 67 61 6c 20 74 6f 20 73 68 69 is legal to shi
4800: 66 74 20 74 68 65 20 65 72 72 6f 72 20 73 79 6d ft the error sym
4810: 62 6f 6c 2c 20 74 68 65 6e 20 73 68 69 66 74 0a bol, then shift.
4820: 20 20 20 20 20 20 2a 2a 20 20 20 20 74 68 65 20 ** the
4830: 65 72 72 6f 72 20 73 79 6d 62 6f 6c 2e 0a 20 20 error symbol..
4840: 20 20 20 20 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 **. **
4850: 20 2a 20 53 65 74 20 74 68 65 20 65 72 72 6f 72 * Set the error
4860: 20 63 6f 75 6e 74 20 74 6f 20 74 68 72 65 65 2e count to three.
4870: 0a 20 20 20 20 20 20 2a 2a 0a 20 20 20 20 20 20 . **.
4880: 2a 2a 20 20 2a 20 42 65 67 69 6e 20 61 63 63 65 ** * Begin acce
4890: 70 74 69 6e 67 20 61 6e 64 20 73 68 69 66 74 69 pting and shifti
48a0: 6e 67 20 6e 65 77 20 74 6f 6b 65 6e 73 2e 20 20 ng new tokens.
48b0: 4e 6f 20 6e 65 77 20 65 72 72 6f 72 0a 20 20 20 No new error.
48c0: 20 20 20 2a 2a 20 20 20 20 70 72 6f 63 65 73 73 ** process
48d0: 69 6e 67 20 77 69 6c 6c 20 6f 63 63 75 72 20 75 ing will occur u
48e0: 6e 74 69 6c 20 74 68 72 65 65 20 74 6f 6b 65 6e ntil three token
48f0: 73 20 68 61 76 65 20 62 65 65 6e 0a 20 20 20 20 s have been.
4900: 20 20 2a 2a 20 20 20 20 73 68 69 66 74 65 64 20 ** shifted
4910: 73 75 63 63 65 73 73 66 75 6c 6c 79 2e 0a 20 20 successfully..
4920: 20 20 20 20 2a 2a 0a 20 20 20 20 20 20 2a 2f 0a **. */.
4930: 20 20 20 20 20 20 69 66 28 20 79 79 70 50 61 72 if( yypPar
4940: 73 65 72 2d 3e 65 72 72 63 6e 74 3c 30 20 29 7b ser->errcnt<0 ){
4950: 0a 20 20 20 20 20 20 20 20 79 79 5f 73 79 6e 74 . yy_synt
4960: 61 78 5f 65 72 72 6f 72 28 79 79 70 50 61 72 73 ax_error(yypPars
4970: 65 72 2c 79 79 6d 61 6a 6f 72 2c 79 79 6d 69 6e er,yymajor,yymin
4980: 6f 72 75 6e 69 6f 6e 20 50 61 72 73 65 41 52 47 orunion ParseARG
4990: 44 45 43 4c 29 3b 0a 20 20 20 20 20 20 7d 0a 20 DECL);. }.
49a0: 20 20 20 20 20 69 66 28 20 79 79 70 50 61 72 73 if( yypPars
49b0: 65 72 2d 3e 74 6f 70 2d 3e 6d 61 6a 6f 72 3d 3d er->top->major==
49c0: 59 59 45 52 52 4f 52 53 59 4d 42 4f 4c 20 7c 7c YYERRORSYMBOL ||
49d0: 20 79 79 65 72 72 6f 72 68 69 74 20 29 7b 0a 23 yyerrorhit ){.#
49e0: 69 66 6e 64 65 66 20 4e 44 45 42 55 47 0a 20 20 ifndef NDEBUG.
49f0: 20 20 20 20 20 20 69 66 28 20 79 79 54 72 61 63 if( yyTrac
4a00: 65 46 49 4c 45 20 29 7b 0a 20 20 20 20 20 20 20 eFILE ){.
4a10: 20 20 20 66 70 72 69 6e 74 66 28 79 79 54 72 61 fprintf(yyTra
4a20: 63 65 46 49 4c 45 2c 22 25 73 44 69 73 63 61 72 ceFILE,"%sDiscar
4a30: 64 20 69 6e 70 75 74 20 74 6f 6b 65 6e 20 25 73 d input token %s
4a40: 5c 6e 22 2c 0a 20 20 20 20 20 20 20 20 20 20 20 \n",.
4a50: 20 20 79 79 54 72 61 63 65 50 72 6f 6d 70 74 2c yyTracePrompt,
4a60: 79 79 54 6f 6b 65 6e 4e 61 6d 65 5b 79 79 6d 61 yyTokenName[yyma
4a70: 6a 6f 72 5d 29 3b 0a 20 20 20 20 20 20 20 20 7d jor]);. }
4a80: 0a 23 65 6e 64 69 66 0a 20 20 20 20 20 20 20 20 .#endif.
4a90: 79 79 5f 64 65 73 74 72 75 63 74 6f 72 28 79 79 yy_destructor(yy
4aa0: 6d 61 6a 6f 72 2c 26 79 79 6d 69 6e 6f 72 75 6e major,&yyminorun
4ab0: 69 6f 6e 29 3b 0a 20 20 20 20 20 20 20 20 79 79 ion);. yy
4ac0: 6d 61 6a 6f 72 20 3d 20 59 59 4e 4f 43 4f 44 45 major = YYNOCODE
4ad0: 3b 0a 20 20 20 20 20 20 7d 65 6c 73 65 7b 0a 20 ;. }else{.
4ae0: 20 20 20 20 20 20 20 20 77 68 69 6c 65 28 0a 20 while(.
4af0: 20 20 20 20 20 20 20 20 20 79 79 70 50 61 72 73 yypPars
4b00: 65 72 2d 3e 69 64 78 20 3e 3d 20 30 20 26 26 0a er->idx >= 0 &&.
4b10: 20 20 20 20 20 20 20 20 20 20 79 79 70 50 61 72 yypPar
4b20: 73 65 72 2d 3e 74 6f 70 2d 3e 6d 61 6a 6f 72 20 ser->top->major
4b30: 21 3d 20 59 59 45 52 52 4f 52 53 59 4d 42 4f 4c != YYERRORSYMBOL
4b40: 20 26 26 0a 20 20 20 20 20 20 20 20 20 20 28 79 &&. (y
4b50: 79 61 63 74 20 3d 20 79 79 5f 66 69 6e 64 5f 70 yact = yy_find_p
4b60: 61 72 73 65 72 5f 61 63 74 69 6f 6e 28 79 79 70 arser_action(yyp
4b70: 50 61 72 73 65 72 2c 59 59 45 52 52 4f 52 53 59 Parser,YYERRORSY
4b80: 4d 42 4f 4c 29 29 20 3e 3d 20 59 59 4e 53 54 41 MBOL)) >= YYNSTA
4b90: 54 45 0a 20 20 20 20 20 20 20 20 29 7b 0a 20 20 TE. ){.
4ba0: 20 20 20 20 20 20 20 20 79 79 5f 70 6f 70 5f 70 yy_pop_p
4bb0: 61 72 73 65 72 5f 73 74 61 63 6b 28 79 79 70 50 arser_stack(yypP
4bc0: 61 72 73 65 72 29 3b 0a 20 20 20 20 20 20 20 20 arser);.
4bd0: 7d 0a 20 20 20 20 20 20 20 20 69 66 28 20 79 79 }. if( yy
4be0: 70 50 61 72 73 65 72 2d 3e 69 64 78 20 3c 20 30 pParser->idx < 0
4bf0: 20 7c 7c 20 79 79 6d 61 6a 6f 72 3d 3d 30 20 29 || yymajor==0 )
4c00: 7b 0a 20 20 20 20 20 20 20 20 20 20 79 79 5f 64 {. yy_d
4c10: 65 73 74 72 75 63 74 6f 72 28 79 79 6d 61 6a 6f estructor(yymajo
4c20: 72 2c 26 79 79 6d 69 6e 6f 72 75 6e 69 6f 6e 29 r,&yyminorunion)
4c30: 3b 0a 20 20 20 20 20 20 20 20 20 20 79 79 5f 70 ;. yy_p
4c40: 61 72 73 65 5f 66 61 69 6c 65 64 28 79 79 70 50 arse_failed(yypP
4c50: 61 72 73 65 72 20 50 61 72 73 65 41 52 47 44 45 arser ParseARGDE
4c60: 43 4c 29 3b 0a 20 20 20 20 20 20 20 20 20 20 79 CL);. y
4c70: 79 6d 61 6a 6f 72 20 3d 20 59 59 4e 4f 43 4f 44 ymajor = YYNOCOD
4c80: 45 3b 0a 20 20 20 20 20 20 20 20 7d 65 6c 73 65 E;. }else
4c90: 20 69 66 28 20 79 79 70 50 61 72 73 65 72 2d 3e if( yypParser->
4ca0: 74 6f 70 2d 3e 6d 61 6a 6f 72 21 3d 59 59 45 52 top->major!=YYER
4cb0: 52 4f 52 53 59 4d 42 4f 4c 20 29 7b 0a 20 20 20 RORSYMBOL ){.
4cc0: 20 20 20 20 20 20 20 59 59 4d 49 4e 4f 52 54 59 YYMINORTY
4cd0: 50 45 20 75 32 3b 0a 20 20 20 20 20 20 20 20 20 PE u2;.
4ce0: 20 75 32 2e 59 59 45 52 52 53 59 4d 44 54 20 3d u2.YYERRSYMDT =
4cf0: 20 30 3b 0a 20 20 20 20 20 20 20 20 20 20 79 79 0;. yy
4d00: 5f 73 68 69 66 74 28 79 79 70 50 61 72 73 65 72 _shift(yypParser
4d10: 2c 79 79 61 63 74 2c 59 59 45 52 52 4f 52 53 59 ,yyact,YYERRORSY
4d20: 4d 42 4f 4c 2c 26 75 32 29 3b 0a 20 20 20 20 20 MBOL,&u2);.
4d30: 20 20 20 7d 0a 20 20 20 20 20 20 7d 0a 20 20 20 }. }.
4d40: 20 20 20 79 79 70 50 61 72 73 65 72 2d 3e 65 72 yypParser->er
4d50: 72 63 6e 74 20 3d 20 33 3b 0a 20 20 20 20 20 20 rcnt = 3;.
4d60: 79 79 65 72 72 6f 72 68 69 74 20 3d 20 31 3b 0a yyerrorhit = 1;.
4d70: 23 65 6c 73 65 20 20 2f 2a 20 59 59 45 52 52 4f #else /* YYERRO
4d80: 52 53 59 4d 42 4f 4c 20 69 73 20 6e 6f 74 20 64 RSYMBOL is not d
4d90: 65 66 69 6e 65 64 20 2a 2f 0a 20 20 20 20 20 20 efined */.
4da0: 2f 2a 20 54 68 69 73 20 69 73 20 77 68 61 74 20 /* This is what
4db0: 77 65 20 64 6f 20 69 66 20 74 68 65 20 67 72 61 we do if the gra
4dc0: 6d 6d 61 72 20 64 6f 65 73 20 6e 6f 74 20 64 65 mmar does not de
4dd0: 66 69 6e 65 20 45 52 52 4f 52 3a 0a 20 20 20 20 fine ERROR:.
4de0: 20 20 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 20 2a **. ** *
4df0: 20 52 65 70 6f 72 74 20 61 6e 20 65 72 72 6f 72 Report an error
4e00: 20 6d 65 73 73 61 67 65 2c 20 61 6e 64 20 74 68 message, and th
4e10: 72 6f 77 20 61 77 61 79 20 74 68 65 20 69 6e 70 row away the inp
4e20: 75 74 20 74 6f 6b 65 6e 2e 0a 20 20 20 20 20 20 ut token..
4e30: 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 20 2a 20 49 **. ** * I
4e40: 66 20 74 68 65 20 69 6e 70 75 74 20 74 6f 6b 65 f the input toke
4e50: 6e 20 69 73 20 24 2c 20 74 68 65 6e 20 66 61 69 n is $, then fai
4e60: 6c 20 74 68 65 20 70 61 72 73 65 2e 0a 20 20 20 l the parse..
4e70: 20 20 20 2a 2a 0a 20 20 20 20 20 20 2a 2a 20 41 **. ** A
4e80: 73 20 62 65 66 6f 72 65 2c 20 73 75 62 73 65 71 s before, subseq
4e90: 75 65 6e 74 20 65 72 72 6f 72 20 6d 65 73 73 61 uent error messa
4ea0: 67 65 73 20 61 72 65 20 73 75 70 70 72 65 73 73 ges are suppress
4eb0: 65 64 20 75 6e 74 69 6c 0a 20 20 20 20 20 20 2a ed until. *
4ec0: 2a 20 74 68 72 65 65 20 69 6e 70 75 74 20 74 6f * three input to
4ed0: 6b 65 6e 73 20 68 61 76 65 20 62 65 65 6e 20 73 kens have been s
4ee0: 75 63 63 65 73 73 66 75 6c 6c 79 20 73 68 69 66 uccessfully shif
4ef0: 74 65 64 2e 0a 20 20 20 20 20 20 2a 2f 0a 20 20 ted.. */.
4f00: 20 20 20 20 69 66 28 20 79 79 70 50 61 72 73 65 if( yypParse
4f10: 72 2d 3e 65 72 72 63 6e 74 3c 3d 30 20 29 7b 0a r->errcnt<=0 ){.
4f20: 20 20 20 20 20 20 20 20 79 79 5f 73 79 6e 74 61 yy_synta
4f30: 78 5f 65 72 72 6f 72 28 79 79 70 50 61 72 73 65 x_error(yypParse
4f40: 72 2c 79 79 6d 61 6a 6f 72 2c 79 79 6d 69 6e 6f r,yymajor,yymino
4f50: 72 75 6e 69 6f 6e 20 50 61 72 73 65 41 52 47 44 runion ParseARGD
4f60: 45 43 4c 29 3b 0a 20 20 20 20 20 20 7d 0a 20 20 ECL);. }.
4f70: 20 20 20 20 79 79 70 50 61 72 73 65 72 2d 3e 65 yypParser->e
4f80: 72 72 63 6e 74 20 3d 20 33 3b 0a 20 20 20 20 20 rrcnt = 3;.
4f90: 20 79 79 5f 64 65 73 74 72 75 63 74 6f 72 28 79 yy_destructor(y
4fa0: 79 6d 61 6a 6f 72 2c 26 79 79 6d 69 6e 6f 72 75 ymajor,&yyminoru
4fb0: 6e 69 6f 6e 29 3b 0a 20 20 20 20 20 20 69 66 28 nion);. if(
4fc0: 20 79 79 65 6e 64 6f 66 69 6e 70 75 74 20 29 7b yyendofinput ){
4fd0: 0a 20 20 20 20 20 20 20 20 79 79 5f 70 61 72 73 . yy_pars
4fe0: 65 5f 66 61 69 6c 65 64 28 79 79 70 50 61 72 73 e_failed(yypPars
4ff0: 65 72 20 50 61 72 73 65 41 52 47 44 45 43 4c 29 er ParseARGDECL)
5000: 3b 0a 20 20 20 20 20 20 7d 0a 20 20 20 20 20 20 ;. }.
5010: 79 79 6d 61 6a 6f 72 20 3d 20 59 59 4e 4f 43 4f yymajor = YYNOCO
5020: 44 45 3b 0a 23 65 6e 64 69 66 0a 20 20 20 20 7d DE;.#endif. }
5030: 65 6c 73 65 7b 0a 20 20 20 20 20 20 79 79 5f 61 else{. yy_a
5040: 63 63 65 70 74 28 79 79 70 50 61 72 73 65 72 20 ccept(yypParser
5050: 50 61 72 73 65 41 52 47 44 45 43 4c 29 3b 0a 20 ParseARGDECL);.
5060: 20 20 20 20 20 79 79 6d 61 6a 6f 72 20 3d 20 59 yymajor = Y
5070: 59 4e 4f 43 4f 44 45 3b 0a 20 20 20 20 7d 0a 20 YNOCODE;. }.
5080: 20 7d 77 68 69 6c 65 28 20 79 79 6d 61 6a 6f 72 }while( yymajor
5090: 21 3d 59 59 4e 4f 43 4f 44 45 20 26 26 20 79 79 !=YYNOCODE && yy
50a0: 70 50 61 72 73 65 72 2d 3e 69 64 78 3e 3d 30 20 pParser->idx>=0
50b0: 29 3b 0a 20 20 72 65 74 75 72 6e 3b 0a 7d 0a );. return;.}.