| /openbsd-src/gnu/usr.bin/perl/t/op/ |
| H A D | sort.t | 16 sort { for ($_ = 0;; $_++) {} } @a; 17 sort { while(1) {} } @a; 18 sort { while(1) { last; } } @a; 19 sort { while(0) { last; } } @a; 22 map scalar(sort(+())), ('')x68; 48 $x = join('', sort @harry); 53 $x = join('', sort( Backwards @harry)); 58 $x = join('', sort( Backwards_stacked @harry)); 63 $x = join('', sort @george, 'to', @harry); 101 my @non_utf8_result = sort [all...] |
| H A D | tiehash.t | 83 my @want = sort keys %h; 92 @have = sort @have; 117 @have = sort @have, $k1; 148 @have = sort @have; 180 @a = sort @a; 186 @a = sort @a; 211 is(join(' ', sort @got), "@keys", 'The correct three keys'); 232 is(join(' ', sort keys %have), "@keys", 'Still the correct three keys');
|
| H A D | runlevel.t | 22 @a = sort { last ; } @a; 148 @y = sort { $a <=> $b } @y; 154 @x = sort { &sortfn($a, $b) } @x; 161 @a = sort { eval('die("no way")') , $a <=> $b} @a; 169 @a = sort { last foo; } @a; 222 @a = sort foo @a;
|
| /openbsd-src/gnu/usr.bin/perl/lib/ |
| H A D | sort.t | 130 main(sub { sort {&{$_[0]}} @{$_[1]} }, 0); 139 use sort qw( defaults stable ); 140 my @ignore = sort (5,4,3,2,1); 143 use sort qw( defaults stable ); 144 my @nested = sort { dumbsort($a,$b) } (3,2,2,1); 148 use sort qw(stable); 153 $sort_current = sort::current(); 157 main(sub { sort {&{$_[0]}} @{$_[1]} }, 0); 163 use sort qw(defaults stable); 168 $sort_current = sort::current(); [all …]
|
| H A D | DirHandle.t | 31 @a = sort <*>; 36 @b = sort($first, (grep {/^[^.]/} $dot->read)); 41 @c = sort grep {/^[^.]/} $dot->read; 67 @b = sort($first, (grep {/^[^.]/} $redot->read)); 72 @c = sort grep {/^[^.]/} $redot->read;
|
| /openbsd-src/usr.bin/tic/ |
| H A D | MKtermsort.sh | 57 * termsort.h --- sort order arrays for use by infocmp. 77 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 86 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 95 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 104 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 113 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 122 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 131 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 140 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}'; 149 ' | sort | $AWK '{print "\t", $2, ",\t/* ", $1, " */";}';
|
| /openbsd-src/gnu/usr.bin/gcc/gcc/testsuite/g++.old-deja/g++.robertl/ |
| H A D | eb43.C | 25 sort( a.begin(), a.end(), in main() 27 sort( a.begin(), a.end(), compare<int> ); in main() 28 sort<vector<int>::iterator, in main() 31 sort( a.begin(), a.end(), in main() 33 sort( a.begin(), a.end(), in main() 35 sort( a.begin(), a.end(), in main() 37 sort( a.begin(), a.end(), in main() 39 sort( a.begin(), a.end(), in main()
|
| /openbsd-src/gnu/usr.bin/perl/ext/File-Glob/t/ |
| H A D | rt131211.t | 77 @got_files= sort glob catfile $path, "a*b*b*bc"; 81 @got_files= sort glob catfile $path, "p*"; 85 @got_files= sort glob catfile $path, "r*???????"; 89 @got_files= sort glob catfile $path, "w*e*w??e"; 90 is "@got_files", join(" ", sort map { catfile($path, $files[$_]) } (7,8)), 93 @got_files= sort glob catfile $path, "w*e*we??"; 94 is "@got_files", join(" ", sort map { catfile($path, $files[$_]) } (7,8,9,10)), 97 @got_files= sort glob catfile $path, "w**e**w"; 98 is "@got_files", join(" ", sort map { catfile($path, $files[$_]) } (9)), 101 @got_files= sort glob catfile $path, "*wee*"; [all …]
|
| /openbsd-src/usr.bin/spell/ |
| H A D | spell.ksh | 107 $DEROFF | sort -u | $SPELLPROG -o $TMP $STOP $STOP_LANG | \ 108 $SPELLPROG ${FLAGS[*]} $DICT $LANG $EXTRA | sort -u -k1f - $TMP | \ 112 $DEROFF | sort -u | $SPELLPROG -o $TMP $STOP $STOP_LANG | \ 113 $SPELLPROG ${FLAGS[*]} $DICT $LANG $EXTRA | sort -u -k1f - $TMP 117 sort -u -k2f -k1 $VTMP
|
| /openbsd-src/usr.bin/locate/locate/ |
| H A D | mklocatedb.sh | 50 : ${sort=sort -H} 53 sortcmd="$sort" 69 $bigram < $filelist | $sort -nr |
|
| /openbsd-src/gnu/usr.bin/perl/lib/Tie/ |
| H A D | ExtraHash.t | 17 is_deeply([sort keys %hash], [sort keys %tied], "FIRSTKEY/NEXTKEY"); 18 is_deeply([sort values %hash], [sort values %tied], "FIRSTKEY/NEXTKEY");
|
| /openbsd-src/gnu/usr.bin/perl/t/lib/warnings/ |
| H A D | op | 17 Useless use of sort in scalar context 18 my $x = sort (2,1,3); 72 "my %s" used in sort comparison 252 @h{sort foo}; 288 @h[sort foo]; 403 sort(1,2) ; # OP_SORT 454 Useless use of sort in void context at - line 37. 480 my $x = sort (2,1,3); 482 $x = sort (2,1,3); 484 Useless use of sort i [all...] |
| /openbsd-src/gnu/usr.bin/perl/dist/Text-Abbrev/t/ |
| H A D | Abbrev.t | 13 my $r = join ':', sort keys %x; 35 my $s = join ':', sort keys %y; 39 $s = join ':', sort keys %$y; 45 $s = join ':', sort keys %y;
|
| /openbsd-src/gnu/llvm/compiler-rt/lib/dfsan/scripts/ |
| H A D | check_custom_wrappers.sh | 24 | sed "s/^fun:\(.*\)=custom.*/\1/" | sort > $DIFF_A 27 | sed "s/.*__dfsw_\(.*\)(.*/\1/" | sort | uniq > $DIFF_B 38 | sed "s/.*__dfsw_\([^(]*\).*/\1/" | sort | uniq > $DIFF_A 40 | sed "s/.*test_\(.*\)();/\1/" | sort > $DIFF_B
|
| /openbsd-src/regress/usr.bin/jot/ |
| H A D | regress.sh | 74 REGRESSION_TEST([[rand1]], [[${JOT} -r 10000 0 9 | sort -u]]) 75 REGRESSION_TEST([[rand2]], [[${JOT} -r 10000 9 0 | sort -u]]) 77 REGRESSION_TEST([[rand1p1]], [[${JOT} -p 1 -r 10000 0 0.9 | sort -u]]) 78 REGRESSION_TEST([[rand2p1]], [[${JOT} -p 1 -r 10000 0.9 0 | sort -u]]) 80 REGRESSION_TEST([[rdhhh]], [[${JOT} -r 100 - 10 2 2>/dev/null | sort -n | head -1]]) 81 REGRESSION_TEST([[rhdhh]], [[${JOT} -r 100 90 - 2 2>/dev/null | sort -n | tail -1]]) 83 REGRESSION_TEST([[nonunif]], [[${JOT} -p0 -r 10000 0.5 9.5 | sort -u]])
|
| /openbsd-src/gnu/usr.bin/perl/t/porting/ |
| H A D | FindExt.t | 33 $want = [sort split ' ', $want] 40 unless (join (' ', sort split ' ', $Config{extensions}) 73 sort @config_built); 75 sort @found_built);
|
| /openbsd-src/gnu/usr.bin/gcc/gcc/testsuite/g++.dg/template/ |
| H A D | qual1.C | 7 void sort (int (*compare) (T *const&,T *const&)); 13 Link_array<T>::sort (int (*compare) (T *const&,T *const&)) in sort() function 20 clashes.sort (shift_compare); in f()
|
| /openbsd-src/gnu/usr.bin/gcc/contrib/ |
| H A D | warn_summary | 203 warningFilter < $tmpfile | srcdirFilter | $AWK -F: '{print$1}' | sort | \ 204 uniq -c | sort -nr 208 warningFilter < $tmpfile | keywordFilter | sort | uniq -c | sort -nr
|
| /openbsd-src/gnu/usr.bin/gcc/gcc/testsuite/g++.old-deja/g++.jason/ |
| H A D | tempargs.C | 4 template<class T> struct Sort { static void sort (Vector<typename T::foo> &); }; 5 template<class T> void Sort<T>::sort (Vector<typename T::foo> &) { } in sort() function 8 void f (Vector<int> &vi) { Sort<whee>::sort (vi); } in f()
|
| /openbsd-src/regress/sbin/pfctl/ |
| H A D | pfr.exec | 36 $PFCTL -a $A -t regress -nT $CMD $ARGS 2>&1 | sort || exit 1 39 2>&1 | sort || exit 1 41 $PFCTL -a $A -t regress -nqvT $CMD $ARGS 2>&1 | sort || exit 1 43 $PFCTL -a $A -t regress -nqvvT $CMD $ARGS 2>&1 | sort || exit 1 66 $PFCTL -a $A -t regress -T $CMD $ARGS 2>&1 | sort \
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Encode/ |
| H A D | Makefile.PL | 14 $ARGV{DEBUG} and warn "$_ => $ARGV{$_}\n" for sort keys %ARGV; 193 $self->{'O_FILES'} = [sort keys %o]; 195 foreach my $table (sort keys %tables) 216 foreach my $table (sort keys %tables) 221 foreach my $table (sort keys %tables)
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Encode/KR/ |
| H A D | Makefile.PL | 21 for my $ucm (sort @ucm){ 58 $self->{'O_FILES'} = [sort keys %o]; 65 foreach my $table (sort keys %tables) { 85 foreach my $table (sort keys %tables) {
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Encode/TW/ |
| H A D | Makefile.PL | 19 for my $ucm (sort @ucm){ 56 $self->{'O_FILES'} = [sort keys %o]; 63 foreach my $table (sort keys %tables) { 83 foreach my $table (sort keys %tables) {
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Encode/CN/ |
| H A D | Makefile.PL | 22 for my $ucm (sort @ucm){ 60 $self->{'O_FILES'} = [sort keys %o]; 67 foreach my $table (sort keys %tables) { 87 foreach my $table (sort keys %tables) {
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Encode/JP/ |
| H A D | Makefile.PL | 23 for my $ucm (sort @ucm){ 60 $self->{'O_FILES'} = [sort keys %o]; 67 foreach my $table (sort keys %tables) { 87 foreach my $table (sort keys %tables) {
|