/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | buffers.f90 | 53 INTEGER :: nrec, unit, recl component 86 ENTRY%recl = -1 140 INTEGER,INTENT(in) :: unit, recl local 146 IF(recl<0) THEN 212 INTEGER :: recl local 218 recl = -1 220 recl = CURSOR%recl 309 IF(CURSOR%recl/=recl) THEN 350 IF(CURSOR%recl/=recl) THEN 457 CURSOR%recl = recl [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/ |
H A D | inquire_recl_f2018.f90 | 8 inquire(10, recl=r) 15 inquire(10, recl=r) 16 inquire(10, recl=r4) 26 open(10, status="scratch", recl=100) 27 inquire(10, recl=r) 37 inquire(10, recl=r) 45 inquire(file='unconnectedfile.txt', recl=r)
|
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/ |
H A D | io_constraints_3.f90 | 47 open(10, iostat=u,recl="ee") ! { dg-error "must be of type INTEGER" } 48 open(10, iostat=u,recl=0.4) ! { dg-error "must be of type INTEGER" } 49 open(10, iostat=u,recl=zero) ! { dg-warning "must be positive" } 50 open(10, iostat=u,recl=mone) ! { dg-warning "must be positive" } 110 open(10, err=99,recl=0.4) ! { dg-error "must be of type INTEGER" } 111 open(10, err=99,recl=zero) ! { dg-warning "must be positive" } 112 open(10, err=99,recl=mone) ! { dg-warning "must be positive" } 170 open(10,recl="ee") ! { dg-error "must be of type INTEGER" } 171 open(10,recl=0.4) ! { dg-error "must be of type INTEGER" } 172 open(10,recl=zero) ! { dg-error "must be positive" } [all …]
|