Home
last modified time | relevance | path

Searched refs:clone (Results 1 – 25 of 407) sorted by relevance

12345678910>>...17

/openbsd/gnu/usr.bin/perl/dist/Storable/t/
H A Dweak.t44 &$testersub ($clone, $what);
76 my ($clone, $what) = @_;
77 isa_ok($clone,'ARRAY');
78 isa_ok($clone->[0],'HASH');
88 my ($clone, $what) = @_;
89 isa_ok($clone,'ARRAY');
98 my ($clone, $what) = @_;
99 isa_ok($clone,'ARRAY');
105 is($clone->[0],undef);
111 my ($clone, $what) = @_;
[all …]
H A Dmalice.t62 my $clone = shift;
97 my $clone = &$sub($short);
111 my $clone = &$sub($data);
126 my $clone = &$sub ($contents);
130 test_hash ($clone);
160 $clone = &$sub($copy);
162 test_hash ($clone);
256 my $clone = retrieve $file;
257 test_hash ($clone);
284 $clone = retrieve $file;
[all …]
H A Dattach_errors.t50 my ($self, $clone) = @_;
57 my ($class, $clone, $string) = @_;
77 my ($self, $clone) = @_;
84 my ($class, $clone, $string) = @_;
118 my ($self, $clone) = @_;
124 my ($class, $clone, $string) = @_;
159 my ($self, $clone) = @_;
167 my ($class, $clone, $string) = @_;
H A Dhuge.t91 my ($input, $exn, $clone);
95 $exn = $@ if !eval { $clone = dclone($input); 1 };
98 is_deeply($input, $clone, "$desc cloned");
103 undef $clone;
H A Ddclone.t79 my $clone = dclone($empty_string_obj);
81 is(ref $clone, ref $empty_string_obj);
82 is($$clone, $$empty_string_obj);
83 is($$clone, '');
/openbsd/gnu/gcc/gcc/cp/
H A Doptimize.c83 tree clone; in maybe_clone_body() local
97 FOR_EACH_CLONE (clone, fn) in maybe_clone_body()
106 DECL_INLINE (clone) = DECL_INLINE (fn); in maybe_clone_body()
109 DECL_WEAK (clone) = DECL_WEAK (fn); in maybe_clone_body()
122 clone_parm = DECL_ARGUMENTS (clone); in maybe_clone_body()
131 if (DECL_HAS_VTT_PARM_P (clone)) in maybe_clone_body()
145 clone_parm = DECL_ARGUMENTS (clone); in maybe_clone_body()
165 if (DECL_HAS_VTT_PARM_P (clone)) in maybe_clone_body()
195 clone_parm = DECL_RESULT (clone); in maybe_clone_body()
200 clone_body (clone, fn, decl_map); in maybe_clone_body()
[all …]
H A Dclass.c3744 tree clone; in build_clone() local
3855 return clone; in build_clone()
3865 tree clone; in clone_function_decl() local
3878 add_method (DECL_CONTEXT (clone), clone, NULL_TREE); in clone_function_decl()
3881 add_method (DECL_CONTEXT (clone), clone, NULL_TREE); in clone_function_decl()
3900 add_method (DECL_CONTEXT (clone), clone, NULL_TREE); in clone_function_decl()
3904 add_method (DECL_CONTEXT (clone), clone, NULL_TREE); in clone_function_decl()
3907 add_method (DECL_CONTEXT (clone), clone, NULL_TREE); in clone_function_decl()
3924 tree clone; in adjust_clone_args() local
3926 for (clone = TREE_CHAIN (decl); clone && DECL_CLONED_FUNCTION (clone); in adjust_clone_args()
[all …]
/openbsd/gnu/usr.bin/gcc/gcc/cp/
H A Doptimize.c143 tree clone; local
156 for (clone = TREE_CHAIN (fn);
157 clone && DECL_CLONED_FUNCTION_P (clone);
158 clone = TREE_CHAIN (clone), first = 0)
171 DECL_WEAK (clone) = DECL_WEAK (fn);
182 clone_parm = DECL_ARGUMENTS (clone);
191 if (DECL_HAS_VTT_PARM_P (clone))
211 clone_parm = DECL_ARGUMENTS (clone);
231 if (DECL_HAS_VTT_PARM_P (clone))
259 clone_body (clone, fn, decl_map);
[all …]
/openbsd/gnu/usr.bin/perl/cpan/Tie-RefHash/t/
H A Dstorable.t44 foreach my $clone ( \%hash, dclone(\%hash), thaw(nfreeze(\%hash)) ){
46 ok( tied(%$clone), "copy is tied");
47 isa_ok( tied(%$clone), "Tie::RefHash" );
49 my @keys = keys %$clone;
57 is( $clone->{$key}, "value", "and is still pointing at the same value" );
60 is( $clone->{$reg}, "other", "and is also a valid key" );
66 foreach my $clone ( \%only_refs, dclone(\%only_refs), thaw(nfreeze(\%only_refs)) ){
68 ok( tied(%$clone), "copy is tied");
69 isa_ok( tied(%$clone), "Tie::RefHash" );
71 my @keys = keys %$clone;
[all …]
/openbsd/gnu/usr.bin/perl/cpan/CPAN-Meta-Requirements/t/
H A Dmerge.t68 my $clone = $req_1->clone->add_requirements($req_2);
77 "clone/add_requirements does not affect lhs",
87 "clone/add_requirements does not affect rhs",
91 $clone->as_string_hash,
98 "clone and add_requirements",
101 $clone->clear_requirement('Shared');
104 $clone->as_string_hash,
118 my $req_2 = $req_1->clone;
125 'clone with only max',
/openbsd/gnu/usr.bin/perl/dist/ExtUtils-ParseXS/t/
H A D516-t-clone.t21 my $clone = $map->clone;
22 my $shallow = $map->clone(shallow => 1);
24 is_deeply($clone, $map, "Full clone equivalent to original");
29 ok(!$clone->get_typemap(ctype => 'foo'), "New typemap not propagated to full clone");
35 …ok(!$clone->get_typemap(ctype => 'unsigned int')->{blubb}, "Direct modification does not propagate…
/openbsd/gnu/usr.bin/perl/cpan/Archive-Tar/lib/Archive/
H A DTar.pm1021 my $clone = $orig->clone;
1343 my $clone = $entry->clone;
1356 $clone->prefix( '' );
1363 my ($prefix,$name) = $clone->_prefix_and_file( $clone->full_path );
1370 $clone->prefix( $prefix );
1371 $clone->name( $name );
1397 push @write_me, $clone;
1400 for my $clone (@write_me) {
1408 my $data_ok = !$clone->is_symlink && $clone->has_content;
1436 print $handle TAR_PAD->( $clone->size ) if $clone->size % BLOCK
[all …]
/openbsd/gnu/usr.bin/perl/cpan/CPAN-Meta/t/
H A Dprereqs-finalize.t70 my $clone = $prereqs->clone;
72 isa_ok($clone, 'CPAN::Meta::Prereqs', 'cloned prereqs obj');
74 ok(! $clone->is_finalized, 'cloned obj is not finalized');
76 is_deeply($clone->as_string_hash, $prereqs_struct, '...it still round-trips');
78 $clone->requirements_for(qw(runtime requires))->add_minimum(Cwd => 10);
82 $clone->requirements_for(qw(runtime requires))->add_minimum(Cwd => 1000);
86 $clone->requirements_for(qw(develop suggests));
90 $clone->requirements_for(qw(develop suggests))->add_minimum(Foo => 1);
/openbsd/gnu/usr.bin/perl/cpan/Digest-MD5/t/
H A Dclone.t12 my $b = $a->clone;
14 print "not " unless $b->clone->hexdigest eq md5_hex("a");
25 print "not " unless $b->clone->hexdigest eq md5_hex("ab");
29 print "not " unless $b->clone->hexdigest eq md5_hex("abc");
40 $b = $a->clone;
/openbsd/gnu/usr.bin/gcc/gcc/testsuite/g++.old-deja/g++.robertl/
H A Deb17.C8 virtual A * clone();
18 B * clone();
32 A * A::clone() in clone() function
37 B * B::clone() in clone() function
55 a = a->clone(); in main()
/openbsd/gnu/usr.bin/perl/cpan/Test2-Suite/lib/Test2/Compare/
H A DNegatable.pm28 my $clone = $self->clone;
29 $clone->toggle_negate;
30 return $clone;
80 =item $clone = $obj->clone_negate()
/openbsd/gnu/gcc/gcc/
H A Dipa.c181 struct cgraph_node *clone; in cgraph_remove_unreachable_nodes() local
183 for (clone = node->next_clone; clone; in cgraph_remove_unreachable_nodes()
184 clone = clone->next_clone) in cgraph_remove_unreachable_nodes()
185 if (clone->aux) in cgraph_remove_unreachable_nodes()
187 if (!clone) in cgraph_remove_unreachable_nodes()
/openbsd/gnu/usr.bin/perl/cpan/Encode/lib/Encode/
H A DEncoding.pm33 my $clone = bless {%$self} => ref($self);
34 $clone->{renewed}++; # so the caller can see it
35 DEBUG and warn $clone->{renewed};
36 return $clone;
/openbsd/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/API/
H A DContext.pm162 my $clone = $self->snapshot;
163 @$clone{+ERRNO, +EVAL_ERROR, +CHILD_ERROR} = ($!, $@, $?);
164 $clone->{+TRACE} = $clone->{+TRACE}->snapshot(pid => $$, tid => get_tid());
166 my $hub = $clone->{+HUB};
171 $clone->{+_IS_CANON} = 1;
172 $CONTEXTS->{$hid} = $clone;
175 my ($rok, $rerr) = try { $clone->release };
176 delete $clone->{+_IS_CANON};
600 =item $clone = $ctx->snapshot()
/openbsd/lib/libcurses/base/
H A Dlib_mvwin.c81 WINDOW *clone = dupwin(win); in NCURSES_EXPORT()
82 if (clone) { in NCURSES_EXPORT()
94 err = copywin(clone, win, in NCURSES_EXPORT()
99 if (ERR == delwin(clone)) in NCURSES_EXPORT()
/openbsd/gnu/usr.bin/perl/cpan/Time-Piece/t/
H A D01base.t36 #via clone
38 isa_ok($l, 'Time::Piece', 'custom localtime via clone');
41 #via clone with gmtime
43 isa_ok($g, 'Time::Piece', 'custom gmtime via clone');
/openbsd/gnu/usr.bin/perl/cpan/Encode/Unicode/
H A DUnicode.pm50 my $clone = bless {%$self} => ref($self);
51 $clone->{renewed}++; # so the caller knows it is renewed.
52 return $clone;
/openbsd/gnu/usr.bin/perl/cpan/Test-Simple/t/Test2/modules/
H A DEventFacet.t13 is_deeply($one->clone, $one, "Cloning.");
15 isnt($one->clone, $one, "Clone is a new ref");
17 my $two = $one->clone(details => 'bar');
/openbsd/gnu/llvm/llvm/lib/ExecutionEngine/IntelJITEvents/
H A DCMakeLists.txt16 execute_process(COMMAND ${GIT_EXECUTABLE} clone ${ITTAPI_GIT_REPOSITORY}
20 …message(FATAL_ERROR "git clone ${ITTAPI_GIT_REPOSITORY} failed with ${GIT_CLONE_RESULT}, please cl…
/openbsd/regress/sys/kern/fchown/
H A DMakefile6 REGRESS_TARGETS+= clone-device
8 clone-device: ${PROG}

12345678910>>...17