diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/ishft.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/ishft.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/ishft.f90 b/gcc/testsuite/gfortran.dg/ishft.f90 index d8ca3a7de73..88edd30efdd 100644 --- a/gcc/testsuite/gfortran.dg/ishft.f90 +++ b/gcc/testsuite/gfortran.dg/ishft.f90 @@ -25,7 +25,7 @@ if (ishft (1_8, 0) /= 1) call abort if (ishft (1_8, 1) /= 2) call abort if (ishft (3_8, 1) /= 6) call abort if (ishft (-1_8, 1) /= -2) call abort -if (ishft (-1_8, -60) /= z'F'_8) call abort ! { dg-warning "" "" } +if (ishft (-1_8, -60) /= z'F') call abort if (ishftc (1_1, 0) /= 1) call abort if (ishftc (1_1, 1) /= 2) call abort |