Home
last modified time | relevance | path

Searched refs:pkg (Results 1 – 25 of 227) sorted by relevance

12345678910

/openbsd-src/gnu/usr.bin/perl/t/opbasic/
H A Dconcat.t261 our $pkg;
296 $pkg = "-";
297 is($pkg, '-', '$pkg = "-"');
298 $pkg = "-";
299 is($pkg, '-', '$pkg = "-"');
300 $pkg = "-";
301 is($pkg, '-', '$pkg = "-"');
302 $pkg = "-";
303 is($pkg, '-', '$pkg = "-"');
304 $pkg = $a1;
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/Exporter/lib/Exporter/
H A DHeavy.pm29 my ($pkg, $exports, $cache) = @_;
32 my $ok = \@{"${pkg}::EXPORT_OK"};
65 my($pkg, $callpkg, @imports) = @_;
67 my($exports, $export_cache) = (\@{"${pkg}::EXPORT"},
68 $Exporter::Cache{$pkg} ||= {});
72 _rebuild_cache ($pkg, $exports, $export_cache);
77 my $tagsref = \%{"${pkg}::EXPORT_TAGS"};
94 warn qq["$spec" is not defined in %${pkg}::EXPORT_TAGS];
125 $pkg->VERSION($sym); # inherit from UNIVERSAL
144 _rebuild_cache ($pkg,
[all...]
/openbsd-src/gnu/usr.bin/perl/lib/Tie/
H A DHandle.pm127 my $pkg = shift;
128 $pkg->TIEHANDLE(@_);
134 my $pkg = shift;
135 if (defined &{"{$pkg}::new"}) {
136 warnings::warnif("WARNING: calling ${pkg}->new since ${pkg}->TIEHANDLE is missing");
137 $pkg->new(@_);
140 croak "$pkg doesn't define a TIEHANDLE method";
169 my $pkg = ref $_[0];
170 croak "$pkg doesn't define a READLINE method";
187 my $pkg = ref $_[0];
[all …]
H A DScalar.pm100 my $pkg = shift;
101 $pkg->TIESCALAR(@_);
107 my $pkg = shift;
108 my $pkg_new = $pkg -> can ('new');
110 if ($pkg_new and $pkg ne __PACKAGE__) {
116 croak "$pkg must define either a TIESCALAR() or a new() method";
119 warnings::warnif ("WARNING: calling ${pkg}->new since " .
120 "${pkg}->TIESCALAR is missing");
121 $pkg -> new (@_);
124 croak "$pkg doesn't define a TIESCALAR method";
[all …]
H A DHash.pm194 my $pkg = shift;
195 $pkg->TIEHASH(@_);
201 my $pkg = shift;
202 my $pkg_new = $pkg -> can ('new');
204 if ($pkg_new and $pkg ne __PACKAGE__) {
210 croak "$pkg must define either a TIEHASH() or a new() method";
213 warnings::warnif ("WARNING: calling ${pkg}->new since " .
214 "${pkg}->TIEHASH is missing");
215 $pkg -> new (@_);
218 croak "$pkg doesn't define a TIEHASH method";
[all …]
/openbsd-src/gnu/usr.bin/perl/lib/
H A DSymbol.pm121 my $pkg;
126 $pkg = "main";
129 $pkg = (@_ > 1) ? $_[1] : caller;
131 $name = $pkg . "::" . $name;
145 my $pkg = shift;
149 unless ($pkg =~ /^main::.*::$/) {
150 $pkg = "main$pkg" if $pkg =~ /^::/;
151 $pkg = "main::$pkg" unless $pkg =~ /^main::/;
152 $pkg .= '::' unless $pkg =~ /::$/;
155 my($stem, $leaf) = $pkg =~ m/(.*::)(\w+::)$/;
[all …]
H A DFileHandle.pm57 for my $pkg (keys %import) {
58 for my $func (@{$import{$pkg}}) {
59 my $c = *{"${pkg}::$func"}{CODE}
60 or die "${pkg}::$func missing";
70 my $pkg = shift;
73 Exporter::export($pkg, $callpkg, @_);
/openbsd-src/usr.sbin/pkg_add/OpenBSD/
H A DCollisionReport.pm26 sub handle_collisions($self, $todo, $pkg, $bypkg)
30 push(@{$bypkg->{$pkg}}, $name);
44 my $pkg = $state->vstat->value($state->{destdir}.$name);
45 if (defined $pkg) {
46 push(@{$bypkg->{$pkg}}, $name);
55 for my $pkg (installed_packages()) {
56 $state->say("Looking for collisions in #1", $pkg) if $verbose;
59 next unless -d installed_info($pkg);
60 my $plist = OpenBSD::PackingList->from_installation($pkg,
63 $plist->handle_collisions($todo, $pkg, $bypkg);
[all …]
H A DPkgInfo.pm176 for my $pkg (sort {$a->name cmp $b->name} @$l) {
177 &$code($pkg->name, $pkg);
178 $pkg->close_now;
179 $pkg->wipe_info;
196 for my $pkg (@$r) {
197 &$code($pkg->name, $pkg);
198 $pkg->close_now;
199 $pkg->wipe_info;
204 my $pkg = $repo->find($pkgname);
205 if (defined $pkg) {
[all …]
H A DPkgDelete.pm228 for my $pkg ($set->older) {
229 $set->setup_header($state, $pkg);
230 $state->log->set_context('-'.$pkg->pkgname);
231 OpenBSD::Delete::delete_handle($pkg, $state);
266 for my $pkg ($r->list) {
267 next if $set->{older}{$pkg};
268 my $f = $state->tracker->find($pkg);
270 $todo->{$pkg} = $f;
272 $bad->{$pkg} = 1;
278 for my $pkg (keys %$bad) {
[all …]
H A DReplace.pm46 sub pkg_has_exec($pkg, $new)
49 $pkg->plist->scan_for_exec($new, \$has_exec);
55 for my $pkg ($set->older) {
56 return 0 if pkg_has_exec($pkg, 0);
58 for my $pkg ($set->newer) {
59 return 0 if pkg_has_exec($pkg, 1);
/openbsd-src/gnu/usr.bin/perl/cpan/libnet/lib/Net/
H A DCmd.pm72 my $pkg = shift;
73 my $cmd = $pkg;
75 $debug{$pkg} ||= 0;
78 my @do = ($pkg);
79 my %spc = ($pkg, "");
81 while ($pkg = shift @do) {
82 next if defined $done{$pkg};
84 $done{$pkg} = 1;
87 defined ${"${pkg}::VERSION"}
88 ? "(" . ${"${pkg}::VERSION"} . ")"
[all …]
/openbsd-src/gnu/usr.bin/perl/dist/Exporter/lib/
H A DExporter.pm26 my $pkg = shift;
29 if ($pkg eq "Exporter" and @_ and $_[0] eq "import") {
34 # We *need* to treat @{"$pkg\::EXPORT_FAIL"} since Carp uses it :-(
35 my $exports = \@{"$pkg\::EXPORT"};
38 my $fail = ${$pkg . '::'}{EXPORT_FAIL} && \@{"$pkg\::EXPORT_FAIL"};
39 return export $pkg, $callpkg, @_
41 my $export_cache = ($Cache{$pkg} ||= {});
46 foreach (@$exports, @{"$pkg\::EXPORT_OK"});
59 return export $pkg,
[all...]
/openbsd-src/gnu/usr.bin/perl/dist/Attribute-Handlers/lib/Attribute/
H A DHandlers.pm12 my ($pkg, $ref, $type) = @_;
13 return $symcache{$pkg,$ref} if $symcache{$pkg,$ref};
16 my $symtab = \%{$pkg."::"};
19 return $symcache{$pkg,$ref} = \*{"$pkg:\:$_"};
23 return $symcache{$pkg,$ref} = \$sym
177 my ($pkg, $ref, @attrs) = @_;
200 %lastattr=(pkg=>$pkg,ref=>$ref,type=>$data);
205 my $handler = $pkg->can("_ATTR_${type}_${attr}");
207 my $decl = [$pkg, $ref, $attr, $data,
242 my ($pkg, $ref, $attr, $data, $raw, $handlerphase, $filename, $linenum) = @$declaration;
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/AutoLoader/lib/
H A DAutoLoader.pm80 my ($pkg,$func) = ($sub =~ /(.*)::([^:]+)$/);
81 $pkg =~ s#::#/#g;
82 if (defined($filename = $INC{"$pkg.pm"})) {
84 $pkg =~ tr#/#:#;
86 unless $filename =~ s#^(.*)$pkg\.pm\z#$1auto:$pkg:$func.al#s;
89 unless $filename =~ s#^(.*)$pkg\.pm\z#$1auto/$pkg/$func.al#s;
137 my $pkg = shift;
144 if ($pkg eq 'AutoLoader') {
/openbsd-src/gnu/usr.bin/perl/cpan/Locale-Maketext-Simple/lib/Locale/Maketext/
H A DSimple.pm134 my $pkg = join('::', grep { defined and length } $args{Class}, $args{Subclass});
135 return $Loc{$pkg} if exists $Loc{$pkg};
156 package $pkg;
164 *${pkg}::Lexicon = \\%${pkg}::i_default::Lexicon;
171 my $lh = eval { $pkg->get_handle } or return;
174 $Loc{$pkg} = sub {
179 $Loc{$pkg} = sub {
203 return $Loc{$pkg}, sub {
204 $lh = $pkg->get_handle(@_);
/openbsd-src/gnu/usr.bin/perl/dist/Safe/
H A DSafe.pm190 my $pkg = $obj->root();
194 $pkg = "main::$pkg\::"; # expand to full symbol table name
195 ($stem, $leaf) = $pkg =~ m/(.*::)(\w+::)$/;
201 #warn "erase($pkg) stem=$stem, leaf=$leaf";
282 my $pkg = shift;
289 croak("Package \"$pkg\" does not exist")
290 unless keys %{"$pkg\::"};
296 # warn "share_from $pkg $type $var";
298 *{$root."::$var"} = (!$type) ? \&{$pkg
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/Test-Simple/lib/Test2/API/
H A DContext.pm18 my $pkg = "Test2::Event::$_";
21 ( $pkg => $pkg, $_ => $pkg )
257 my $pkg = $LOADED{$event} || $self->_parse_event($event);
262 $e = $pkg->new(
280 my $pkg = $LOADED{$event} || $self->_parse_event($event);
283 $pkg->new(
459 my $pkg;
461 $pkg
[all...]
/openbsd-src/gnu/usr.bin/perl/dist/constant/lib/
H A Dconstant.pm84 my $pkg;
88 $pkg = $1;
89 if (_CAN_PCS && $pkg ne $caller) {
91 $symtab = \%{$pkg . '::'};
95 $pkg = $caller;
103 } elsif ($forced_into_main{$name} and $pkg ne 'main') {
142 my $full_name = "${pkg}::$name";
167 ++$flush_mro->{$pkg};
183 $flush_mro->{$pkg}++;
/openbsd-src/gnu/usr.bin/perl/cpan/IO-Compress/t/
H A D111const-deflate.t37 my $pkg = 1;
41 ++ $pkg ;
43 package P$pkg;
51 is $@, "", "create package P$pkg";
56 eval "package P$pkg; defined IO::Compress::${module}::$symbol ;";
70 ++ $pkg ;
73 package P$pkg;
82 is $@, "", "create package P$pkg";
88 eval "package P$pkg; defined $symbol ;";
/openbsd-src/gnu/llvm/llvm/cmake/modules/
H A DFindOCaml.cmake23 # HAVE_OCAML_${pkg}
27 # OCAML_${pkg}_VERSION
64 function(find_ocamlfind_package pkg)
68 COMMAND "${OCAMLFIND}" "query" "${pkg}" "-format" "%v"
92 "ocamlfind package ${pkg} should have version ${ARG_VERSION} or newer")
96 string(TOUPPER ${pkg} pkg)
98 set(HAVE_OCAML_${pkg} ${found}
101 set(OCAML_${pkg}_VERSION ${version}
/openbsd-src/usr.sbin/nsd/
H A Daclocal.m415 # pkg.m4 - Macros to locate and use pkg-config. -*- Autoconf -*-
16 # serial 12 (pkg-config-0.29.2)
46 dnl Verify that the version of the pkg-config macros are at least
48 dnl installed version of pkg-config, this checks the developer's version
49 dnl of pkg.m4 when generating configure.
53 dnl [m4_fatal([must install pkg-config 0.29 or later before running autoconf/autogen])])
60 [m4_fatal([pkg.m4 version $1 or higher is required but ]PKG_MACROS_VERSION[ found])])
67 dnl Search for the pkg-config tool and set the PKG_CONFIG variable to
68 dnl first found in the path. Checks that the version of pkg-config found
71 dnl pkg-config existed.
[all …]
/openbsd-src/usr.bin/pkg-config/
H A Dpkg-config222 for my $pkg (@$top_config) {
223 do_modversion($pkg);
228 for my $pkg (@$top_config) {
229 print_requires($pkg);
235 for my $pkg (@$top_config) {
236 $rc = 1 unless versionmatch($configs{$pkg}, '>=', $v);
243 for my $pkg (@$top_config) {
244 $rc = 1 unless versionmatch($configs{$pkg}, '=', $v);
251 for my $pkg (@$top_config) {
252 $rc = 1 unless versionmatch($configs{$pkg}, '<=', $v);
[all …]
/openbsd-src/gnu/usr.bin/perl/cpan/DB_File/
H A DDB_File.pm22 my $pkg = shift ;
24 tie %x, $pkg ;
25 bless \%x, $pkg ;
31 my $pkg = shift ;
42 }, $pkg ;
53 my $pkg = ref $self ;
54 croak "${pkg}::FETCH - Unknown element '$key'" ;
74 my $pkg = ref $self ;
75 croak "${pkg}::STORE - Unknown element '$key'" ;
89 my $pkg
[all...]
/openbsd-src/gnu/usr.bin/perl/cpan/Scalar-List-Utils/lib/List/
H A DUtil.pm31 my $pkg = caller;
36 ${"${pkg}::a"} = ${"${pkg}::a"};
37 ${"${pkg}::b"} = ${"${pkg}::b"};

12345678910