代码搜索：implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/233522/4667987
txx vcl_string.txx
#ifndef vcl_string_txx_
#define vcl_string_txx_
// -*- c++ -*-
#include "vcl_string.h"
#if !VCL_USE_NATIVE_STL
# include "emulation/vcl_string.txx"
#elif VCL_USE_IMPLICIT_TEMPLATES
# includ
www.eeworm.com/read/233522/4668025
txx vcl_utility.txx
#ifndef vcl_utility_txx_
#define vcl_utility_txx_
// -*- c++ -*-
#include "vcl_utility.h"
#if VCL_USE_IMPLICIT_TEMPLATES
# include "iso/vcl_utility.txx"
#elif !VCL_USE_NATIVE_STL
# include
www.eeworm.com/read/233448/4678679
f90 t_edit.f90
!pr 14897 T edit descriptor broken
implicit none
character*80 line
WRITE(line,'(T5,A,T10,A,T15,A)')'AA','BB','CC'
if (line.ne.' AA BB CC ') call abort
WRITE(li
www.eeworm.com/read/233448/4678704
f90 intrinsic_integer.f90
! Program to test the real->integer conversion routines.
program intrinsic_integer
implicit none
call test (0.0, (/0, 0, 0, 0/))
call test (0.3, (/0, 1, 0, 0/))
call test (0.7, (/0, 1, 0, 1/)
www.eeworm.com/read/233448/4678747
f90 cmplx.f90
! Test complex munbers
program testcmplx
implicit none
complex(kind=4) c, d
complex(kind=8) z
real(kind=4) x, y
real(kind=8) q
! cmplx intrinsic
x = 3
y = 4
c = cmplx(x,y)
www.eeworm.com/read/233448/4678799
f90 intrinsic_dim.f90
! Program to test the DIM intrinsic
program intrinsic_dim
implicit none
integer i, j
real(kind=4) :: r, s
real(kind=8) :: p, q
i = 1
j = 4
if (dim (i, j) .ne. 0) call abort
if
www.eeworm.com/read/233448/4678825
f90 intrinsic_abs.f90
! Program to test the ABS intrinsic
program intrinsic_abs
implicit none
integer i
real(kind=4) r
real(kind=8) q
complex z
i = 42
i = abs(i)
if (i .ne. 42) call abort
i = -4
www.eeworm.com/read/233448/4681657
f90 pr17706.f90
! { dg-do run }
! PR17706
! this is a libgfortran test
! output value -0.00 is not standard compliant
! derived from NIST F77 test FM406, with extra bits added.
program pr17706
implicit none
chara
www.eeworm.com/read/233448/4684031
c i386-3dnowa-1.c
/* { dg-do assemble { target i?86-*-* } } */
/* { dg-require-effective-target ilp32 } */
/* { dg-options "-O2 -Werror-implicit-function-declaration -m3dnow -march=athlon" } */
/* Test that the intrin
www.eeworm.com/read/233448/4685182
c i386-3dnow-1.c
/* { dg-do assemble { target i?86-*-* x86_64-*-* } } */
/* { dg-options "-O2 -Werror-implicit-function-declaration -m3dnow" } */
/* Test that the intrinsics compile with optimization. All of them ar