/dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") call abort 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") call abort 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 22 read(10,'(a)') internal_unit 23 if (i.eq.2 .and. internal_unit .ne. " MYSTRING=mon tue wed thu fri ,") STOP 1 24 if (scan(internal_unit,"""'").ne.0) print *, internal_unit
|
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/gfortran.dg/ |
H A D | namelist_84.f90 | 4 character(512) :: internal_unit variable 24 read(10,'(a)') internal_unit 25 if (scan(internal_unit,"""'").ne.0) call abort
|
/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | ldwrite.c | 67 char *internal_unit; member 137 internal_unit = gbl->internal_unit; in restore_gbl() 439 internal_unit = CADR(cunit); in ENTF90IO() 444 gbl->internal_unit = internal_unit; in ENTF90IO() 481 internal_unit = CADR(cunit); in ENTCRF90IO() 484 gbl->internal_unit = internal_unit; in ENTCRF90IO() 522 internal_unit = *cunit; in ENTF90IO() 527 gbl->internal_unit = internal_unit; in ENTF90IO() 550 internal_unit = *cunit; in ENTCRF90IO() 553 gbl->internal_unit = internal_unit; in ENTCRF90IO() [all …]
|
/dports/math/cadical/cadical-1.0.3-cb89cbf/src/ |
H A D | proof.cpp | 82 void Proof::add_derived_unit_clause (int internal_unit) { in add_derived_unit_clause() argument 83 LOG ("PROOF adding unit clause %d", internal_unit); in add_derived_unit_clause() 85 add_literal (internal_unit); in add_derived_unit_clause()
|
/dports/astro/py-astropy/astropy-5.0/astropy/modeling/ |
H A D | parameters.py | 324 if self.internal_unit: 326 self.internal_unit, 374 def internal_unit(self): member in Parameter 380 @internal_unit.setter 381 def internal_unit(self, internal_unit): argument 386 self._internal_unit = internal_unit
|
/dports/lang/gcc8/gcc-8.5.0/libgfortran/io/ |
H A D | unit.c | 458 iunit->internal_unit = dtp->internal_unit; in set_internal_unit() 470 iunit->internal_unit); in set_internal_unit() 473 (const gfc_char4_t*) iunit->internal_unit); in set_internal_unit() 493 iunit->s = open_internal4 (iunit->internal_unit - start_record, in set_internal_unit() 496 iunit->s = open_internal (iunit->internal_unit - start_record, in set_internal_unit() 561 dtp->internal_unit = NULL; in get_unit()
|
/dports/lang/gcc10/gcc-10.3.0/libgfortran/io/ |
H A D | unit.c | 461 iunit->internal_unit = dtp->internal_unit; 473 iunit->internal_unit); 476 (const gfc_char4_t*) iunit->internal_unit); 496 iunit->s = open_internal4 (iunit->internal_unit - start_record, 499 iunit->s = open_internal (iunit->internal_unit - start_record, 564 dtp->internal_unit = NULL;
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/libgfortran/io/ |
H A D | unit.c | 458 iunit->internal_unit = dtp->internal_unit; in set_internal_unit() 470 iunit->internal_unit); in set_internal_unit() 473 (const gfc_char4_t*) iunit->internal_unit); in set_internal_unit() 493 iunit->s = open_internal4 (iunit->internal_unit - start_record, in set_internal_unit() 496 iunit->s = open_internal (iunit->internal_unit - start_record, in set_internal_unit() 561 dtp->internal_unit = NULL; in get_unit()
|