| /openbsd/src/gnu/usr.bin/perl/t/lib/strict/ |
| D | subs | 1 Check strict subs functionality 21 no strict 'subs' ; 27 # strict subs - error 28 use strict 'subs' ; 32 Bareword "xyz" not allowed while "strict subs" in use at - line 5. 36 # strict subs - error 37 use strict 'subs' ; 40 Bareword "Fred" not allowed while "strict subs" in use at - line 4. 44 # strict subs - error 45 use strict 'subs' ; [all …]
|
| /openbsd/src/sys/arch/arm/arm/ |
| D | bus_space_asm_generic.S | 90 subs r2, r2, #1 104 subs r2, r2, #1 118 subs r2, r2, #1 136 subs r2, r2, #1 150 subs r2, r2, #1 164 subs r2, r2, #1 182 subs r2, r2, #1 196 subs r2, r2, #1 210 subs r2, r2, #1 228 subs r2, r2, #1 [all …]
|
| D | cpufunc_asm_armv7.S | 113 subs r1, r1, ip 141 subs r1, r1, ip 159 subs r1, r1, ip 178 subs r1, r1, ip 196 subs r1, r1, ip
|
| D | in_cksum_arm.S | 172 subs r2, r2, r1 229 subs r1, r1, r7 /* Update length */ 234 subs r1, r1, #0x40 259 subs r1, r1, #0x40 279 subs r1, r1, #0x20 312 subs r1, r1, #0x04
|
| D | vectors.S | 65 subs pc, lr, #4 103 subs pc, lr, #4
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/t/Legacy/Test2/ |
| D | Subtest.t | 21 my $subs = $res->[1]->subevents; 22 is(@$subs, 2, "got all subevents"); 24 isa_ok($subs->[0], 'Test2::Event::Ok'); 25 is($subs->[0]->pass, 1, "subtest ok passed"); 26 is($subs->[0]->name, 'check', "subtest ok name"); 28 isa_ok($subs->[1], 'Test2::Event::Plan'); 29 is($subs->[1]->max, 1, "subtest plan is 1");
|
| /openbsd/src/regress/lib/libc/regex/ |
| D | main.c | 37 regmatch_t subs[NS]; in main() local 94 subs[0].rm_so = startoff; in main() 95 subs[0].rm_eo = strlen(argv[optind]) - endoff; in main() 97 err = regexec(&re, argv[optind], (size_t)NS, subs, eopts); in main() 105 len = (size_t)(subs[0].rm_eo - subs[0].rm_so); in main() 106 if (subs[0].rm_so != -1) { in main() 109 argv[optind] + subs[0].rm_so); in main() 112 argv[optind] + subs[0].rm_so); in main() 115 if (subs[i].rm_so != -1) in main() 117 (int)(subs[i].rm_eo - subs[i].rm_so), in main() [all …]
|
| /openbsd/src/sys/arch/arm/armv7/ |
| D | bus_space_asm_armv7.S | 96 subs r2, r2, #1 111 subs r2, r2, #1 126 subs r2, r2, #1 145 subs r2, r2, #1 160 subs r2, r2, #1 175 subs r2, r2, #1 194 subs r2, r2, #1 209 subs r2, r2, #1 224 subs r2, r2, #1 242 subs r2, r2, #1 [all …]
|
| /openbsd/src/lib/libc/arch/arm/string/ |
| D | _memcpy.S | 79 subs r2, r2, #4 88 subs r2, r2, #8 90 subs r2, r2, #0x14 101 subs r2, r2, #0x20 124 subs r2, r2, #4 158 subs r2, r2, r12 188 subs r2, r2, #0x10 199 subs r2, r2, #4 223 subs r2, r2, #0x10 234 subs r2, r2, #4 [all …]
|
| /openbsd/src/sys/lib/libkern/arch/arm/ |
| D | memcpy.S | 81 subs r2, r2, #4 90 subs r2, r2, #8 92 subs r2, r2, #0x14 103 subs r2, r2, #0x20 126 subs r2, r2, #4 163 subs r2, r2, r12 193 subs r2, r2, #0x10 204 subs r2, r2, #4 228 subs r2, r2, #0x10 239 subs r2, r2, #4 [all …]
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Scalar-List-Utils/t/ |
| D | undefined-block.t | 6 my @subs; 7 BEGIN { @subs = qw(reduce first none all any notall pairfirst pairgrep pairmap) }; 8 use List::Util @subs; 10 plan tests => @subs * 2; 12 for my $sub (@subs) {
|
| /openbsd/src/gnu/usr.bin/perl/t/lib/subs/ |
| D | subs | 14 use subs qw( Fred ) ; 23 use subs qw( Fred) ; 31 use subs qw( open ) ; 39 use subs qw( open ) ; 47 use subs qw( open ) ; 55 use subs qw( open ) ; 66 use subs qw( Fred ) ; 75 use subs qw( Fred ) ; 98 use subs qw( ふれど ) ;
|
| /openbsd/src/gnu/usr.bin/perl/lib/ |
| D | DB.t | 14 use strict qw( vars subs ); 166 my $subs = DB->subs; 167 is( $subs, 0, 'DB::subs() should return keys of %DB::subs' ); 169 $subs = DB->subs; 170 is( $subs, 2, '... same song, different key' ); 171 my @subs = DB->subs( 'foo', 'boo', 'bar' ); 172 is( scalar @subs, 2, '... should report only for requested subs' ); 174 is_deeply( \@subs, \@expected, '... find file, start, end for subs' );
|
| D | overload.t | 1730 my %subs; 1756 $subs{"$_="} = $e; 1762 $subs{$_} = 1774 $subs{"$_="} = $e; 1784 $subs{$_} = 1803 $subs{$_} = $pre; 1821 $subs{$_} = $e; 1826 $subs{$_} = $e; 1831 $subs{$_} = $e; 1836 $subs{$_} = $e; [all …]
|
| D | diagnostics.t | 211 $subs = 213 is runperl(@runperl_args, prog => $subs), 224 is runperl(@runperl_args, prog => $subs =~ s/panic\K/k/r), 247 prog => $subs =~
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/ |
| D | Hub.pm | 161 my %subs = map {$_ => $_} @_; 163 @{$self->{+_LISTENERS}} = grep { !$subs{$_->{code}} } @{$self->{+_LISTENERS}}; 185 my %subs = map {$_ => $_} @_; 186 @{$self->{+_FILTERS}} = grep { !$subs{$_->{code}} } @{$self->{+_FILTERS}}; 203 my %subs = map {$_ => $_} @_; 204 @{$self->{+_PRE_FILTERS}} = grep { !$subs{$_->{code}} } @{$self->{+_PRE_FILTERS}}; 236 my %subs = map {$_ => $_} @_; 237 @{$self->{+_CONTEXT_ACQUIRE}} = grep { !$subs{$_} == $_ } @{$self->{+_CONTEXT_ACQUIRE}}; 254 my %subs = map {$_ => $_} @_; 255 @{$self->{+_CONTEXT_INIT}} = grep { !$subs{$_} == $_ } @{$self->{+_CONTEXT_INIT}}; [all …]
|
| /openbsd/src/gnu/lib/libiberty/src/ |
| D | cp-demint.c | 205 di.subs = ((struct demangle_component **) in cplus_demangle_v3_components() 207 if (di.comps == NULL || di.subs == NULL) in cplus_demangle_v3_components() 211 if (di.subs != NULL) in cplus_demangle_v3_components() 212 free (di.subs); in cplus_demangle_v3_components() 226 free (di.subs); in cplus_demangle_v3_components()
|
| /openbsd/src/gnu/llvm/compiler-rt/lib/builtins/arm/ |
| D | addsf3.S | 78 subs r6, r2, r3 85 subs r6, r6, #1 91 subs r3, r3, r6 168 subs r4, r4, r5 // aSignificand -= bSignificand; 184 subs r5, r5, #(typeWidth - significandBits - 3 - 1) 187 subs r2, r2, r5 192 subs r6, r6, r2 // 1 - aExponent; 195 subs r3, r3, r6
|
| D | udivsi3.S | 117 subs r0, r0, #(16 * BLOCK_SIZE) 129 subs r0, r0, #(8 * BLOCK_SIZE) 141 subs r0, r0, #(4 * BLOCK_SIZE) 153 subs r0, r0, #(2 * BLOCK_SIZE) 165 subs r0, r0, #(1 * BLOCK_SIZE) 202 subs r0, r0, r2; \
|
| D | divsi3.S | 57 subs r0, r0, r2 58 subs r1, r1, r3 71 subs r0, r0, r4
|
| /openbsd/src/gnu/usr.bin/perl/ext/XS-APItest/t/ |
| D | lexsub.t | 8 is fribbler(15), 45, 'lexical subs via pad_add_name'; 10 is fribbler(15), 30, 'XS-allocated lexical subs falling out of scope'; 14 is fribbler(15), 45, 'lexical subs via pad_add_name';
|
| D | sym-hook.t | 18 # Make sure subs looked up via rv2cv check hooks are not treated as second- 19 # class subs.
|
| /openbsd/src/gnu/usr.bin/perl/t/comp/ |
| D | use.t | 153 ok $@, 'no strict subs allows ver decl to enable refs'; 155 ok $@, 'no strict subs allows ver decl to enable vars'; 157 ok $@, 'no strict refs allows ver decl to enable subs'; 159 ok $@, 'no strict refs allows ver decl to enable subs'; 163 ok $@, 'no strict vars allows ver decl to enable subs';
|
| /openbsd/src/gnu/usr.bin/perl/t/op/ |
| D | anonconst.t | 9 push @subs, sub :const{$_} for 1..10; 10 is join(" ", map &$_, @subs), "1 2 3 4 5 6 7 8 9 10",
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/Util/ |
| D | HashBase.pm | 67 my %subs = ( 95 *{"$into\::$_"} = $subs{$_} for keys %subs;
|