Lines Matching refs:nv
48 my ($var, $nv) = @_;
49 ok($var == $nv, 'NV number preserved');
50 ok($var eq $nv, 'String preserved');
64 my $nv = dualvar(3.14, 'PI');
71 my $snv :shared = shared_clone($nv);
75 ok_nv($snv, $nv);
81 my @ary :shared = ($iv, $nv, $uv);
84 ok_nv($ary[1], $nv);
92 @ary = ($iv, $nv, $uv);
95 ok_nv($ary[1], $nv);
104 $ary[1] = $nv;
108 ok_nv($ary[1], $nv);
118 ok_nv($ary[1], $nv);
129 ok_nv($ary[1], $nv);
142 ok_nv($ary[1], $nv);
151 'nv' => $nv,
156 ok_nv($hsh{'nv'}, $nv);
166 'nv' => $nv,
171 ok_nv($hsh{'nv'}, $nv);
180 $hsh{'nv'} = $nv;
184 ok_nv($hsh{'nv'}, $nv);
193 'nv' => $snv,
198 ok_nv($hsh{'nv'}, $nv);
208 'nv' => $snv,
213 ok_nv($hsh{'nv'}, $nv);
222 $hsh{'nv'} = $snv;
226 ok_nv($hsh{'nv'}, $nv);
234 push(@ary, $iv, $nv, $uv);
237 ok_nv($ary[1], $nv);
247 ok_nv($xnv, $nv);
252 unshift(@ary, $iv, $nv, $uv);
255 ok_nv($ary[1], $nv);
265 ok_nv($xnv, $nv);
276 ok_nv($ary[1], $nv);
286 ok_nv($xnv, $nv);
294 ok_nv($ary[1], $nv);
304 ok_nv($xnv, $nv);
313 'nv' => $nv,
318 ok_nv(delete($hsh{'nv'}), $nv);
327 'nv' => $snv,
332 ok_nv(delete($hsh{'nv'}), $nv);
339 my @ary :shared = ($iv, $nv, $uv);
343 ok_nv($nsa[1], $nv);
351 ok_nv($$copy[1], $nv);
362 ok_nv($nsa[1], $nv);
370 ok_nv($$copy[1], $nv);
379 'nv' => $nv,
385 ok_nv($nsh{'nv'}, $nv);
393 ok_nv($$copy{'nv'}, $nv);
402 'nv' => $snv,
408 ok_nv($nsh{'nv'}, $nv);
416 ok_nv($$copy{'nv'}, $nv);
428 %hsh = ( 'nv' => $ary[1] );
436 ok_nv($hsh{'nv'}, $ary[1]);