blob: 38e4de6c3ca34fda769114532d1e6e8802e5c98b [file] [log] [blame]
Guido van Rossumf70e43a1991-02-19 12:39:46 +00001/***********************************************************
Guido van Rossumb9f8d6e1995-01-04 19:08:09 +00002Copyright 1991-1995 by Stichting Mathematisch Centrum, Amsterdam,
3The Netherlands.
Guido van Rossumf70e43a1991-02-19 12:39:46 +00004
5 All Rights Reserved
6
Guido van Rossumd266eb41996-10-25 14:44:06 +00007Permission to use, copy, modify, and distribute this software and its
8documentation for any purpose and without fee is hereby granted,
Guido van Rossumf70e43a1991-02-19 12:39:46 +00009provided that the above copyright notice appear in all copies and that
Guido van Rossumd266eb41996-10-25 14:44:06 +000010both that copyright notice and this permission notice appear in
Guido van Rossumf70e43a1991-02-19 12:39:46 +000011supporting documentation, and that the names of Stichting Mathematisch
Guido van Rossumd266eb41996-10-25 14:44:06 +000012Centrum or CWI or Corporation for National Research Initiatives or
13CNRI not be used in advertising or publicity pertaining to
14distribution of the software without specific, written prior
15permission.
Guido van Rossumf70e43a1991-02-19 12:39:46 +000016
Guido van Rossumd266eb41996-10-25 14:44:06 +000017While CWI is the initial source for this software, a modified version
18is made available by the Corporation for National Research Initiatives
19(CNRI) at the Internet address ftp://ftp.python.org.
20
21STICHTING MATHEMATISCH CENTRUM AND CNRI DISCLAIM ALL WARRANTIES WITH
22REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF
23MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL STICHTING MATHEMATISCH
24CENTRUM OR CNRI BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL
25DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
26PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
27TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
28PERFORMANCE OF THIS SOFTWARE.
Guido van Rossumf70e43a1991-02-19 12:39:46 +000029
30******************************************************************/
31
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000032/* Grammar subroutines needed by parser */
33
Guido van Rossum3f5da241990-12-20 15:06:42 +000034#include "pgenheaders.h"
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000035#include "assert.h"
36#include "grammar.h"
37#include "token.h"
38
39/* Return the DFA for the given type */
40
41dfa *
Guido van Rossum86bea461997-04-29 21:03:06 +000042PyGrammar_FindDFA(g, type)
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000043 grammar *g;
44 register int type;
45{
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000046 register dfa *d;
Guido van Rossum6522eb01994-09-09 11:11:39 +000047#if 1
48 /* Massive speed-up */
49 d = &g->g_dfa[type - NT_OFFSET];
50 assert(d->d_type == type);
51 return d;
52#else
53 /* Old, slow version */
54 register int i;
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000055
56 for (i = g->g_ndfas, d = g->g_dfa; --i >= 0; d++) {
57 if (d->d_type == type)
58 return d;
59 }
60 assert(0);
61 /* NOTREACHED */
Guido van Rossum6522eb01994-09-09 11:11:39 +000062#endif
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000063}
64
65char *
Guido van Rossum86bea461997-04-29 21:03:06 +000066PyGrammar_LabelRepr(lb)
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000067 label *lb;
68{
69 static char buf[100];
70
71 if (lb->lb_type == ENDMARKER)
72 return "EMPTY";
73 else if (ISNONTERMINAL(lb->lb_type)) {
74 if (lb->lb_str == NULL) {
75 sprintf(buf, "NT%d", lb->lb_type);
76 return buf;
77 }
78 else
79 return lb->lb_str;
80 }
81 else {
82 if (lb->lb_str == NULL)
Guido van Rossum86bea461997-04-29 21:03:06 +000083 return _PyParser_TokenNames[lb->lb_type];
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000084 else {
85 sprintf(buf, "%.32s(%.32s)",
Guido van Rossum86bea461997-04-29 21:03:06 +000086 _PyParser_TokenNames[lb->lb_type], lb->lb_str);
Guido van Rossum85a5fbb1990-10-14 12:07:46 +000087 return buf;
88 }
89 }
90}