Cutover to system.h:

Mon Jun 15 22:21:57 1998  Craig Burley  <burley@gnu.org>
	Cutover to system.h:
	* Make-lang.in:
	* Makefile.in:
	* ansify.c:
	* bad.c:
	* bld.c:
	* com.c:
	* com.h:
	* expr.c:
	* fini.c:
	* g77spec.c:
	* implic.c:
	* intdoc.c:
	* intrin.c:
	* lex.c:
	* lex.h:
	* parse.c:
	* proj.c:
	* proj.h:
	* src.c:
	* src.h:
	* stb.c:
	* ste.c:
	* target.c:
	* top.c:
	* system.j: New file.
	Use toplev.h where appropriate:
	* Make-lang.in:
	* Makefile.in:
	* bad.c:
	* bld.c:
	* com.c:
	* lex.c:
	* ste.c:
	* top.c:
	* toplev.j: New file.
	Conditionalize all dumping/reporting routines so they don't
	get built for gcc/egcs:
	* bld.c:
	* bld.h:
	* com.c:
	* equiv.c:
	* equiv.h:
	* sta.c:
	* stt.c:
	* stt.h:
	* symbol.c:
	* symbol.h:
	Use hconfig.h instead of config.h where appropriate:
	* Makefile.in (proj-h.o): Compile with -DUSE_HCONFIG.
	* fini.c: Define USE_HCONFIG before including proj.h.
	* Makefile.in (deps-kinda): Redirect stderr to stdout,
	to eliminate diagnostics vis-a-vis g77spec.c.
	* Makefile.in: Regenerate dependencies via deps-kinda.
	* lex.c (ffelex_file_fixed, ffelex_file_free): Eliminate
	apparently spurious warnings about uninitialized variables
	`c', `column', and so on.

From-SVN: r20520

1 files changed, 11 insertions, 1 deletions

diff --git a/gcc/f/stt.c b/gcc/f/stt.c
index aceb6ad..d2db379 100644
--- a/gcc/f/stt.c
+++ b/gcc/f/stt.c
@@ -121,6 +121,7 @@ ffestt_caselist_create ()
 
    The cases in the list are dumped with commas separating them.  */
 
+#if FFECOM_targetCURRENT == FFECOM_targetFFE
 void
 ffestt_caselist_dump (ffesttCaseList list)
 {
@@ -140,6 +141,7 @@ ffestt_caselist_dump (ffesttCaseList list)
 	}
     }
 }
+#endif
 
 /* ffestt_caselist_kill -- Kill list of cases
 
@@ -443,6 +445,7 @@ ffestt_dimlist_create ()
 
    The dims in the list are dumped with commas separating them.	 */
 
+#if FFECOM_targetCURRENT == FFECOM_targetFFE
 void
 ffestt_dimlist_dump (ffesttDimList list)
 {
@@ -459,6 +462,7 @@ ffestt_dimlist_dump (ffesttDimList list)
 	ffebld_dump (next->upper);
     }
 }
+#endif
 
 /* ffestt_dimlist_kill -- Kill list of dims
 
@@ -614,6 +618,7 @@ ffestt_exprlist_drive (ffesttExprList list, void (*fn) ())
 
    The exprs in the list are dumped with commas separating them.  */
 
+#if FFECOM_targetCURRENT == FFECOM_targetFFE
 void
 ffestt_exprlist_dump (ffesttExprList list)
 {
@@ -626,6 +631,7 @@ ffestt_exprlist_dump (ffesttExprList list)
       ffebld_dump (next->expr);
     }
 }
+#endif
 
 /* ffestt_exprlist_kill -- Kill list of exprs
 
@@ -851,6 +857,7 @@ ffestt_implist_drive (ffesttImpList list, void (*fn) ())
 
    The token pairs in the list are dumped with commas separating them.	*/
 
+#if FFECOM_targetCURRENT == FFECOM_targetFFE
 void
 ffestt_implist_dump (ffesttImpList list)
 {
@@ -870,6 +877,7 @@ ffestt_implist_dump (ffesttImpList list)
 	}
     }
 }
+#endif
 
 /* ffestt_implist_kill -- Kill list of token pairs
 
@@ -934,7 +942,7 @@ ffestt_tokenlist_create ()
   return tl;
 }
 
-/* ffestt_tokenlist_drive -- Dump list of tokens
+/* ffestt_tokenlist_drive -- Drive list of tokens
 
    ffesttTokenList tl;
    void fn(ffelexToken t);
@@ -963,6 +971,7 @@ ffestt_tokenlist_drive (ffesttTokenList tl, void (*fn) ())
 
    The tokens in the list are dumped with commas separating them.  */
 
+#if FFECOM_targetCURRENT == FFECOM_targetFFE
 void
 ffestt_tokenlist_dump (ffesttTokenList tl)
 {
@@ -991,6 +1000,7 @@ ffestt_tokenlist_dump (ffesttTokenList tl)
 	}
     }
 }
+#endif
 
 /* ffestt_tokenlist_handle -- Handle list of tokens