re PR libfortran/89020 (close(status='DELETE') does not remove file)

2019-01-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

	PR libfortran/89020
	* io/close.c (st_close): Simplify text of error message to not
	presume a specific cause of failure to remove file.

From-SVN: r268319

libgfortran/ChangeLog

+2019-01-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
+
+	PR libfortran/89020
+	* io/close.c (st_close): Simplify text of error message to not
+	presume a specific cause of failure to remove file.
+
 2019-01-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
 	PR libfortran/89020

libgfortran/io/close.c

@@ -102,8 +102,7 @@ st_close (st_parameter_close *clp)
 
 		  if (remove (u->filename))
 		    generate_error (&clp->common, LIBERROR_OS,
-			    "File cannot be deleted, possibly in use by"
-			    " another process");
+				    "File cannot be deleted");
 #else
 		  path = strdup (u->filename);
 #endif
@@ -118,8 +117,7 @@ st_close (st_parameter_close *clp)
 	{
 	  if (remove (path))
 	    generate_error (&clp->common, LIBERROR_OS,
-		    "File cannot be deleted, possibly in use by"
-		    " another process");
+			    "File cannot be deleted");
 	  free (path);
 	}
 #endif