Home
last modified time | relevance | path

Searched refs:_ (Results 1 – 25 of 4051) sorted by relevance

12345678910>>...163

/openbsd/src/gnu/llvm/llvm/lib/Target/Hexagon/MCTargetDesc/
DHexagonMCCodeEmitter.cpp47 #define _ fixup_Invalid macro
51 { _, _, _, _,
52 _, _, P(_DTPREL_16_X), P(_DTPREL_11_X),
53 P(_DTPREL_11_X), P(_9_X), _, P(_DTPREL_11_X),
54 P(_DTPREL_16_X), _, _, _,
55 P(_DTPREL_16_X), _, _, _,
56 _, _, _, _,
57 _, _, _, _,
58 _, _, _, _,
61 { _, _, _, _,
[all …]
/openbsd/src/regress/usr.bin/mandoc/mdoc/Bk/
Dinputlines.out_ascii7 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
10 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
13 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
16 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
19 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
22 …puuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _…
25 …uuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
28 …uuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
31 …uuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
34 …uuttlliinneess _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
Dbadarg.out_ascii7 …baaddaarrgg _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
8 [o _a]
10 …baaddaarrgg _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
11 [o _a]
13 …baaddaarrgg _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
14 [o _a]
16 …baaddaarrgg _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
17 [o _a]
19 …baaddaarrgg _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x _x
20 [o _a]
/openbsd/src/gnu/usr.bin/perl/dist/IO/lib/IO/
DHandle.pm320 my $class = ref($_[0]) || $_[0] || "IO::Handle";
321 if (@_ != 1) {
329 return IO::File::->new(@_);
338 my $class = ref($_[0]) || $_[0] || "IO::Handle";
339 @_ == 3 or croak "usage: $class->new_from_fd(FD, MODE)";
342 IO::Handle::fdopen($io, @_)
361 my ($mode) = @_;
371 @_ == 3 or croak 'usage: $io->fdopen(FD, MODE)';
372 my ($io, $fd, $mode) = @_;
390 @_ == 1 or croak 'usage: $io->close()';
[all …]
DSocket.pm34 if (@_ && $_[0] eq 'sockatmark') { # not very extensible but for now, fast
38 Exporter::export 'Socket', $callpkg, @_;
43 my($class,%arg) = @_;
57 my($p,$d) = @_;
62 my($sock,$arg) = @_;
79 @_ == 4 or croak 'usage: $sock->socket(DOMAIN, TYPE, PROTOCOL)';
80 my($sock,$domain,$type,$protocol) = @_;
98 @_ == 4 || croak 'usage: IO::Socket->socketpair(DOMAIN, TYPE, PROTOCOL)';
99 my($class,$domain,$type,$protocol) = @_;
113 @_ == 2 or croak 'usage: $sock->connect(NAME)';
[all …]
/openbsd/src/gnu/usr.bin/perl/t/op/
Dcmpchain.t97 is join(",", "x", $_->[0] == $_->[1] != $_->[2], "y"),
98 join(",", "x", !!($_->[0] == $_->[1] && $_->[1] != $_->[2]), "y"),
99 "$_->[0] == $_->[1] != $_->[2]";
100 is join(",", "x", $_->[0] != $_->[1] == $_->[2], "y"),
101 join(",", "x", !!($_->[0] != $_->[1] && $_->[1] == $_->[2]), "y"),
102 "$_->[0] != $_->[1] == $_->[2]";
103 is join(",", "x", $_->[0] < $_->[1] <= $_->[2], "y"),
104 join(",", "x", !!($_->[0] < $_->[1] && $_->[1] <= $_->[2]), "y"),
105 "$_->[0] < $_->[1] <= $_->[2]";
106 is join(",", "x", $_->[0] > $_->[1] >= $_->[2], "y"),
[all …]
Drt119311.t29 my ($block) = @_;
32 $_ = $got ? "this is clearly a bug" : "ok";
44 is $_, "ok", 'die triggering DESTROY that calls outer sub';
46 undef $_;
48 is $_, "ok", 'last triggering DESTROY that calls outer sub';
50 undef $_;
52 is $_, "ok", 'next triggering DESTROY that calls outer sub';
54 undef $_;
56 is $_, "ok", 'redo triggering DESTROY that calls outer sub';
58 undef $_;
[all …]
Dfor.t16 $r .= $_;
21 $r .= $_;
25 for (map {$_} @array) {
26 $r .= $_;
30 for (map {$_} 1,2,3) {
31 $r .= $_;
36 $r .= $_;
41 $r .= $_;
47 $r .= $_;
52 $r .= $_;
[all …]
Drecurse.t18 return gcd($_[0] - $_[1], $_[1]) if ($_[0] > $_[1]);
19 return gcd($_[0], $_[1] - $_[0]) if ($_[0] < $_[1]);
20 $_[0];
24 $_[0] < 2 ? 1 : $_[0] * factorial($_[0] - 1);
28 $_[0] < 2 ? 1 : fibonacci($_[0] - 2) + fibonacci($_[0] - 1);
38 return $_[1] + 1 if ($_[0] == 0);
39 return ackermann($_[0] - 1, 1) if ($_[1] == 0);
40 ackermann($_[0] - 1, ackermann($_[0], $_[1] - 1));
46 $_[1] < $_[0] ?
47 takeuchi(takeuchi($_[0] - 1, $_[1], $_[2]),
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Pod-Usage/t/inc/Pod/
DInputObjects.pm144 @_ };
170 (@_ > 1) and $_[0]->{'-name'} = $_[1];
171 return $_[0]->{'-name'};
193 return $_[0]->{'-handle'};
214 (@_ > 1) and $_[0]->{-was_cutting} = $_[1];
215 return $_[0]->{-was_cutting};
271 -text => (@_ == 1) ? shift : undef,
277 @_
297 (@_ > 1) and $_[0]->{'-name'} = $_[1];
298 return $_[0]->{'-name'};
[all …]
DPlainText.pm165 local $_ = "\n";
166 $self->output($_) if($command eq 'back');
169 return $self->$command (@_);
179 local $_ = shift;
182 return $self->output($_);
191 $self->output($_[0]);
194 local $_ = shift;
237 $_ = $self->interpolate ($_, $line);
240 $self->item ($_ . "\n");
242 $self->output ($self->reformat ($_ . "\n"));
[all …]
/openbsd/src/gnu/llvm/compiler-rt/lib/sanitizer_common/
Dsanitizer_interceptors_ioctl_netbsd.inc35 #define _(rq, tp, sz) \
46 _(AFM_ADDFMAP, READWRITE, struct_atm_flowmap_sz);
47 _(AFM_DELFMAP, READWRITE, struct_atm_flowmap_sz);
48 _(AFM_CLEANFMAP, READWRITE, struct_atm_flowmap_sz);
49 _(AFM_GETFMAP, READWRITE, struct_atm_flowmap_sz);
51 _(ALTQGTYPE, READWRITE, struct_altqreq_sz);
52 _(ALTQTBRSET, READ, struct_tbrreq_sz);
53 _(ALTQTBRGET, READWRITE, struct_tbrreq_sz);
55 _(BLUE_IF_ATTACH, READ, struct_blue_interface_sz);
56 _(BLUE_DISABLE, READ, struct_blue_interface_sz);
[all …]
Dsanitizer_common_interceptors_ioctl.inc41 #define _(rq, tp, sz) \
51 _(FIOASYNC, READ, sizeof(int));
52 _(FIOCLEX, NONE, 0);
53 _(FIOGETOWN, WRITE, sizeof(int));
54 _(FIONBIO, READ, sizeof(int));
55 _(FIONCLEX, NONE, 0);
56 _(FIOSETOWN, READ, sizeof(int));
57 _(SIOCATMARK, WRITE, sizeof(int));
58 _(SIOCGIFCONF, CUSTOM, 0);
59 _(SIOCGPGRP, WRITE, sizeof(int));
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/Pod-Simple/lib/Pod/Simple/
DXHTML.pm68 return HTML::Entities::encode_entities( $_[0], $ents ) if $HAS_HTML_ENTITIES;
75 my $str = $_[0];
84 my ($self, $string) = @_;
98 my ($self, $string) = @_;
276 my $new = $self->SUPER::new(@_);
298 return $self->{html_header_tags} = shift if @_;
361 return unless @{ $_[0]{__region_targets} };
362 my $target = $_[0]{__region_targets}[-1];
363 return $_[0]{__literal_targets}{ $target };
367 my ($self, @targets) = @_;
[all …]
/openbsd/src/regress/usr.bin/mandoc/mdoc/Em/
Dpunct.out_ascii7 Leading punctuation: (_b [_b | _b . _b , _b ; _b : _b ? _b ! _b ) _b ] _b
9 Trailing punctuation: _a ( _a [ _a | _a. _a, _a; _a: _a? _a! _a) _a]
11 …Middle punctuation: _a (_b _a [_b _a | _b _a. _b _a, _b _a; _b _a: _b _a? _b _a!
12 _b
14 …Isolated punctuation: _a (_b _a [_b _a | _b _a . _b _a , _b _a ; _b _a : _b _a ? _…
15 _a ) _b _a ] _b
17 Isolated trailing punctuation: _a ( _a [ _a | _a . _a , _a ; _a : _a ? _a ! _a )
18 _a ]
20 Multiple isolated punctuation: _a ([_b _a )] _b
22 Multiple punctuation: [(_a_r_g)].
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/autodie/t/lib/
DHints_pod_examples.pm20 undef_scalar => { fail => sub { !defined($_[0]) } },
23 false_scalar => { fail => sub { return ! $_[0] } },
26 zero_scalar => { fail => sub { defined($_[0]) && $_[0] eq '0' } },
30 empty_list => { scalar => sub { 1 }, list => sub { !@_ } },
33 default_list => { fail => sub { ! @_ || @_ == 1 && !defined $_[0] } },
36 empty_or_false_list => { fail => sub { ! @_ || @_ == 1 && !$_[0] } },
39 undef_n_error_list => { fail => sub { @_ == 2 && !defined $_[0] } },
44 sub undef_scalar { return wantarray ? @_ : $_[0] }
45 sub false_scalar { return wantarray ? @_ : $_[0] }
46 sub zero_scalar { return wantarray ? @_ : $_[0] }
[all …]
/openbsd/src/regress/usr.bin/mandoc/mdoc/Ar/
Dpunct.out_ascii7 …closing punctuation _a) only one _f_i_l_e _._._.) only more than one _f_i_l_e _._._…
8 …middle _a) _z start _f_i_l_e _._._.) _z dot _f_i_l_e _._._.. _z comma _f_i_l_…
9_f_i_l_e _._._.; _z colon _f_i_l_e _._._.: _z quest _f_i_l_e _._._.? _z ex…
10_f_i_l_e _._._.) _z bracket _f_i_l_e _._._.] _z bar | _m op paren (_a op bracket…
12 quoted punctuation: _a (_b | _c) _d, bboolldd.
14 missing blank: _a_r_g_.
/openbsd/src/regress/usr.bin/mandoc/eqn/define/
Dinfinite.out_ascii7 alone: _k_e_y eol
9 …ing position: _k_e_y _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_…
10_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
11_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
12_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
13_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
14_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
15_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
16_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
17_s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s_u_f_f_i_x _s…
[all …]
/openbsd/src/gnu/usr.bin/perl/ext/IPC-Open3/lib/IPC/
DOpen3.pm163 pipe $_[0], $_[1] or croak "$Me: pipe($_[0], $_[1]) failed: $!";
170 open $_[0], $_[1], @_[2..$#_] and return;
172 carp "$Me: open(@_) failed: $!";
176 $_[0] =~ /\A=?(\d+)\z/
177 ? do { my $fh; open($fh, $_[1] . '&=' . $1) and close($fh); }
178 : close $_[0]
183 return $1 if $_[0] =~ /\A=?(\d+)\z/; # deal with fh just being an fd
184 return fileno $_[0];
199 splice @_, 0, 1, undef if \$_[0] == \undef;
200 splice @_, 1, 1, undef if \$_[1] == \undef;
[all …]
/openbsd/src/gnu/usr.bin/perl/regen/
Dop_private193 $maxarg{$_} = 1 for qw(
201 $args0{$_} = 1 for qw(entersub avhvswitch
209 $args0{$_} = 1 for ops_with_check('ck_bitop');
211 $args1{$_} = 1 for (
216 grep !$maxarg{$_} && !$args0{$_},
226 $args2{$_} = 1 for (
228 grep !$maxarg{$_} && !$args0{$_} && !$args1{$_},
232 $args3{$_} = 1 for grep !$maxarg{$_} && !$args0{$_}
233 && !$args1{$_} && !$args2{$_},
239 $args4{$_} = 1 for keys %maxarg,
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/libnet/lib/Net/
DNNTP.pm59 if (@_ % 2) {
61 %arg = @_;
64 %arg = @_;
82 $connect{$_} = $arg{$_} for(grep { m{^SSL_} } keys %arg);
159 @_ == 1 or croak 'usage: $nntp->postok()';
171 @_ # more (ssl) args
178 @_ >= 1 && @_ <= 3 or croak 'usage: $nntp->article([{$msgid|$msgnum}[, $fh]])';
182 @fh = (pop) if @_ == 2 || (@_ && (ref($_[0]) || ref(\$_[0]) eq 'GLOB'));
184 $nntp->_ARTICLE(@_)
191 @_ >= 1 && @_ <= 2 or croak 'usage: $nntp->articlefh([{$msgid|$msgnum}])';
[all …]
/openbsd/src/gnu/usr.bin/perl/dist/Filter-Simple/lib/Filter/
DSimple.pm14 if (@_>1) { shift; goto &FILTER }
15 else { *{caller()."::$_"} = \&$_ foreach @EXPORT }
19 croak "FILTER_ONLY: ", @_;
23 my @bits = extract_quotelike $_[0], qr//;
71 all => sub { my ($t)=@_; sub{ $_=$$_; $t->(@_); $_} },
72 executable=> sub { my ($t)=@_; sub{ref() ? $_=$$_ : $t->(@_); $_} },
73 executable_no_comments=> sub { my ($t)=@_; sub{ref() ? $_=$$_ : $t->(@_); $_} },
74 quotelike => sub { my ($t)=@_; sub{ref() && do{$_=$$_; $t->(@_)}; $_} },
75 regex => sub { my ($t)=@_;
76 sub{ref() or return $_;
[all …]
/openbsd/src/lib/libcrypto/perlasm/
Dx86asm.pl20 die "more than 4 arguments passed to $opcode" if ($#_>3);
26 &generic($opcode,@_) or die "undefined subroutine \&$AUTOLOAD";
32 if ($#_==-1) { push(@out,"\t$opcode\n"); }
33 else { push(@out,"\t$opcode\t".join(',',@_)."\n"); }
39 if ($#_==-1) { push(@out,"$opcode\n"); }
40 else { push(@out,"$opcode\t".join(',',@_)."\n"); }
44 { $_[0] =~ m/^e?([a-d])x$/o or die "$_[0] does not have a 'low byte'";
48 { $_[0] =~ m/^e?([a-d])x$/o or die "$_[0] does not have a 'high byte'";
51 sub ::stack_push{ my $num=$_[0]*4; $stack+=$num; &sub("esp",$num); }
52 sub ::stack_pop { my $num=$_[0]*4; $stack-=$num; &add("esp",$num); }
[all …]
/openbsd/src/gnu/usr.bin/perl/cpan/IO-Compress/lib/IO/Compress/Base/
DCommon.pm56 return $_[0] >= MAX32cmp ;
115 return (defined $_[0] and
116 (UNIVERSAL::isa($_[0],'GLOB') or
117 UNIVERSAL::isa($_[0],'IO::Handle') or
118 UNIVERSAL::isa(\$_[0],'GLOB'))
124 return ( defined($_[0]) and ref($_[0]) eq 'SCALAR' and defined ${ $_[0] } ) ;
129 return (defined $_[0] and
130 ! ref $_[0] and
131 UNIVERSAL::isa(\$_[0], 'SCALAR'));
136 return defined $_[0] && $_[0] =~ /^<.*>$/;
[all …]
/openbsd/src/gnu/usr.bin/perl/lib/Tie/
DHash.pm195 $pkg->TIEHASH(@_);
215 $pkg -> new (@_);
223 my $pkg = ref $_[0];
229 my $key = $self->FIRSTKEY(@_);
234 $key = $self->NEXTKEY(@_, $key);
237 $self->DELETE(@_, $key);
248 sub TIEHASH { bless {}, $_[0] }
249 sub STORE { $_[0]->{$_[1]} = $_[2] }
250 sub FETCH { $_[0]->{$_[1]} }
251 sub FIRSTKEY { my $a = scalar keys %{$_[0]}; each %{$_[0]} }
[all …]

12345678910>>...163