代码搜索:implicit
找到约 5,250 项符合「implicit」的源代码
代码结果 5,250
www.eeworm.com/read/305277/3778818
scala testcast.scala
package test;
class A;
class B extends A {
def foo: int = 1;
}
object B {
def view(x: B): B1 = null;
}
class B1 {
def bar: int = 1
}
object C {
implicit def view(x: A): B1 = null;
}
objec
www.eeworm.com/read/292144/3955609
erl mk_ssl_pkix_oid.erl
-module(mk_ssl_pkix_oid).
-export([make/0]).
-define(PKIX_MODULES, ['PKIX1Algorithms88', 'PKIX1Explicit88',
'PKIX1Implicit88']).
make() ->
{ok, Fd} = file:open("ssl_pkix_oid.erl", [wri
www.eeworm.com/read/366702/2873204
f90 math.f90
! Program to test mathematical intrinsics
subroutine dotest (n, val4, val8, known)
implicit none
real(kind=4) val4, known
real(kind=8) val8
integer n
if (abs (val4 - known) .gt. 0.001)
www.eeworm.com/read/366702/2873296
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/366702/2876004
f90 char_transpose_1.f90
! Test transpose for character arrays.
! { dg-do run }
program main
implicit none
integer, parameter :: n1 = 3, n2 = 4, slen = 9
character (len = slen), dimension (n1, n2) :: a
integer :: i1,
www.eeworm.com/read/366702/2876542
f03 c_loc_tests_2.f03
! { dg-do run }
! { dg-additional-sources c_loc_tests_2_funcs.c }
module c_loc_tests_2
use, intrinsic :: iso_c_binding
implicit none
interface
function test_scalar_address(cptr) bind(c)
use,
www.eeworm.com/read/366702/2876616
f03 test_common_binding_labels_3.f03
! { dg-do compile }
module test_common_binding_labels_3
use, intrinsic :: iso_c_binding, only: c_double
implicit none
common /mycom/ r, s
real(c_double) :: r
real(c_double) :: s
bind(c,
www.eeworm.com/read/366702/2876727
f03 c_loc_tests_4.f03
! { dg-do compile }
module c_loc_tests_4
use, intrinsic :: iso_c_binding
implicit none
contains
subroutine sub0() bind(c)
integer(c_int), target, dimension(10) :: my_array
integer(c_int
www.eeworm.com/read/366702/2876902
f90 do_1.f90
! { dg-do run }
! Program to check corner cases for DO statements.
program do_1
implicit none
integer i, j
! limit=HUGE(i), step 1
j = 0
do i = HUGE(i) - 10, HUGE(i), 1
j = j + 1
end