1952e2e1c1
These bits are taken from the FSF anoncvs repo on 1-Feb-2002 08:20 PST.
88 lines
3.2 KiB
C
88 lines
3.2 KiB
C
/* Define constants and variables for communication with parse.y.
|
|
Copyright (C) 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
|
|
2000 Free Software Foundation, Inc.
|
|
Hacked by Michael Tiemann (tiemann@cygnus.com)
|
|
and by Brendan Kehoe (brendan@cygnus.com).
|
|
|
|
This file is part of GNU CC.
|
|
|
|
GNU CC is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY. No author or distributor
|
|
accepts responsibility to anyone for the consequences of using it
|
|
or for whether it serves any particular purpose or works at all,
|
|
unless he says so in writing. Refer to the GNU CC General Public
|
|
License for full details.
|
|
|
|
Everyone is granted permission to copy, modify and redistribute
|
|
GNU CC, but only under the conditions described in the
|
|
GNU CC General Public License. A copy of this license is
|
|
supposed to have been given to you along with GNU CC so you
|
|
can know your rights and responsibilities. It should be in a
|
|
file named COPYING. Among other things, the copyright notice
|
|
and this notice must be preserved on all copies. */
|
|
|
|
#ifndef GCC_CP_LEX_H
|
|
#define GCC_CP_LEX_H
|
|
|
|
#if 0
|
|
/* Formerly, the RID_* values used as mask bits did not fit into a
|
|
single 32-bit word. Now they do, but let's preserve the old logic
|
|
in case they ever stop fitting again. -zw, 8 Aug 2000 */
|
|
|
|
/* The type that can represent all values of RIDBIT. */
|
|
/* We assume that we can stick in at least 32 bits into this. */
|
|
typedef struct { unsigned long idata[2]; }
|
|
RID_BIT_TYPE;
|
|
|
|
/* Be careful, all these modify N twice. */
|
|
#define RIDBIT_SETP(N, V) (((unsigned long)1 << (int) ((N)%32)) \
|
|
& (V).idata[(N)/32])
|
|
#define RIDBIT_NOTSETP(NN, VV) (! RIDBIT_SETP (NN, VV))
|
|
#define RIDBIT_SET(N, V) do { \
|
|
(V).idata[(N)/32] \
|
|
|= ((unsigned long)1 << (int) ((N)%32)); \
|
|
} while (0)
|
|
#define RIDBIT_RESET(N, V) do { \
|
|
(V).idata[(N)/32] \
|
|
&= ~((unsigned long)1 << (int) ((N)%32)); \
|
|
} while (0)
|
|
#define RIDBIT_RESET_ALL(V) do { \
|
|
(V).idata[0] = 0; \
|
|
(V).idata[1] = 0; \
|
|
} while (0)
|
|
#define RIDBIT_ANY_SET(V) ((V).idata[0] || (V).idata[1])
|
|
#else
|
|
typedef unsigned long RID_BIT_TYPE; /* assumed at least 32 bits */
|
|
#define RIDBIT_OF(R) ((unsigned long)1 << (int) (R))
|
|
|
|
#define RIDBIT_SETP(N, V) ((V) & RIDBIT_OF (N))
|
|
#define RIDBIT_NOTSETP(N, V) (! ((V) & RIDBIT_OF (N)))
|
|
#define RIDBIT_ANY_SET(V) (V)
|
|
|
|
#define RIDBIT_SET(N, V) do { (V) |= RIDBIT_OF (N); } while (0)
|
|
#define RIDBIT_RESET(N, V) do { (V) &= ~RIDBIT_OF (N); } while (0)
|
|
#define RIDBIT_RESET_ALL(V) do { (V) = 0; } while (0)
|
|
#endif
|
|
|
|
/* the declaration found for the last IDENTIFIER token read in.
|
|
yylex must look this up to detect typedefs, which get token type TYPENAME,
|
|
so it is left around in case the identifier is not a typedef but is
|
|
used in a context which makes it a reference to a variable. */
|
|
extern tree lastiddecl;
|
|
|
|
/* Back-door communication channel to the lexer. */
|
|
extern int looking_for_typename;
|
|
extern int looking_for_template;
|
|
|
|
/* Tell the lexer where to look for names. */
|
|
extern tree got_scope;
|
|
extern tree got_object;
|
|
|
|
/* Pending language change.
|
|
Positive is push count, negative is pop count. */
|
|
extern int pending_lang_change;
|
|
|
|
extern int yylex PARAMS ((void));
|
|
|
|
#endif /* ! GCC_CP_LEX_H */
|