diff options
author | iains <iains@138bc75d-0d04-0410-961f-82ee72b054a4> | 2019-10-14 09:28:45 +0000 |
---|---|---|
committer | iains <iains@138bc75d-0d04-0410-961f-82ee72b054a4> | 2019-10-14 09:28:45 +0000 |
commit | 141de8c42dac86ecb74cdde1bf3d404047713bda (patch) | |
tree | 52692a6e37fbd9707690fdae682f66650c3c59c1 /gcc/testsuite/gfortran.dg/pr92018.f90 | |
parent | f956f06189641260c728bf2ed9195d5bca7e9391 (diff) | |
parent | bb3f72175a401d6956b711b4a867ff058a1dcb8c (diff) |
c++-coroutines - merge trunk r276952.c++-coroutines
2019-10-14 Iain Sandoe <iain@sandoe.co.uk>
Merge trunk r276952.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/c++-coroutines@276957 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/testsuite/gfortran.dg/pr92018.f90')
-rw-r--r-- | gcc/testsuite/gfortran.dg/pr92018.f90 | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/pr92018.f90 b/gcc/testsuite/gfortran.dg/pr92018.f90 new file mode 100644 index 00000000000..6c90d2f6762 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/pr92018.f90 @@ -0,0 +1,8 @@ +! { dg-do compile } +! PR fortran/92018 +subroutine sub (f) + integer :: f + print *, f(b'11') ! { dg-error "cannot appear as an actual" } + print *, f(o'11') ! { dg-error "cannot appear as an actual" } + print *, f(z'11') ! { dg-error "cannot appear as an actual" } +end |