Fwd: intrinsic repeat() completely broken (regression)

[Damian Rouson <damian at sourceryinstitute dot org>]

I'm forwarding the email below for Zaak Beekman, who received the
following error when attempting to send the email to this list:

"Message not delivered
There was a problem delivering your message to fortran@gcc.gnu.org.
See the technical details below, or try resending in a few minutes.
The response from the remote server was:
552 spam score exceeded threshold"

Damian


---------- Forwarded message ---------
From: Zaak Beekman <zbeekman@gmail.com>
Date: Tue, Mar 26, 2019 at 9:07 AM
Subject: intrinsic repeat() completely broken (regression)
To: <fortran@gcc.gnu.org>
Cc: Damian Rouson <damian@sourceryinstitute.org>


-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA512


Hi All,

I have filed a bug report at
https://gcc.gnu.org/bugzilla/show_bug.cgi?id=89830 which seems to be a
serious regression.

There are two main issues:

1. The non-elemental intrinsic string handling function, repeat(),
seems to be completely broken and unusable in most cases. I included a
very trivial reproducer in the bug report.

2. The other problem is that, in the opencoarrays extension module
(see https://github.com/sourceryinstitute/OpenCoarrays/blob/8ceb2ce8912f4f0d5317a6cce248d042b3942280/src/extensions/opencoarrays.F90#L590)
it successfully compiles, however, even when taking measures to create
reproducible builds it still embeds an error message with the full
source directory path into the generated object files:

```
$ cd /Users/ibeekman/Sandbox/OpenCoarrays/build/src/mpi &&
/usr/local/bin/gfortran-8 -DGCC_GE_7 -DGCC_GE_8 -DHAVE_MPI
- - -DMPI_WORKING_MODULE -DPREFIX_NAME=_gfortran_caf_
- - -I/usr/local/Cellar/mpich/3.3/include
- - -I/Users/ibeekman/Sandbox/OpenCoarrays/build/include/OpenCoarrays-2.6.1_GNU-8.3.0
- - -I/Users/ibeekman/Sandbox/OpenCoarrays/src -fno-working-directory -O3
- - -DNDEBUG -O3 -J../../include/OpenCoarrays-2.6.1_GNU-8.3.0 -fPIC
- - -fcoarray=lib -c
/Users/ibeekman/Sandbox/OpenCoarrays/src/extensions/opencoarrays.F90
- - -o CMakeFiles/opencoarrays_mod.dir/__/extensions/opencoarrays.F90.o

$ strings src/mpi/CMakeFiles/opencoarrays_mod.dir/__/extensions/opencoarrays.F90.o

Argument NCOPIES of REPEAT intrinsic is negative (its value is %ld)
At line 590 of file
/Users/ibeekman/Sandbox/OpenCoarrays/src/extensions/opencoarrays.F90
```

Notice that the `-fno-working-directory` flag was passed to GFortran.

Thanks,
Zaak
-----BEGIN PGP SIGNATURE-----

iQIzBAEBCgAdFiEEqUSJ2TjLk2Zo+QkRqTznDYAhvQ8FAlyaTekACgkQqTznDYAh
vQ/OYQ/+NHF8wh1syzDB7lZU/+GJXGOXcDClZinLmWs9J+y0EUfHoRBezIV7LKfH
A6EmjCw1GEga0Lm+6JvekW4+mdVdYvs9E415yJte1Vm4ID8ju2muZXo59jc+klVZ
6c11Wl75X5T5qQ8Ibw+/JN+qskCFSEh9dP2Sfbyq+INvAzKCh8rIqQxaUBLjwc+b
VhsCAy9l8y3oPBeBIduL8TQw6PiOqpVi7y8rzOPUSc3WpbERGqQJ2jrwmJLPhyym
8WxBcCxShxqjvAxy6up5drZHGd7E+bmvD/raFYmQxuA6U6HPFQoV1Iu3ltBG/Tte
0GMucOaZ7OqWi501BhSR7Igkk+DbvVxXN8fPdh9OaH0iigrcAm7dpEnccEJdomHF
0Bm6DS2syBy6PZKOqJWIXj16lrMxdl/8hUbz4SXuTqWcPyVDE3i5DktCOvMhXZOr
4yfDiU3GZJQ18FXcAyOCJx8L3Qp8XljFrl4bQbbRxkutk8RJw77ag9iu4yWHDMJE
vq6wThcpPcIp6oCf/iQ86dup+o9G3ZmxVFqrB+L3EBH4fUZDeRpHgYs8MK4xSZMp
eVrD/5QJglLGhRLUCc4evYJU7+avamLvrtfZPb8cFFmqC+bEBajGvlA4bbtDumXi
qLC3MDGz9fHnU5m5C2pv5pcRoCPNLfnZIlpBUxA9koEYuI6BTMI=
=AbGF
-----END PGP SIGNATURE-----