代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/233522/4667195
cxx vcl_complex+vnl_rational-.cxx
#include
#include
#include
// this function will tickle implicit templates for
// some compilers and detect missing instances for others.
www.eeworm.com/read/233448/4673363
c static5.c
// { dg-do assemble }
// Origin: Mark Mitchell
struct S
{
~S();
};
inline void f()
{
static S s;
atexit (0); // { dg-error "" } implicit declaration
}
www.eeworm.com/read/233448/4678533
c wmost.c
/* APPLE LOCAL file -Wmost */
/* { dg-do compile } */
/* { dg-options "-Wmost" } */
int baz (void);
int
foo ()
{
int loc;
bar (); /* { dg-warning "implicit declaration" } */
if (loc = baz
www.eeworm.com/read/233448/4678683
f90 arraysave.f90
! Program to test arrays with the save attribute
program testarray
implicit none
integer, save, dimension (6, 5) :: a, b
a = 0
a(1, 1) = 42
a(6, 5) = 43
b(:,1:5) = a
call fn (a)
www.eeworm.com/read/233448/4678769
f90 where_7.f90
! Really test where inside forall with temporary
program evil_where
implicit none
type t
logical valid
integer :: s
integer, dimension(:), pointer :: p
end type
type (t), dimension
www.eeworm.com/read/233448/4678776
f90 test_slice.f90
! Program to test handling of reduced rank array sections. This uncovered
! bugs in simplify_shape and the scalarization of array sections.
program test_slice
implicit none
real (kind = 8), di
www.eeworm.com/read/233448/4678797
f90 string.f90
! Program to test string handling
program string
implicit none
character(len=5) :: a, b
character(len=20) :: c
a = 'Hello'
b = 'World'
c = a//b
if (c .ne. 'HelloWorld') call abo
www.eeworm.com/read/233448/4678899
f90 allocate.f90
! Snippet to test various allocate statements
program test_allocate
implicit none
type t
integer i
real r
end type
type pt
integer, pointer :: p
end type
integer,
www.eeworm.com/read/233448/4681546
f90 reduction.f90
! { dg-do run }
! PR 16946
! Not all allowed combinations of arguments for MAXVAL, MINVAL,
! PRODUCT and SUM were supported.
program reduction_mask
implicit none
logical :: equal(3)
integer,
www.eeworm.com/read/233448/4681668
f90 pr16597.f90
! { dg-do run }
! pr 16597
! libgfortran
! reading a direct access record after it was written did
! not always return the correct data.
program gfbug4
implicit none
integer s