代码搜索：Nested
找到约 7,462 项符合「Nested」的源代码
代码结果 7,462
www.eeworm.com/read/366702/2876552
f90 nested_modules_2.f90
! { dg-do run }
! This tests the patch for PR16861.
!
! Contributed by Paul Thomas
!
module foo
INTEGER :: i
end module foo
module bar
contains
subroutine sub1 (j)
use foo
int
www.eeworm.com/read/366702/2877013
f90 nested_modules_6.f90
! { dg-do compile }
! Test the patch for PR30084 in which the reference to SIZE
! in function diag caused a segfault in module.c.
!
! Contributed by Troban Trumsko
! and reduced by
www.eeworm.com/read/366702/2877088
f90 nested_modules_3.f90
! { dg-do run }
!
! This tests the improved version of the patch for PR16861. Testing
! after committing the first version, revealed that this test did
! not work but was not regtested for, either.
!
www.eeworm.com/read/366702/2877692
f90 where_nested_1.f90
! { dg-do compile }
! PR 25423: Nested WHERE constructs.
program nested_where
implicit none
integer :: a(4)
logical :: mask1(4) = (/.TRUE., .TRUE., .FALSE., .FALSE./), &
ma