代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/366702/2868262
c ptrmem7.c
// Copyright (C) 2007 Free Software Foundation
// Contributed by Ollie Wild
// { dg-do compile }
// Assorted pointer to member function implicit cast tests.
struct A { int f (); };
www.eeworm.com/read/366702/2869845
c typename7.c
// { dg-do assemble }
// { dg-options "" }
// Test for implicit typename
template
struct A {
protected:
typedef struct B { } B;
};
template
struct C { };
template
s
www.eeworm.com/read/366702/2871648
c 900211_04.c
// { dg-do assemble }
// g++ 1.36.1 bug 900211_04
// g++ fails to flag as errors attempts to compare pointer values against
// (nonzero) integer values;
// Since implicit conversions of pointer to
www.eeworm.com/read/366702/2871782
c template36.c
// { dg-do run }
// Testcase for implicit 'typename' and resolution of 'typename's in the
// current scope.
class base1 {
public:
int bar() const
{ return 1; }
};
class base2 {
public:
www.eeworm.com/read/366702/2873160
f90 forall_3.f90
! PR fortran/15080
! Really test forall with temporary
program evil_forall
implicit none
type t
logical valid
integer :: s
integer, dimension(:), pointer :: p
end type
type (t), di
www.eeworm.com/read/366702/2873163
f90 intrinsic_mod_ulo.f90
! Program to test MOD and MODULO intrinsics
subroutine integertest (ops, res)
implicit none
integer, dimension(2) :: ops
integer, dimension(2) :: res
if ((mod(ops(1), ops(2)) .ne. res(1))
www.eeworm.com/read/366702/2873164
f90 intrinsic_count.f90
! Program to test the COUNT intrinsic
program intrinsic_count
implicit none
logical(kind=4), dimension (3, 5) :: a
integer(kind=4), dimension (3) :: b
integer i
character(len=10) line
www.eeworm.com/read/366702/2873172
f90 mainsub.f90
! Program to test compilation of subroutines following the main program
program mainsub
implicit none
integer i
external test
i = 0
call test (i)
if (i .ne. 42) call abort
end progr
www.eeworm.com/read/366702/2873263
f90 partparm.f90
! Program to test
subroutine test (p)
integer, dimension (3) :: p
if (any (p .ne. (/ 2, 4, 6/))) call abort
end subroutine
program partparm
implicit none
integer, dimension (2, 3) :: a
www.eeworm.com/read/366702/2873288
f90 forall.f90
! Program to test the FORALL construct
program testforall
implicit none
integer, dimension (3, 3) :: a
integer, dimension (3) :: b
integer i
a = reshape ((/1, 2, 3, 4, 5, 6, 7, 8, 9/),