OSDN Git Service

PR fortran/20811
[pf3gnuchains/gcc-fork.git] / gcc / fortran / module.c
index 6f978aa..8f1ab73 100644 (file)
@@ -3741,7 +3741,7 @@ gfc_use_module (void)
   strcpy (filename, module_name);
   strcat (filename, MODULE_EXTENSION);
 
-  module_fp = gfc_open_included_file (filename);
+  module_fp = gfc_open_included_file (filename, true);
   if (module_fp == NULL)
     gfc_fatal_error ("Can't open module file '%s' for reading at %C: %s",
                     filename, strerror (errno));