代码搜索：Interface
找到约 10,000 项符合「Interface」的源代码
代码结果 10,000
www.eeworm.com/read/366702/2877073
f90 interface_assignment_2.f90
! { dg-do run }
! Checks the fix for PR32842, in which the interface assignment
! below caused a segfault. This testcase is reduced from vst_2.f95
! in the iso_varying_string testsuite, from Lawrie S
www.eeworm.com/read/366702/2877102
f90 interface_assignment_1.f90
! { dg-do run }
! Checks the fix for PR31205, in which temporaries were not
! written for the interface assignment and the parentheses below.
!
! Contributed by Joost VandeVondele
!
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/2877188
f90 interface_assignment_3.f90
! { dg-do compile }
! Checks the fix for PR34008, in which INTENT(INOUT) was disallowed
! for the first argument of assign_m, whereas both INOUT and OUT
! should be allowed.
!
! Contributed by Harald
www.eeworm.com/read/366702/2877406
f90 invalid_interface_assignment.f90
! { dg-do compile }
! Tests the fix for PR25102, which did not diagnose the aberrant interface
! assignement below.
!
! Contributed by Joost VandeVondele
!
MODULE TT
TYPE data_type
www.eeworm.com/read/366702/2877477
f90 used_interface_ref.f90
! { dg-do run }
! Tests the fix for PR26393, in which an ICE would occur in trans-decl.c
! (gfc_get_symbol_decl) because anzKomponenten is not referenced in the
! interface for solveCConvert. The solu
www.eeworm.com/read/366702/2877650
f90 interface_abstract_1.f90
! { dg-do compile }
!
module mod_interf_abstract
implicit none
abstract interface :: one ! { dg-error "Syntax error in ABSTRACT INTERFACE statement" }
end interface ! { dg-error "Expecting END MODULE
www.eeworm.com/read/366702/2877777
f90 interface_abstract_2.f90
! { dg-do compile }
! { dg-options "-std=f95" }
abstract interface ! { dg-error "Fortran 2003: ABSTRACT INTERFACE" }
subroutine two()
end subroutine two
end interface ! { dg-error "Expecting END P