Home
last modified time | relevance | path

Searched refs:sortkeys (Results 1 – 4 of 4) sorted by relevance

/openbsd-src/gnu/usr.bin/perl/dist/Data-Dumper/t/
H A Dsortkeys.t31 my ($obj, %dumps, $sortkeys, $starting);
36 $sortkeys = 1;
37 local $Data::Dumper::Sortkeys = $sortkeys;
43 $obj->Sortkeys($sortkeys);
106 my ($obj, %dumps, $sortkeys, $starting);
111 $sortkeys = 0;
112 local $Data::Dumper::Sortkeys = $sortkeys;
118 $obj->Sortkeys($sortkeys);
121 $sortkeys = undef;
122 local $Data::Dumper::Sortkeys = $sortkeys;
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/Data-Dumper/
H A DDumper.pm113 sortkeys => $Sortkeys, # flag or filter for sorting hash keys
425 my $sortkeys = defined($s->{sortkeys}) ? $s->{sortkeys} : '';
427 if ($sortkeys) {
428 if (ref($s->{sortkeys}) eq 'CODE') {
429 $keys = $s->{sortkeys}($val);
444 while (($k, $v) = ! $sortkeys ? (each %$val) :
726 @_ >= 2 ? (($s->{'sortkeys'} = $v), return $s) : $s->{'sortkeys'};
[all...]
H A DDumper.xs47 SV *sortkeys; member
990 if (style->sortkeys) { in DD_dump()
991 if (style->sortkeys == &PL_sv_yes) { in DD_dump()
1022 i = perl_call_sv(style->sortkeys, G_SCALAR | G_EVAL); in DD_dump()
1050 if (style->sortkeys) { in DD_dump()
1059 if (style->sortkeys) { in DD_dump()
1501 style.pad = style.xpad = style.sep = style.pair = style.sortkeys
1562 style.sortkeys = NULL;
1564 style.sortkeys = sv;
1567 style.sortkeys = &PL_sv_yes;
/openbsd-src/gnu/usr.bin/perl/cpan/Unicode-Collate/t/
H A Dcontract.t73 our %sortkeys;
75 $sortkeys{'KAac'} = $kjeNoN->viewSortKey("\x{43A}\x{301}");
76 $sortkeys{'KAta'} = $kjeNoN->viewSortKey("\x{43A}\x{334}\x{301}");
77 $sortkeys{'KAat'} = $kjeNoN->viewSortKey("\x{43A}\x{301}\x{334}");
135 ok($sortkeys{'KAac'}, $kjeNoN->viewSortKey("\x{43A}\x{301}"));
136 ok($sortkeys{'KAta'}, $kjeNoN->viewSortKey("\x{43A}\x{334}\x{301}"));
137 ok($sortkeys{'KAat'}, $kjeNoN->viewSortKey("\x{43A}\x{301}\x{334}"));