2ba2db697e
I should have done this when I bumped the port port earlier. A few of the changes to the diff-* files directly affect FreeBSD although most are results of other platforms (NetBSD, OpenBSD mainly) The most invasive change was exchanging strcpy and printf for their "n" versions. It was to make OpenBSD happy but the code is better for it.
11 lines
473 B
Text
11 lines
473 B
Text
--- gcc/testsuite/gfortran.dg/open_errors.f90.orig
|
|
+++ gcc/testsuite/gfortran.dg/open_errors.f90
|
|
@@ -22,7 +22,7 @@
|
|
if (msg /= "File 'temptestfile' does not exist") call abort()
|
|
|
|
open(77,file="./", iomsg=msg, iostat=i)
|
|
-if (msg /= "'./' is a directory" .and. msg /= "Invalid argument") call abort()
|
|
+if (msg /= "'./' is a directory" .and. msg /= "Invalid argument" .and. msg /= "File './' already exists") call abort()
|
|
|
|
open(77,file=n,status="new")
|
|
i = chmod(n, "-w")
|