aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Koenig <tkoenig@gcc.gnu.org>2024-10-19 16:21:48 +0200
committerThomas Koenig <tkoenig@gcc.gnu.org>2024-10-19 16:24:11 +0200
commita8f36de5aa52db2864a4c068dd0b4c9464385159 (patch)
treeff7c5fdf35f647baaa091501b6dc99ad4f80cb2a
parent72ceddbfb78dbb95f0808c3eca1765e8cd48b023 (diff)
downloadgcc-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.f902
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