bad.c (inhibit_warnings): Delete redundant declaration.

	* bad.c (inhibit_warnings): Delete redundant declaration.

	* com.c (skip_redundant_dir_prefix): Likewise.

	* com.h (mark_addressable): Likewise.

From-SVN: r41312

diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index 0b56f58a0f31d6acc01b7a55b7db9dd2f9ae6176..cae6cb242c48f97787d0d62bf24aa26357188f1b 100644 (file)
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -1,3 +1,11 @@
+Thu Apr 12 17:57:55 2001  Kaveh R. Ghazi  <ghazi@caip.rutgers.edu>
+
+       * bad.c (inhibit_warnings): Delete redundant declaration.
+
+       * com.c (skip_redundant_dir_prefix): Likewise.
+
+       * com.h (mark_addressable): Likewise.
+
 2001-04-02  Jakub Jelinek  <jakub@redhat.com>
 
        * lex.c (ffelex_hash_): Avoid eating one whole line after

diff --git a/gcc/f/bad.c b/gcc/f/bad.c
index f34253f7a6f4934b68975d9a0892e153c6e95509..930daf964d4e384471b4a1ad4fd59b8c7cf40c17 100644 (file)
--- a/gcc/f/bad.c
+++ b/gcc/f/bad.c
@@ -184,8 +184,6 @@ ffebad_start_ (bool lex_override, ffebad errnum, ffebadSeverity sev,
 
 #if FFECOM_targetCURRENT == FFECOM_targetGCC
   {
-    extern int inhibit_warnings;       /* From toplev.c. */
-
     switch (ffebad_severity_)
       {                                /* Tell toplev.c about this message. */
       case FFEBAD_severityINFORMATIONAL:

diff --git a/gcc/f/com.c b/gcc/f/com.c
index fac923b7d499a67de4b74db124d24a5c160f4299..52843e3ab259450fdcadd071215ce875f0143f1e 100644 (file)
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -15648,7 +15648,6 @@ static void append_include_chain (struct file_name_list *first,
 static FILE *open_include_file (char *filename,
                                struct file_name_list *searchptr);
 static void print_containing_files (ffebadSeverity sev);
-static const char *skip_redundant_dir_prefix (const char *);
 static char *read_filename_string (int ch, FILE *f);
 static struct file_name_map *read_name_map (const char *dirname);
 

diff --git a/gcc/f/com.h b/gcc/f/com.h
index d0dfe8f84bc265d8864f91f467189695da549b63..07abfb06d067f02f75d79b30b9a7d544f77f0722 100644 (file)
--- a/gcc/f/com.h
+++ b/gcc/f/com.h
@@ -314,11 +314,6 @@ 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);
-
-/* These need to be in the front end with exactly these interfaces,
-   as they're called by the back end.  */
-
-int mark_addressable (tree expr);
 #endif /* FFECOM_targetCURRENT == FFECOM_targetGCC */
 
 /* Define macros. */