* com.h: Remove FFECOM_targetCURRENT, FFECOM_ONEPASS, BUILT_FOR_270,

        BUILT_FOR_280, FFECOM_GCC_INCLUDE, all derivitive defines, and all
        related conditional compilation directives.
        * bad.c, bld.c, bld.h, com.c, equiv.c, equiv.h, global.h, intdoc.c,
        intrin.c, intrin.h, lex.c, parse.c, sta.c, std.c, ste.c, ste.h, stt.c,
        stt.h, stw.h, symbol.c, symbol.h, target.h, top.c: Likewise.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46324 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 0 insertions, 63 deletions

diff --git a/gcc/f/com.h b/gcc/f/com.h
index a0d08b1736a..5e20e2b10fb 100644
--- a/gcc/f/com.h
+++ b/gcc/f/com.h
@@ -34,27 +34,9 @@ the Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
 
 #define FFECOM_dimensionsMAX 7	/* Max # dimensions (quick hack). */
 
-#define FFECOM_targetFFE 1
-#define FFECOM_targetGCC 2
-
-#ifndef FFE_STANDALONE
-#define FFECOM_targetCURRENT FFECOM_targetGCC	/* Backend! */
-#define FFECOM_ONEPASS 0
-#else
-#define FFECOM_targetCURRENT FFECOM_targetFFE
-#define FFECOM_ONEPASS 0
-#endif
-
-#if FFECOM_ONEPASS
-#define FFECOM_TWOPASS 0
-#else
-#define FFECOM_TWOPASS 1
-#endif
-
 #define FFECOM_SIZE_UNIT "byte"	/* Singular form. */
 #define FFECOM_SIZE_UNITS "bytes"	/* Plural form. */
 
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 #define FFECOM_constantNULL NULL_TREE
 #define FFECOM_nonterNULL NULL_TREE
 #define FFECOM_globalNULL NULL_TREE
@@ -139,31 +121,12 @@ typedef enum
     FFECOM_gfrt
   } ffecomGfrt;
 
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
-
 /* Typedefs. */
 
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 #ifndef TREE_CODE
 #include "tree.h"
 #endif
 
-#ifndef BUILT_FOR_270
-#ifdef DECL_STATIC_CONSTRUCTOR	/* In gcc/tree.h. */
-#define BUILT_FOR_270 1
-#else
-#define BUILT_FOR_270 0
-#endif
-#endif	/* !defined (BUILT_FOR_270) */
-
-#ifndef BUILT_FOR_280
-#ifdef DECL_ONE_ONLY	/* In gcc/tree.h. */
-#define BUILT_FOR_280 1
-#else
-#define BUILT_FOR_280 0
-#endif
-#endif	/* !defined (BUILT_FOR_280) */
-
 typedef tree ffecomConstant;
 #define FFECOM_constantHOOK
 typedef tree ffecomNonter;
@@ -185,7 +148,6 @@ struct _ffecom_symbol_
     tree assign_tree;		/* For ASSIGN'ed vars. */
     bool addr;			/* Is address of item instead of item. */
   };
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 
 /* Include files needed by this one. */
 
@@ -200,7 +162,6 @@ struct _ffecom_symbol_
 
 /* Global objects accessed by users of this module. */
 
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 extern tree string_type_node;
 extern tree ffecom_integer_type_node;
 extern tree ffecom_integer_zero_node;
@@ -227,11 +188,9 @@ extern tree ffecom_f2c_ftnlen_two_node;
 extern tree ffecom_f2c_ptr_to_ftnlen_type_node;
 extern tree ffecom_f2c_ftnint_type_node;
 extern tree ffecom_f2c_ptr_to_ftnint_type_node;
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 
 /* Declare functions with prototypes. */
 
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 tree ffecom_1 (enum tree_code code, tree type, tree node);
 tree ffecom_1_fn (tree node);
 tree ffecom_2 (enum tree_code code, tree type, tree node1, tree node2);
@@ -251,16 +210,12 @@ tree ffecom_constantunion (ffebldConstantUnion *cu, ffeinfoBasictype bt,
 tree ffecom_const_expr (ffebld expr);
 tree ffecom_decl_field (tree context, tree prevfield, const char *name,
 			tree type);
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 void ffecom_close_include (FILE *f);
 int ffecom_decode_include_option (char *spec);
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 tree ffecom_end_compstmt (void);
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 void ffecom_end_transition (void);
 void ffecom_exec_transition (void);
 void ffecom_expand_let_stmt (ffebld dest, ffebld source);
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 tree ffecom_expr (ffebld expr);
 tree ffecom_expr_assign (ffebld expr);
 tree ffecom_expr_assign_w (ffebld expr);
@@ -282,13 +237,11 @@ tree ffecom_make_tempvar (const char *commentary, tree type,
 			  ffetargetCharacterSize size, int elements);
 tree ffecom_modify (tree newtype, tree lhs, tree rhs);
 void ffecom_save_tree_forever (tree t);
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 void ffecom_file (const char *name);
 void ffecom_notify_init_storage (ffestorag st);
 void ffecom_notify_init_symbol (ffesymbol s);
 void ffecom_notify_primary_entry (ffesymbol fn);
 FILE *ffecom_open_include (char *name, ffewhereLine l, ffewhereColumn c);
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 void ffecom_prepare_arg_ptr_to_expr (ffebld expr);
 bool ffecom_prepare_end (void);
 void ffecom_prepare_expr_ (ffebld expr, ffebld dest);
@@ -303,38 +256,22 @@ tree ffecom_save_tree (tree t);
 void ffecom_start_compstmt (void);
 tree ffecom_start_decl (tree decl, bool is_init);
 void ffecom_sym_commit (ffesymbol s);
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 ffesymbol ffecom_sym_end_transition (ffesymbol s);
 ffesymbol ffecom_sym_exec_transition (ffesymbol s);
 ffesymbol ffecom_sym_learned (ffesymbol s);
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 void ffecom_sym_retract (ffesymbol s);
 tree ffecom_temp_label (void);
 tree ffecom_truth_value (tree expr);
 tree ffecom_truth_value_invert (tree expr);
 tree ffecom_type_expr (ffebld expr);
 tree ffecom_which_entrypoint_decl (void);
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 
 /* Define macros. */
 
-#if FFECOM_targetCURRENT == FFECOM_targetFFE
-#define ffecom_expr(e) (e)
-#define ffecom_init_0()
-#define ffecom_init_2()
-#define ffecom_label_kind() FFEINFO_kindtypeINTEGERDEFAULT
-#define ffecom_pointer_kind() FFEINFO_kindtypeINTEGERDEFAULT
-#define ffecom_ptr_to_expr(e) (e)
-#define ffecom_sym_commit(s)
-#define ffecom_sym_retract(s)
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetFFE */
-
-#if FFECOM_targetCURRENT == FFECOM_targetGCC
 #define ffecom_f2c_typecode(bt,kt) ffecom_f2c_typecode_[(bt)][(kt)]
 #define ffecom_label_kind() ffecom_label_kind_
 #define ffecom_pointer_kind() ffecom_pointer_kind_
 #define ffecom_prepare_expr(e) ffecom_prepare_expr_ ((e), NULL)
-#endif	/* FFECOM_targetCURRENT == FFECOM_targetGCC */
 
 #define ffecom_init_1()
 #define ffecom_init_3()