| /openbsd/gnu/usr.bin/perl/t/lib/strict/ |
| H A D | subs | 1 Check strict subs functionality
21 no strict 'subs' ;
27 # strict subs - error
28 use strict 'subs' ;
36 # strict subs - error
37 use strict 'subs' ;
44 # strict subs - error
45 use strict 'subs' ;
54 use strict 'subs' ;
71 use strict 'subs' ;
[all …]
|
| /openbsd/sys/arch/arm/arm/ |
| H A 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 …]
|
| H A 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
|
| H A 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
|
| H A D | vectors.S | 65 subs pc, lr, #4
103 subs pc, lr, #4
|
| /openbsd/gnu/usr.bin/perl/cpan/Test-Simple/t/Legacy/Test2/ |
| H A 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/regress/lib/libc/regex/ |
| H A D | main.c | 37 regmatch_t subs[NS]; in main() local
94 subs[0].rm_so = startoff; 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()
118 argv[optind] + subs[i].rm_so); in main()
215 regmatch_t subs[NSUBS]; local
[all …]
|
| /openbsd/sys/arch/arm/armv7/ |
| H A 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/lib/libc/arch/arm/string/ |
| H A D | _memcpy.S | 79 subs r2, r2, #4
88 subs r2, r2, #8
124 subs r2, r2, #4
158 subs r2, r2, r12
199 subs r2, r2, #4
234 subs r2, r2, #4
269 subs r2, r2, #4
279 subs r2, r2, #4
288 subs r2, r2, #8
318 subs r2, r2, #4
[all …]
|
| /openbsd/sys/lib/libkern/arch/arm/ |
| H A D | memcpy.S | 81 subs r2, r2, #4
90 subs r2, r2, #8
126 subs r2, r2, #4
163 subs r2, r2, r12
204 subs r2, r2, #4
239 subs r2, r2, #4
274 subs r2, r2, #4
284 subs r2, r2, #4
293 subs r2, r2, #8
323 subs r2, r2, #4
[all …]
|
| /openbsd/gnu/usr.bin/perl/cpan/Scalar-List-Utils/t/ |
| H A 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/gnu/usr.bin/perl/t/lib/subs/ |
| H A 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/gnu/usr.bin/perl/lib/ |
| H A 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' );
|
| H A D | overload.t | 1730 my %subs;
1762 $subs{$_} =
1784 $subs{$_} =
1821 $subs{$_} = $e;
1826 $subs{$_} = $e;
1831 $subs{$_} = $e;
1836 $subs{$_} = $e;
1842 $subs{$_} = $e;
1851 $subs{bool} = $e;
1861 $subs{'~~'} = $e;
[all …]
|
| H A 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/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/ |
| H A 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/gnu/lib/libiberty/src/ |
| H A 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/gnu/llvm/compiler-rt/lib/builtins/arm/ |
| H A 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
|
| H A 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; \
|
| H A D | divsi3.S | 57 subs r0, r0, r2
58 subs r1, r1, r3
71 subs r0, r0, r4
|
| /openbsd/gnu/usr.bin/perl/ext/XS-APItest/t/ |
| H A 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';
|
| H A D | sym-hook.t | 18 # Make sure subs looked up via rv2cv check hooks are not treated as second-
19 # class subs.
|
| /openbsd/gnu/usr.bin/perl/t/comp/ |
| H A D | use.t | 161 ok $@, 'no strict subs allows ver decl to enable refs';
163 ok $@, 'no strict subs allows ver decl to enable vars';
165 ok $@, 'no strict refs allows ver decl to enable subs';
167 ok $@, 'no strict refs allows ver decl to enable subs';
171 ok $@, 'no strict vars allows ver decl to enable subs';
|
| /openbsd/gnu/usr.bin/perl/t/op/ |
| H A D | anonconst.t | 20 push @subs, sub :const{$_} for 1..10;
21 is join(" ", map &$_, @subs), "1 2 3 4 5 6 7 8 9 10",
|
| /openbsd/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/Util/ |
| H A D | HashBase.pm | 67 my %subs = (
95 *{"$into\::$_"} = $subs{$_} for keys %subs;
|