diff options
author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2024-10-19 16:21:48 +0200 |
---|---|---|
committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2024-10-19 16:24:11 +0200 |
commit | a8f36de5aa52db2864a4c068dd0b4c9464385159 (patch) | |
tree | ff7c5fdf35f647baaa091501b6dc99ad4f80cb2a | |
parent | 72ceddbfb78dbb95f0808c3eca1765e8cd48b023 (diff) | |
download | gcc-a8f36de5aa52db2864a4c068dd0b4c9464385159.zip gcc-a8f36de5aa52db2864a4c068dd0b4c9464385159.tar.gz gcc-a8f36de5aa52db2864a4c068dd0b4c9464385159.tar.bz2 |
Add missing dg-error to unsigned_38.f90.
gcc/testsuite/ChangeLog:
PR fortran/117225
* gfortran.dg/unsigned_38.f90: Add missing dg-error directive.
-rw-r--r-- | gcc/testsuite/gfortran.dg/unsigned_38.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/unsigned_38.f90 b/gcc/testsuite/gfortran.dg/unsigned_38.f90 index 0d169ac..d549483 100644 --- a/gcc/testsuite/gfortran.dg/unsigned_38.f90 +++ b/gcc/testsuite/gfortran.dg/unsigned_38.f90 @@ -2,5 +2,5 @@ ! { dg-options "-funsigned" } program main unsigned, parameter :: u = 7u - print *,mod(-(u+1u),u) + print *,mod(-(u+1u),u) ! { dg-error "Operand of unary numeric operator" } end program main |