/openbsd-current/gnu/usr.bin/perl/dist/Storable/t/ |
H A D | st-dump.pl | 86 my ($sref) = @_; 87 my $scalar = $$sref;
|
/openbsd-current/gnu/usr.bin/perl/t/op/ |
H A D | aassign.t | 568 my $sref = do { my $tmp = 2; \$tmp }; 569 ($sref, $fill) = (1, $$sref); 570 is ($sref, 1, "RT #130132 scalar 1"); 574 $sref = \$x; 575 ($sref, $$sref) = (2, 3); 576 is ($sref, 2, "RT #130132 scalar derefffed 1"); 580 $sref = \$x; 581 ($sref, [all...] |
H A D | inccode.t | 149 my $sref = bless( \(my $x = 1), 'FooLoader' ); 150 push @INC, $sref; 158 is( $INC{'Quux2.pm'}, $sref, ' val Quux2.pm is correct in %INC' );
|
/openbsd-current/gnu/usr.bin/perl/cpan/autodie/lib/ |
H A D | Fatal.pm | 779 my ($class, $core, $call, $name, $void, $lexical, $sub, $sref, @argvs) = @_; 786 return $class->_one_invocation($core,$call,$name,$void,$sub,! $lexical, $sref, @argv); 808 push @out, $class->_one_invocation($core,$call,$name,$void,$sub,! $lexical, $sref, @argv); 844 my ($class, $core, $call, $name, $void, $sub, $back_compat, $sref, @argv) = @_; 920 $hints = autodie::hints->get_hints_for( $sref ); 926 $human_sub_name = autodie::hints->sub_fullname( $sref ); 1201 my($code, $sref, $proto, $core, $call, $hints, $cache, $cache_type); 1241 $sref = \&$sub; 1253 # We return our $sref from this subroutine later 1265 if (exists($Is_fatalised_sub{$sref})) { [all...] |
/openbsd-current/gnu/llvm/lldb/source/API/ |
H A D | SBInstructionList.cpp | 141 bool SBInstructionList::GetDescription(Stream &sref) { argument 168 inst->Dump(&sref, max_opcode_byte_size, true, false, 171 sref.EOL();
|
/openbsd-current/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test/Builder/IO/ |
H A D | Scalar.pm | 90 my ($self, $sref) = @_; 93 defined($sref) or do {my $s = ''; $sref = \$s}; 94 (ref($sref) eq "SCALAR") or croak "open() needs a ref to a scalar"; 98 *$self->{SR} = $sref; ### scalar reference 535 =item sref 542 sub sref { *{shift()}->{SR} } subroutine
|
/openbsd-current/gnu/llvm/lldb/source/Interpreter/ |
H A D | OptionArgParser.cpp | 155 llvm::StringRef sref = s; local 223 if (g_symbol_plus_offset_regex.Execute(sref, &matches)) {
|
/openbsd-current/gnu/usr.bin/perl/ |
H A D | sv.c | 3827 SV * const sref = (SV *)GvAV((const GV *)dsv); local 3828 if (SvSMAGICAL(sref) && (mg = mg_find(sref, PERL_MAGIC_isa))) { 3838 else sv_magic(sref, dsv, PERL_MAGIC_isa, NULL, 0); 3866 SV * const sref = SvRV(ssv); local 3871 const U32 stype = SvTYPE(sref); 3906 /*if (GvCVGEN(dsv) && (GvCV(dsv) != (const CV *)sref || GvCVGEN(dsv))) {*/ 3933 if (stype == SVt_PVCV && (*location != sref || GvCVGEN(dsv))) { 3943 CvCONST((const CV *)sref) 3944 ? cv_const_sv_or_av((const CV *)sref) [all...] |
/openbsd-current/gnu/usr.bin/perl/t/comp/ |
H A D | proto.t | 619 sreftest my $sref, $i++;
|
/openbsd-current/gnu/usr.bin/perl/cpan/Pod-Usage/lib/Pod/ |
H A D | Usage.pm | 268 my $sref = $self->{USAGE_SELECT}; 274 push(@$sref, $cs);
|
/openbsd-current/gnu/llvm/lldb/source/Commands/ |
H A D | CommandObjectType.cpp | 74 SynthAddOptions(bool sptr, bool sref, bool casc, argument 76 : m_skip_pointers(sptr), m_skip_references(sref), m_cascade(casc),
|