aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ChangeLog8
-rw-r--r--gcc/Makefile.in11
-rw-r--r--gcc/c-family/ChangeLog7
-rw-r--r--gcc/c-family/c-cppbuiltin.c95
-rw-r--r--gcc/cppbuiltin.c157
-rw-r--r--gcc/cppbuiltin.h37
-rw-r--r--gcc/fortran/ChangeLog7
-rw-r--r--gcc/fortran/Make-lang.in4
-rw-r--r--gcc/fortran/cpp.c74
9 files changed, 242 insertions, 158 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 9f3a315..049a1db 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,6 +1,12 @@
+2010-10-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
+
+ * cppbuiltin.c: New file.
+ * cppbuiltin.h: New file.
+ * Makefile.in: Take into account cppbuiltin.{h,c}.
+
2010-10-03 Andi Kleen <ak@linux.intel.com>
- * lto-cgraph.c (input_cgraph): Check for missing sections.
+ * lto-cgraph.c (input_cgraph): Check for missing sections.
2010-10-03 Uros Bizjak <ubizjak@gmail.com>
diff --git a/gcc/Makefile.in b/gcc/Makefile.in
index a402976..d4970c3 100644
--- a/gcc/Makefile.in
+++ b/gcc/Makefile.in
@@ -1449,6 +1449,7 @@ OBJS-archive = \
cgraph.o \
cgraphbuild.o \
cgraphunit.o \
+ cppbuiltin.o \
cppdefault.o \
incpath.o \
ipa-cp.o \
@@ -2093,9 +2094,9 @@ c-family/c-common.o : c-family/c-common.c $(CONFIG_H) $(SYSTEM_H) coretypes.h \
c-family/c-cppbuiltin.o : c-family/c-cppbuiltin.c $(CONFIG_H) $(SYSTEM_H) \
coretypes.h $(TM_H) $(TREE_H) version.h $(C_COMMON_H) $(C_PRAGMA_H) \
$(FLAGS_H) $(TOPLEV_H) output.h $(TREE_H) $(TARGET_H) \
- $(TM_P_H) $(BASEVER) debug.h $(CPP_ID_DATA_H)
+ $(TM_P_H) debug.h $(CPP_ID_DATA_H) cppbuiltin.h
$(COMPILER) -c $(ALL_COMPILERFLAGS) $(ALL_CPPFLAGS) \
- -DBASEVER=$(BASEVER_s) $< $(OUTPUT_OPTION)
+ $< $(OUTPUT_OPTION)
c-family/c-dump.o : c-family/c-dump.c $(CONFIG_H) $(SYSTEM_H) coretypes.h \
$(TM_H) $(TREE_H) $(TREE_DUMP_H)
@@ -3964,6 +3965,12 @@ PREPROCESSOR_DEFINES = \
-DSTANDARD_EXEC_PREFIX=\"$(libdir)/gcc/\" \
@TARGET_SYSTEM_ROOT_DEFINE@
+cppbuiltin.o: cppbuiltin.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) \
+ cppbuiltin.h Makefile
+ $(COMPILER) $(ALL_COMPILERFLAGS) $(ALL_CPPFLAGS) \
+ $(PREPROCESSOR_DEFINES) -DBASEVER=$(BASEVER_s) \
+ -c $(srcdir)/cppbuiltin.c $(OUTPUT_OPTION)
+
cppdefault.o: cppdefault.c $(CONFIG_H) $(SYSTEM_H) coretypes.h $(TM_H) \
cppdefault.h Makefile
$(COMPILER) $(ALL_COMPILERFLAGS) $(ALL_CPPFLAGS) \
diff --git a/gcc/c-family/ChangeLog b/gcc/c-family/ChangeLog
index 94b71c9..dc15f63 100644
--- a/gcc/c-family/ChangeLog
+++ b/gcc/c-family/ChangeLog
@@ -1,3 +1,10 @@
+2010-10-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
+
+ * c-cppbuiltin.c (define__GNUC__, builtin_define_type_precision):
+ Remove.
+ (c_cpp_builtins): Call functions from cppbuiltin.c instead
+ of duplicating code.
+
2010-09-30 Iain Sandoe <iains@gcc.gnu.org>
* c-common.c: Add two new entries for @optional
diff --git a/gcc/c-family/c-cppbuiltin.c b/gcc/c-family/c-cppbuiltin.c
index 7fe2993..f946dc2 100644
--- a/gcc/c-family/c-cppbuiltin.c
+++ b/gcc/c-family/c-cppbuiltin.c
@@ -33,6 +33,7 @@ along with GCC; see the file COPYING3. If not see
#include "tm_p.h" /* For TARGET_CPU_CPP_BUILTINS & friends. */
#include "target.h"
#include "cpp-id-data.h"
+#include "cppbuiltin.h"
#ifndef TARGET_OS_CPP_BUILTINS
# define TARGET_OS_CPP_BUILTINS()
@@ -57,20 +58,11 @@ static void builtin_define_stdint_macros (void);
static void builtin_define_constants (const char *, tree);
static void builtin_define_type_max (const char *, tree);
static void builtin_define_type_minmax (const char *, const char *, tree);
-static void builtin_define_type_precision (const char *, tree);
static void builtin_define_type_sizeof (const char *, tree);
static void builtin_define_float_constants (const char *,
const char *,
const char *,
tree);
-static void define__GNUC__ (void);
-
-/* Define NAME with value TYPE precision. */
-static void
-builtin_define_type_precision (const char *name, tree type)
-{
- builtin_define_with_int_value (name, TYPE_PRECISION (type));
-}
/* Define NAME with value TYPE size_unit. */
static void
@@ -389,25 +381,6 @@ builtin_define_fixed_point_constants (const char *name_prefix,
builtin_define_with_value (name, buf, 0);
}
-/* Define __GNUC__, __GNUC_MINOR__ and __GNUC_PATCHLEVEL__. */
-static void
-define__GNUC__ (void)
-{
- int major, minor, patchlevel;
-
- if (sscanf (BASEVER, "%d.%d.%d", &major, &minor, &patchlevel) != 3)
- {
- sscanf (BASEVER, "%d.%d", &major, &minor);
- patchlevel = 0;
- }
- cpp_define_formatted (parse_in, "__GNUC__=%d", major);
- cpp_define_formatted (parse_in, "__GNUC_MINOR__=%d", minor);
- cpp_define_formatted (parse_in, "__GNUC_PATCHLEVEL__=%d", patchlevel);
-
- if (c_dialect_cxx ())
- cpp_define_formatted (parse_in, "__GNUG__=%d", major);
-}
-
/* Define macros used by <stdint.h>. */
static void
builtin_define_stdint_macros (void)
@@ -557,7 +530,14 @@ c_cpp_builtins (cpp_reader *pfile)
if (flag_undef)
return;
- define__GNUC__ ();
+ define_language_independent_builtin_macros (pfile);
+
+ if (c_dialect_cxx ())
+ {
+ int major;
+ parse_basever (&major, NULL, NULL);
+ cpp_define_formatted (pfile, "__GNUG__=%d", major);
+ }
/* For stddef.h. They require macros defined in c-common.c. */
c_stddef_cpp_builtins ();
@@ -616,13 +596,10 @@ c_cpp_builtins (cpp_reader *pfile)
builtin_define_type_max ("__PTRDIFF_MAX__", ptrdiff_type_node);
builtin_define_type_max ("__SIZE_MAX__", size_type_node);
- builtin_define_type_precision ("__CHAR_BIT__", char_type_node);
-
/* stdint.h and the testsuite need to know these. */
builtin_define_stdint_macros ();
- /* float.h needs to know these. */
-
+ /* float.h needs to know this. */
builtin_define_with_int_value ("__FLT_EVAL_METHOD__",
TARGET_FLT_EVAL_METHOD);
@@ -704,49 +681,13 @@ c_cpp_builtins (cpp_reader *pfile)
builtin_define_with_value ("__USER_LABEL_PREFIX__", user_label_prefix, 0);
/* Misc. */
- builtin_define_with_value ("__VERSION__", version_string, 1);
-
if (flag_gnu89_inline)
cpp_define (pfile, "__GNUC_GNU_INLINE__");
else
cpp_define (pfile, "__GNUC_STDC_INLINE__");
- /* Definitions for LP64 model. */
- if (TYPE_PRECISION (long_integer_type_node) == 64
- && POINTER_SIZE == 64
- && TYPE_PRECISION (integer_type_node) == 32)
- {
- cpp_define (pfile, "_LP64");
- cpp_define (pfile, "__LP64__");
- }
-
- /* Other target-independent built-ins determined by command-line
- options. */
- if (optimize_size)
- cpp_define (pfile, "__OPTIMIZE_SIZE__");
- if (optimize)
- cpp_define (pfile, "__OPTIMIZE__");
-
- if (fast_math_flags_set_p ())
- cpp_define (pfile, "__FAST_MATH__");
if (flag_no_inline)
cpp_define (pfile, "__NO_INLINE__");
- if (flag_signaling_nans)
- cpp_define (pfile, "__SUPPORT_SNAN__");
- if (flag_finite_math_only)
- cpp_define (pfile, "__FINITE_MATH_ONLY__=1");
- else
- cpp_define (pfile, "__FINITE_MATH_ONLY__=0");
- if (flag_pic)
- {
- builtin_define_with_int_value ("__pic__", flag_pic);
- builtin_define_with_int_value ("__PIC__", flag_pic);
- }
- if (flag_pie)
- {
- builtin_define_with_int_value ("__pie__", flag_pie);
- builtin_define_with_int_value ("__PIE__", flag_pie);
- }
if (flag_iso)
cpp_define (pfile, "__STRICT_ANSI__");
@@ -810,26 +751,13 @@ c_cpp_builtins (cpp_reader *pfile)
if (flag_openmp)
cpp_define (pfile, "_OPENMP=200805");
- builtin_define_type_sizeof ("__SIZEOF_INT__", integer_type_node);
- builtin_define_type_sizeof ("__SIZEOF_LONG__", long_integer_type_node);
- builtin_define_type_sizeof ("__SIZEOF_LONG_LONG__",
- long_long_integer_type_node);
if (int128_integer_type_node != NULL_TREE)
builtin_define_type_sizeof ("__SIZEOF_INT128__",
int128_integer_type_node);
- builtin_define_type_sizeof ("__SIZEOF_SHORT__", short_integer_type_node);
- builtin_define_type_sizeof ("__SIZEOF_FLOAT__", float_type_node);
- builtin_define_type_sizeof ("__SIZEOF_DOUBLE__", double_type_node);
- builtin_define_type_sizeof ("__SIZEOF_LONG_DOUBLE__", long_double_type_node);
- builtin_define_type_sizeof ("__SIZEOF_SIZE_T__", size_type_node);
builtin_define_type_sizeof ("__SIZEOF_WCHAR_T__", wchar_type_node);
builtin_define_type_sizeof ("__SIZEOF_WINT_T__", wint_type_node);
builtin_define_type_sizeof ("__SIZEOF_PTRDIFF_T__",
unsigned_ptrdiff_type_node);
- /* ptr_type_node can't be used here since ptr_mode is only set when
- toplev calls backend_init which is not done with -E switch. */
- builtin_define_with_int_value ("__SIZEOF_POINTER__",
- POINTER_SIZE / BITS_PER_UNIT);
/* A straightforward target hook doesn't work, because of problems
linking that hook's body when part of non-C front ends. */
@@ -855,9 +783,6 @@ c_cpp_builtins (cpp_reader *pfile)
format. */
if (ENABLE_DECIMAL_FLOAT && ENABLE_DECIMAL_BID_FORMAT)
cpp_define (pfile, "__DECIMAL_BID_FORMAT__");
-
- builtin_define_with_int_value ("__BIGGEST_ALIGNMENT__",
- BIGGEST_ALIGNMENT / BITS_PER_UNIT);
}
/* Pass an object-like macro. If it doesn't lie in the user's
diff --git a/gcc/cppbuiltin.c b/gcc/cppbuiltin.c
new file mode 100644
index 0000000..89b0f41
--- /dev/null
+++ b/gcc/cppbuiltin.c
@@ -0,0 +1,157 @@
+/* Define builtin-in macros for all front ends that perform preprocessing
+ Copyright (C) 2010
+ Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 3, or (at your option) any later
+version.
+
+GCC is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with GCC; see the file COPYING3. If not see
+<http://www.gnu.org/licenses/>. */
+
+#include "config.h"
+#include "system.h"
+#include "coretypes.h"
+#include "tm.h"
+#include "tree.h"
+#include "version.h"
+#include "flags.h"
+#include "toplev.h"
+#include "cpp-id-data.h"
+#include "cppbuiltin.h"
+
+
+/* Parse a BASEVER version string of the format "major.minor.patchlevel"
+ or "major.minor" to extract its components. */
+void
+parse_basever (int *major, int *minor, int *patchlevel)
+{
+ static int s_major = -1, s_minor, s_patchlevel;
+
+ if (s_major == -1)
+ if (sscanf (BASEVER, "%d.%d.%d", &s_major, &s_minor, &s_patchlevel) != 3)
+ {
+ sscanf (BASEVER, "%d.%d", &s_major, &s_minor);
+ s_patchlevel = 0;
+ }
+
+ if (major)
+ *major = s_major;
+
+ if (minor)
+ *minor = s_minor;
+
+ if (patchlevel)
+ *patchlevel = s_patchlevel;
+}
+
+
+/* Define __GNUC__, __GNUC_MINOR__, __GNUC_PATCHLEVEL__ and __VERSION__. */
+static void
+define__GNUC__ (cpp_reader *pfile)
+{
+ int major, minor, patchlevel;
+
+ parse_basever (&major, &minor, &patchlevel);
+ cpp_define_formatted (pfile, "__GNUC__=%d", major);
+ cpp_define_formatted (pfile, "__GNUC_MINOR__=%d", minor);
+ cpp_define_formatted (pfile, "__GNUC_PATCHLEVEL__=%d", patchlevel);
+ cpp_define_formatted (pfile, "__VERSION__=\"%s\"", version_string);
+}
+
+
+/* Define various built-in CPP macros that depend on language-independent
+ compilation flags. */
+static void
+define_builtin_macros_for_compilation_flags (cpp_reader *pfile)
+{
+ if (flag_pic)
+ {
+ cpp_define_formatted (pfile, "__pic__=%d", flag_pic);
+ cpp_define_formatted (pfile, "__PIC__=%d", flag_pic);
+ }
+ if (flag_pie)
+ {
+ cpp_define_formatted (pfile, "__pie__=%d", flag_pie);
+ cpp_define_formatted (pfile, "__PIE__=%d", flag_pie);
+ }
+
+ if (optimize_size)
+ cpp_define (pfile, "__OPTIMIZE_SIZE__");
+ if (optimize)
+ cpp_define (pfile, "__OPTIMIZE__");
+
+ if (fast_math_flags_set_p ())
+ cpp_define (pfile, "__FAST_MATH__");
+ if (flag_signaling_nans)
+ cpp_define (pfile, "__SUPPORT_SNAN__");
+
+ cpp_define_formatted (pfile, "__FINITE_MATH_ONLY__=%d",
+ flag_finite_math_only);
+}
+
+
+/* Define built-in macros for LP64 targets. */
+static void
+define_builtin_macros_for_lp64 (cpp_reader *pfile)
+{
+ if (TYPE_PRECISION (long_integer_type_node) == 64
+ && POINTER_SIZE == 64
+ && TYPE_PRECISION (integer_type_node) == 32)
+ {
+ cpp_define (pfile, "_LP64");
+ cpp_define (pfile, "__LP64__");
+ }
+}
+
+
+/* Define macros for size of basic C types. */
+static void
+define_builtin_macros_for_type_sizes (cpp_reader *pfile)
+{
+#define define_type_sizeof(NAME, TYPE) \
+ cpp_define_formatted (pfile, NAME"="HOST_WIDE_INT_PRINT_DEC, \
+ tree_low_cst (TYPE_SIZE_UNIT (TYPE), 1))
+
+ define_type_sizeof ("__SIZEOF_INT__", integer_type_node);
+ define_type_sizeof ("__SIZEOF_LONG__", long_integer_type_node);
+ define_type_sizeof ("__SIZEOF_LONG_LONG__", long_long_integer_type_node);
+ define_type_sizeof ("__SIZEOF_SHORT__", short_integer_type_node);
+ define_type_sizeof ("__SIZEOF_FLOAT__", float_type_node);
+ define_type_sizeof ("__SIZEOF_DOUBLE__", double_type_node);
+ define_type_sizeof ("__SIZEOF_LONG_DOUBLE__", long_double_type_node);
+ define_type_sizeof ("__SIZEOF_SIZE_T__", size_type_node);
+
+#undef define_type_sizeof
+
+ cpp_define_formatted (pfile, "__CHAR_BIT__=%u",
+ TYPE_PRECISION (char_type_node));
+ cpp_define_formatted (pfile, "__BIGGEST_ALIGNMENT__=%d",
+ BIGGEST_ALIGNMENT / BITS_PER_UNIT);
+
+ /* ptr_type_node can't be used here since ptr_mode is only set when
+ toplev calls backend_init which is not done with -E switch. */
+ cpp_define_formatted (pfile, "__SIZEOF_POINTER__=%d",
+ POINTER_SIZE / BITS_PER_UNIT);
+}
+
+
+/* Define macros builtins common to all language performing CPP
+ preprocessing. */
+void
+define_language_independent_builtin_macros (cpp_reader *pfile)
+{
+ define__GNUC__ (pfile);
+ define_builtin_macros_for_compilation_flags (pfile);
+ define_builtin_macros_for_lp64 (pfile);
+ define_builtin_macros_for_type_sizes (pfile);
+}
diff --git a/gcc/cppbuiltin.h b/gcc/cppbuiltin.h
new file mode 100644
index 0000000..f884512
--- /dev/null
+++ b/gcc/cppbuiltin.h
@@ -0,0 +1,37 @@
+/* Define builtin-in macros for all front ends that perform preprocessing
+ Copyright (C) 2010
+ Free Software Foundation, Inc.
+
+This file is part of GCC.
+
+GCC is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 3, or (at your option) any later
+version.
+
+GCC is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+for more details.
+
+You should have received a copy of the GNU General Public License
+along with GCC; see the file COPYING3. If not see
+<http://www.gnu.org/licenses/>. */
+
+#ifndef GCC_CPPBUILTIN_H
+#define GCC_CPPBUILTIN_H
+
+#include "coretypes.h"
+
+
+/* Parse a BASEVER version string of the format "major.minor.patchlevel"
+ or "major.minor" to extract its components. */
+extern void parse_basever (int *, int *, int *);
+
+/* Define macros builtins common to all language performing CPP
+ preprocessing. */
+extern void define_language_independent_builtin_macros (cpp_reader *);
+
+
+#endif /* ! GCC_CPPBUILTIN_H */
+
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 417a60a..fe38d30 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2010-10-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
+
+ * cpp.c (cpp_define_builtins): Call functions from cppbuiltin.c
+ instead of duplicating code.
+ * Make-lang.in: Add dependency on cppbuiltin.h. Don't define
+ BASEVER.
+
2010-10-02 Janus Weil <janus@gcc.gnu.org>
PR fortran/45748
diff --git a/gcc/fortran/Make-lang.in b/gcc/fortran/Make-lang.in
index 8f72d32..6dd752f 100644
--- a/gcc/fortran/Make-lang.in
+++ b/gcc/fortran/Make-lang.in
@@ -360,6 +360,6 @@ fortran/trans-common.o: $(GFORTRAN_TRANS_DEPS) $(TARGET_H) $(RTL_H)
fortran/resolve.o: fortran/dependency.h fortran/data.h fortran/target-memory.h
fortran/data.o: fortran/data.h
fortran/options.o: $(PARAMS_H) $(TARGET_H) fortran/cpp.h
-fortran/cpp.o: fortran/cpp.c $(BASEVER) incpath.h incpath.o
+fortran/cpp.o: fortran/cpp.c incpath.h incpath.o cppbuiltin.h
$(COMPILER) -c $(ALL_COMPILERFLAGS) $(ALL_CPPFLAGS) \
- -DBASEVER=$(BASEVER_s) $< $(OUTPUT_OPTION)
+ $< $(OUTPUT_OPTION)
diff --git a/gcc/fortran/cpp.c b/gcc/fortran/cpp.c
index 908c92a..ff49025 100644
--- a/gcc/fortran/cpp.c
+++ b/gcc/fortran/cpp.c
@@ -35,8 +35,13 @@ along with GCC; see the file COPYING3. If not see
#include "../../libcpp/internal.h"
#include "cpp.h"
#include "incpath.h"
+#include "cppbuiltin.h"
#include "mkdeps.h"
+#ifndef TARGET_CPU_CPP_BUILTINS
+# define TARGET_CPU_CPP_BUILTINS()
+#endif
+
#ifndef TARGET_OS_CPP_BUILTINS
# define TARGET_OS_CPP_BUILTINS()
#endif
@@ -156,86 +161,19 @@ static void dump_queued_macros (cpp_reader *);
static void
cpp_define_builtins (cpp_reader *pfile)
{
- int major, minor, patchlevel;
-
/* Initialize CPP built-ins; '1' corresponds to 'flag_hosted'
in C, defines __STDC_HOSTED__?! */
cpp_init_builtins (pfile, 0);
/* Initialize GFORTRAN specific builtins.
These are documented. */
- if (sscanf (BASEVER, "%d.%d.%d", &major, &minor, &patchlevel) != 3)
- {
- sscanf (BASEVER, "%d.%d", &major, &minor);
- patchlevel = 0;
- }
- cpp_define_formatted (pfile, "__GNUC__=%d", major);
- cpp_define_formatted (pfile, "__GNUC_MINOR__=%d", minor);
- cpp_define_formatted (pfile, "__GNUC_PATCHLEVEL__=%d", patchlevel);
-
+ define_language_independent_builtin_macros (pfile);
cpp_define (pfile, "__GFORTRAN__=1");
cpp_define (pfile, "_LANGUAGE_FORTRAN=1");
if (gfc_option.gfc_flag_openmp)
cpp_define (pfile, "_OPENMP=200805");
-
- /* More builtins that might be useful, but are not documented
- (in no particular order). */
- cpp_define_formatted (pfile, "__VERSION__=\"%s\"", version_string);
-
- if (flag_pic)
- {
- cpp_define_formatted (pfile, "__pic__=%d", flag_pic);
- cpp_define_formatted (pfile, "__PIC__=%d", flag_pic);
- }
- if (flag_pie)
- {
- cpp_define_formatted (pfile, "__pie__=%d", flag_pie);
- cpp_define_formatted (pfile, "__PIE__=%d", flag_pie);
- }
-
- if (optimize_size)
- cpp_define (pfile, "__OPTIMIZE_SIZE__");
- if (optimize)
- cpp_define (pfile, "__OPTIMIZE__");
-
- if (fast_math_flags_set_p ())
- cpp_define (pfile, "__FAST_MATH__");
- if (flag_signaling_nans)
- cpp_define (pfile, "__SUPPORT_SNAN__");
-
- cpp_define_formatted (pfile, "__FINITE_MATH_ONLY__=%d", flag_finite_math_only);
-
- /* Definitions for LP64 model. */
- if (TYPE_PRECISION (long_integer_type_node) == 64
- && POINTER_SIZE == 64
- && TYPE_PRECISION (integer_type_node) == 32)
- {
- cpp_define (pfile, "_LP64");
- cpp_define (pfile, "__LP64__");
- }
-
- /* Define NAME with value TYPE size_unit.
- The C-side also defines __SIZEOF_WCHAR_T__, __SIZEOF_WINT_T__
- __SIZEOF_PTRDIFF_T__, however, fortran seems to lack the
- appropriate type nodes. */
-
-#define define_type_sizeof(NAME, TYPE) \
- cpp_define_formatted (pfile, NAME"="HOST_WIDE_INT_PRINT_DEC, \
- tree_low_cst (TYPE_SIZE_UNIT (TYPE), 1))
-
- define_type_sizeof ("__SIZEOF_INT__", integer_type_node);
- define_type_sizeof ("__SIZEOF_LONG__", long_integer_type_node);
- define_type_sizeof ("__SIZEOF_LONG_LONG__", long_long_integer_type_node);
- define_type_sizeof ("__SIZEOF_SHORT__", short_integer_type_node);
- define_type_sizeof ("__SIZEOF_FLOAT__", float_type_node);
- define_type_sizeof ("__SIZEOF_DOUBLE__", double_type_node);
- define_type_sizeof ("__SIZEOF_LONG_DOUBLE__", long_double_type_node);
- define_type_sizeof ("__SIZEOF_SIZE_T__", size_type_node);
-
-#undef define_type_sizeof
-
/* The defines below are necessary for the TARGET_* macros.
FIXME: Note that builtin_define_std() actually is a function