Mercurial > hg > CbC > CbC_gcc

comparison gcc/testsuite/gfortran.dg/inquire_11.f90 @ 111:04ced10e8804

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc 7
author kono
date Fri, 27 Oct 2017 22:46:09 +0900
parents
children
comparison
equal deleted inserted replaced
68:561a7518be6b 111:04ced10e8804
1 ! { dg-do compile }
2 ! PR 33055 Runtime error in INQUIRE unit existance with -fdefault-integer-8
3 ! Test case from PR33217 prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org>
4 MODULE print_it
5 CONTAINS
6 SUBROUTINE i()
7 LOGICAL :: qexist
8 INQUIRE (UNIT=1, EXIST=qexist)
9 END SUBROUTINE i
10 END MODULE print_it