代码搜索:contained
找到约 5,885 项符合「contained」的源代码
代码结果 5,885
www.eeworm.com/read/233448/4681687
f90 contained_1.f90
! PR15986
! Siblings may be used as actual arguments, in which case they look like
! variables during parsing. Also checks that actual variables aren't replaced
! by siblings with the same name
! { d
www.eeworm.com/read/168845/5434618
dsp test_contained_class.dsp
# Microsoft Developer Studio Project File - Name="test_contained_class" - Package Owner=
# Microsoft Developer Studio Generated Build File, Format Version 6.00
# ** DO NOT EDIT **
# TARGTYPE "
www.eeworm.com/read/168845/5434754
cpp test_contained_class.cpp
/////////1/////////2/////////3/////////4/////////5/////////6/////////7/////////8
// test_contained_class.cpp
// (C) Copyright 2002 Robert Ramey - http://www.rrsd.com .
// Use, modification and d
www.eeworm.com/read/162614/5523275
f90 contained_3.f90
! Program to test contained functions calling their siblings.
! This is tricky because we don't find the declaration for the sibling
! function until after the caller has been parsed.
program containe
www.eeworm.com/read/162614/5523302
f90 contained2.f90
! Program to check resolution of symbols with the same name
program contained2
implicit none
integer var1
var1 = 42
if (f1() .ne. 1) call abort
call f2()
if (var1 .ne. 42) call a
www.eeworm.com/read/162614/5523348
f90 contained_5.f90
! Function returning an array continaed in a module. Caused problems 'cos
! we tried to add the dummy return vars to the parent scope.
Module contained_5
contains
FUNCTION test ()
REAL, DIMENSION
www.eeworm.com/read/162614/5523355
f90 contained_4.f90
! Check contained functions with the same name.
module contained_4
contains
subroutine foo1()
call bar()
contains
subroutine bar()
end subroutine bar
end subroutine foo1
subrout
www.eeworm.com/read/162614/5523357
f90 contained_2.f90
! Arrays declared in parent but used in the child.
program error
implicit none
integer, dimension (10) :: a
contains
subroutine test()
implicit none
a(1) = 0
end subroutine
end
www.eeworm.com/read/162614/5523370
f90 contained_3.f90
! Program to check using parent variables in more than one contained function
program contained_3
implicit none
integer var
contains
subroutine one
var = 1
end subroutine
subrouti