* c-lang.c (LANG_HOOKS_INCOMPLETE_TYPE_ERROR): Redefine.

[thirdparty/gcc.git] / gcc / f / com.c

diff --git a/gcc/f/com.c b/gcc/f/com.c
index d0257855b10fc936c15d911f485379c21622d9d1..c100c2a12acc0e7af96fe067d4237842fd3dc02b 100644 (file)
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -14077,21 +14077,6 @@ global_bindings_p ()
   return current_binding_level == global_binding_level;
 }
 
-/* Print an error message for invalid use of an incomplete type.
-   VALUE is the expression that was used (or 0 if that isn't known)
-   and TYPE is the type that was invalid.  */
-
-void
-incomplete_type_error (value, type)
-     tree value UNUSED;
-     tree type;
-{
-  if (TREE_CODE (type) == ERROR_MARK)
-    return;
-
-  assert ("incomplete type?!?" == NULL);
-}
-
 /* Mark ARG for GC.  */
 static void
 mark_binding_level (void *arg)