OSDN Git Service

(do_include): Diagnose #import and #include_next if pedantic and if
[pf3gnuchains/gcc-fork.git] / gcc / bc-typecd.h
1 /* Typecode definitions for Bytecode Interpreter.
2    Copyright (C) 1993 Free Software Foundation, Inc.
3
4 This file is part of GNU CC.
5
6 GNU CC is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
9 any later version.
10
11 GNU CC is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with GNU CC; see the file COPYING.  If not, write to
18 the Free Software Foundation, 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA.  */
20
21 #ifndef TYPECODE_H
22 #define TYPECODE_H
23
24 enum typecode
25 {
26 #define DEFTYPECODE(CODE, NAME, MACHMODE, TYPE) CODE,
27 #include "bc-typecd.def"
28 #undef DEFTYPECODE
29
30   LAST_AND_UNUSED_TYPECODE
31 };
32
33 /* Determine if a given type is integer.  */
34 #define TYPECODE_INTEGER_P(TYPECODE) ((int) (TYPECODE) < (int) SFcode)
35
36 /* Determine if a given type is unsigned.  */
37 #define TYPECODE_UNSIGNED_P(TYPECODE) \
38   (TYPECODE_INTEGER_P(TYPECODE) && (int) (TYPECODE) & 1)
39
40 /* Determine if a given type is signed.  */
41 #define TYPECODE_SIGNED_P(TYPECODE) \
42   (TYPECODE_INTEGER_P(TYPECODE) && !((int) (TYPECODE) & 1))
43
44 /* Determine if a given type is floating.  */
45 #define TYPECODE_FLOAT_P(TYPECODE) \
46   ((int) (TYPECODE) < (int) Pcode && !TYPECODE_INTEGER_P(TYPECODE))
47
48 /* Determine if the given type is arithmetic. */
49 #define TYPECODE_ARITH_P(TYPECODE) \
50   (TYPECODE_INTEGER_P(TYPECODE) || TYPECODE_FLOAT_P(TYPECODE))
51
52 #define NUM_TYPECODES ((int) LAST_AND_UNUSED_TYPECODE)
53
54 #endif