代码搜索：Module
找到约 10,000 项符合「Module」的源代码
代码结果 10,000
www.eeworm.com/read/366702/2876767
f90 module_private_1.f90
! { dg-do compile }
! { dg-options "-fmodule-private" }
module bar
implicit none
public :: i
integer :: i
end module bar
module foo
implicit none
integer :: j
end module foo
program main
www.eeworm.com/read/366702/2876973
f90 module_equivalence_3.f90
! { dg-do run }
! This checks the fix for PR32103 in which not using one member
! of an equivalence group would cause all memory of the equivalence
! to be lost and subsequent incorrect referencing of
www.eeworm.com/read/366702/2876979
f90 module_interface_2.f90
! { dg-do compile }
! Tests the fix for PR29464, in which the second USE of the generic
! interface caused an error.
!
! Contributed by Vivek Rao
!
module foo_mod
implicit none
www.eeworm.com/read/366702/2877127
f90 module_interface_1.f90
! { dg-do run }
! This tests the fix for PR16940, module interfaces to
! contained functions caused ICEs.
! This is a simplified version of the example in the PR
! discussion, which was due to L.Meiss
www.eeworm.com/read/366702/2877168
f90 automatic_module_variable.f90
! { dg-do compile }
! Tests fix for PR15976
!
module sd
integer, parameter :: n = 20
integer :: i(n)
integer :: j(m) ! { dg-error "must have constant shape" }
integer, pointer :: p(:)
intege
www.eeworm.com/read/366702/2877395
f90 module_equivalence_1.f90
! { dg-do run }
! This tests the fix for PR17917, where equivalences were not being
! written to and read back from modules.
!
! Contributed by Paul Thomas pault@gcc.gnu.org
!
module test_equiv !Bug
www.eeworm.com/read/366702/2877533
f90 module_equivalence_2.f90
! { dg-do run }
! Tests the fix for PR27269 and PR27xxx.
! The former caused a segfault in trying to process
! module b, with an unused equivalence in a. The latter
! produced an assembler error due t
www.eeworm.com/read/366702/2877641
f90 module_blank_common.f90
! { dg-do run }
!
! This tests that blank common works in modules. PR23270
! Contributed by Paul Thomas
!
module global
common a, b
real a, b
end module global
program blan
www.eeworm.com/read/366702/2877714
f90 module_commons_1.f90
! { dg-do run }
! This program tests that use associated common blocks work.
!
! provided by Paul Thomas - pault@gcc.gnu.org
!
module m1
common /x/ a
end module m1
module m2
common /x/ a
end modul
www.eeworm.com/read/358128/3005400
3 module::build::platform::vms.3
.\" Automatically generated by Pod::Man 2.16 (Pod::Simple 3.05)
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sh \" Subsection heading
.br