Index: gcc/fortran/f95-lang.c
--- gcc/fortran/f95-lang.c.orig
+++ gcc/fortran/f95-lang.c
@@ -1284,6 +1284,11 @@ gfc_maybe_initialize_eh (void)
   using_eh_for_cleanups ();
 }
 
+const char *
+fname_as_string(int pretty_p __attribute__((__unused__)))
+{
+	return NULL;
+}
 
 #include "gt-fortran-f95-lang.h"
 #include "gtype-fortran.h"