Searched refs:freeze (Results 1 – 25 of 43) sorted by relevance
12
| /mirbsd/src/gnu/usr.bin/perl/ext/Storable/t/ |
| D | freeze.t | 25 use Storable qw(freeze nfreeze thaw);
41 print "not " unless defined ($f1 = freeze(\@a));
68 print "not " unless $f2 = $foo->freeze;
88 $other = freeze($root);
113 eval { freeze($foo) };
128 $frozen = freeze \%to_be_frozen;
132 freeze {};
134 eval { $frozen = freeze { foo => {} } };
|
| D | canonical.t | 24 use Storable qw(freeze thaw dclone);
110 $x1 = freeze(\%a1);
111 $x2 = freeze(\%a2);
112 $x3 = freeze($a3);
126 $x1 = freeze(\%a1);
127 $x2 = freeze(\%a2);
128 $x3 = freeze($a3);
|
| D | recurse.t | 26 use Storable qw(freeze thaw dclone);
32 use Storable qw(freeze thaw);
42 return (freeze(\@x), $self);
112 use Storable qw(freeze thaw);
123 return (freeze($self), $self) if ++$recursed < $MAX;
139 my $x = freeze $real;
148 $x = freeze $sync;
157 $x = freeze [$sync, $ext];
168 $x = freeze $real;
225 my $bar2 = thaw freeze $bar;
[all …]
|
| D | code.t | 43 use Storable qw(retrieve store nstore freeze nfreeze thaw dclone);
87 $freezed = freeze $obj[0];
98 $freezed = freeze $obj[1];
106 $freezed = freeze $obj[2];
113 $freezed = freeze $obj[3];
120 eval { $freezed = freeze $obj[4] };
162 $freezed = freeze $obj[$i];
|
| D | just_plain_nasty.t | 78 my $icicle = freeze $nasty;
87 $icicle = freeze sub { "two" };
96 $icicle = freeze $nasty;
107 $icicle = freeze $nasty;
118 $icicle = freeze $nasty;
129 $icicle = freeze $nasty;
|
| D | utf8.t | 32 use Storable qw(thaw freeze);
37 ok 1, $x eq ${thaw freeze \$x};
41 ok 2, $x eq ${thaw freeze \$x};
46 ok 3, $x eq ${thaw freeze \$x};
52 my $data = freeze \$x;
|
| D | overload.t | 26 use Storable qw(freeze thaw);
39 $b = thaw freeze $a;
43 $c = thaw freeze \$a;
48 $d = thaw freeze [$a, $a];
82 $b = thaw freeze $a;
|
| D | attach_errors.t | 50 $frozen = Storable::freeze( $goodfreeze );
76 Storable::freeze( $badfreeze );
114 $frozen = Storable::freeze( $goodthaw );
145 $frozen = Storable::freeze( $badthaw );
193 my $frozen = Storable::freeze( $goodattach );
230 my $frozen = Storable::freeze( $badattach );
|
| D | tied.t | 26 use Storable qw(freeze thaw);
155 ok 1, defined($f = freeze(\@a));
174 $g = freeze($root);
200 my $hf = freeze($h);
213 use Storable qw(freeze thaw);
217 tie $a, P; my $r = thaw freeze \$a; $b = $$r;
|
| D | utf8hash.t | 30 use Storable qw(store nstore retrieve thaw freeze);
82 my $thawed = thaw(freeze(\%utf8hash));
161 my $copy = $bypass ? \%hash : ${thaw freeze \\%hash};
178 my $just_utf8 = $bypass ? $orig : ${thaw freeze \$orig};
188 my $just_bytes = $bypass ? $orig : ${thaw freeze \$orig};
202 my $both = $bypass ? $orig : ${thaw freeze \$orig};
|
| D | blessed.t | 26 use Storable qw(freeze thaw);
89 my $x = freeze \@pool;
112 my $x = freeze $blessed_ref;
155 my $f = freeze ($i);
180 my $f = freeze (HAS_HOOK->make);
|
| D | tied_hook.t | 26 use Storable qw(freeze thaw);
170 ok 1, defined($f = freeze(\@a));
183 $g = freeze($root);
218 my $bx = thaw freeze $bc;
242 $bx = thaw freeze $bc;
|
| D | interwork56.t | 33 use Storable qw(freeze thaw);
55 my $test = freeze \'Hell';
122 $test_kludge = freeze \'Heck';
|
| D | integer.t | 30 use Storable qw (dclone store retrieve freeze thaw nstore nfreeze);
88 my $frozen = eval {freeze $data};
|
| D | malice.t | 56 use Storable qw (store retrieve freeze thaw nstore nfreeze);
267 my $stored = freeze \%hash;
304 freeze \%a;
|
| D | weak.t | 36 use Storable qw (store retrieve freeze thaw nstore nfreeze);
138 my $stored = freeze $input;
|
| D | croak.t | 26 use Storable qw(freeze thaw);
|
| D | make_56_interwork.pl | 11 my $frozen = freeze
|
| D | circular_hook.t | 38 my $string = Storable::freeze( $array );
|
| D | attach_singleton.t | 44 my $frozen = Storable::freeze( $struct );
|
| D | compat06.t | 28 use Storable qw(freeze nfreeze thaw);
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Data/Dumper/t/ |
| D | freezer.t | 85 sub freeze {
97 sub freeze { die "freeze() is broked" }
|
| /mirbsd/src/sbin/scsi/ |
| D | scsi.c | 73 int freeze = 0; /* Freeze this many seconds */ variable
166 freeze = strtol(optarg, 0, 0); in procargs()
945 if (freeze) { in main()
946 do_freeze(freeze); in main()
|
| /mirbsd/src/gnu/usr.bin/perl/ext/Storable/ |
| D | Storable.pm | 268 sub freeze { subroutine
|
| D | MANIFEST | 23 t/freeze.t See if Storable works
|
12