代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/366702/2877026
f90 namelist_51.f90
! { dg-do run }
! PR36676 Namelist comment problems
! test case from PR, reduced by Jerry DeLisle
program mem_nml
implicit none
integer, save :: nxc
nxc = 0
ca
www.eeworm.com/read/366702/2877147
f90 advance_6.f90
! { dg-do run }
! PR 34370 - file positioning after non-advancing I/O didn't add
! a record marker.
program main
implicit none
character(len=3) :: c
character(len=80), parameter :: fname = "adv
www.eeworm.com/read/366702/2877193
f90 write_zero_array.f90
! { dg-do run }
! PR30145 write statement fails to ignore zero-sized array
! Test case from PR, submitted by Jerry DeLisle
program zeros
implicit none
character(20) :: msg =
www.eeworm.com/read/366702/2877330
f90 pure_byref_2.f90
! { dg-do run }
! PR 22607: PURE return-by-reference functions
program main
implicit none
integer, dimension(2) :: b
b = fun(size(b))
if (b(1) /= 1 .or. b(2) /= 2) call abort()
contains
pure
www.eeworm.com/read/366702/2877429
f90 pr32238.f90
!PR fortran/32238
! { dg-do compile }
! { dg-final { cleanup-modules "bug_test" } }
module bug_test
contains
subroutine bug(c)
implicit none
integer, parameter :: fp = selected_real_kind(13)
www.eeworm.com/read/366702/2877576
f90 inquire.f90
! { dg-do run }
! check to see that you cannot open a direct access file
! for sequential i/o.
! derived from NIST test fm910.for
IMPLICIT NONE
CHARACTER*10 D4VK
OPEN(UNIT=7, A
www.eeworm.com/read/366702/2877582
f03 c_loc_tests_10.f03
! { dg-do compile }
subroutine aaa(in)
use iso_c_binding
implicit none
integer(KIND=C_int), DIMENSION(:), TARGET :: in
type(c_ptr) :: cptr
cptr = c_loc(in) ! { dg-error "not C interoperable
www.eeworm.com/read/366702/2877783
f90 minmaxloc_4.f90
! { dg-do run }
! Test to make sure that PR 33354 remains fixed and doesn't regress
PROGRAM TST
IMPLICIT NONE
REAL :: A(1,3)
REAL :: B(3,1)
A(:,1) = 10
A(:,2) = 20
A(:,3) = 30
!WRITE(*,
www.eeworm.com/read/366702/2880916
c wconversion-integer.c
/* Test for diagnostics for implicit conversions between integer types
These tests come from gcc/testsuite/gcc.dg/overflow-warn-2.c */
/* { dg-do compile } */
/* { dg-options "-std=c99 -fsigned-c
www.eeworm.com/read/366702/2882156
c wconversion-integer-no-sign.c
/* Test for diagnostics for implicit conversions between integer types
These tests come from gcc/testsuite/gcc.dg/overflow-warn-2.c */
/* { dg-do compile } */
/* { dg-options "-std=c99 -fsigned-c