| /openbsd-src/gnu/usr.bin/perl/lib/ |
| H A D | overload.pm | 32 my $package = shift; 35 *{$package . "::(("} = \&nil; # Make it findable via fetchmethod. 38 for my $sym (*{$package . "::()"}) { 47 $ {$package . "::(" . $_} = $sub; 51 *{$package . "::(" . $_} = \&{ $sub }; 57 my $package = caller(); 60 $package->overload::OVERLOAD(@_); 64 my $package = caller(); 66 *{$package . "::(("} = \&nil; 70 delete $ {$package . "::"}{$_ eq 'fallback' ? '()' : "(" .$_}; [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Module-Metadata/t/ |
| H A D | extract-package.t | 11 # parse package names 15 # package => expected package names 19 name => 'package NAME', 20 package => [ 'Simple' ], 22 package Simple; 26 name => 'package NAME::SUBNAME', 27 package => [ 'Simple::Edward' ], 29 package Simple::Edward; 33 name => 'package NAM [all...] |
| H A D | extract-version.t | 25 package Simple; 33 package Simple; 42 package Simple; 51 package Simple; 59 package Simple; 68 package Simple; 78 package Simple; 86 name => 'choose the right default package based on package/file name', 88 package Simpl [all...] |
| H A D | metadata.t | 83 my ($dist_name, $dist_dir) = new_dist(files => { $file => "package Simple;\n" }); 107 # Find each package only once 110 package Simple; 112 package Error::Simple; 114 package Simple; 120 is( @packages, 2, 'record only one occurence of each package' ); 124 # Module 'Simple.pm' does not contain package 'Simple'; 128 package Simple::Not; 134 is( $pm_info->name, undef, 'no default package' ); 135 is( $pm_info->version, undef, 'no version w/o default package' ); [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Module-Metadata/lib/Module/ |
| H A D | Metadata.pm | 3 package Module::Metadata; # git description: v1.000037-8-g92dec6c 4 # ABSTRACT: Gather package and POD information from perl module files 43 my $PKG_FIRST_WORD_REGEXP = qr{ # the FIRST word in a package name 51 my $PKG_ADDL_WORD_REGEXP = qr{ # the 2nd+ word in a package name 59 my $PKG_NAME_REGEXP = qr{ # match a package name 61 $PKG_FIRST_WORD_REGEXP # a package word 64 $PKG_ADDL_WORD_REGEXP ### a package word 71 my $PKG_REGEXP = qr{ # match a package declaration 73 package # the word 'package' [all...] |
| /openbsd-src/gnu/usr.bin/perl/cpan/version/t/ |
| H A D | coretests.pm | 2 package main; 224 (my $package = basename($filename)) =~ s/\.pm$//; 225 print $fh "package $package;\n\$$package\::VERSION=0.58;\n1;\n"; 229 eval "use lib '.'; use $package $version"; 230 unlike($@, qr/$package version $version/, 234 $new_version = $package->VERSION; 243 unlike($@, qr/defines neither package nor VERSION/, 249 eval "use lib '.'; use $package [all...] |
| H A D | 02derived.t | 24 package version::Bad; 29 package version::Bad2; 43 package main; 49 (my $package = basename($filename)) =~ s/\.pm$//; 52 package $package; 59 delete $main::INC{'$package'}; 64 use_ok($package, 0.001); 65 my $testobj = $package->new(1.002_003); 66 isa_ok( $testobj, $package ); [all...] |
| /openbsd-src/gnu/usr.bin/perl/t/mro/ |
| H A D | basic_utf8.t | 13 package MRO_அ; 15 package MRO_ɓ; 17 package MRO_ᶝ; 19 package MRO_d; 21 package MRO_ɛ; 23 package MRO_ᚠ; 70 package MRO_ҭṣṱबꗻ; 72 package MRO_Test옽ḦРꤷsӭ; 74 package MRO_Ɯ; our @ISA = qw/MRO_ҭṣṱबꗻ/; 89 package DESTROY_MRO_Bӓeᓕne; [all …]
|
| H A D | dbic_c3_utf8.t | 20 package Ẋẋ::ḐʙIX::Cl았::Coレ; use mro 'c3'; 32 package Ẋẋ::ḐʙIX::Cl았::Ĭⁿᰒ텣올움ᶮ; use mro 'c3'; 35 package Ẋẋ::ḐʙIX::Cl았::ロẈ; use mro 'c3'; 38 package Ẋẋ::ḐʙIX::Cl았; use mro 'c3'; 44 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ; use mro 'c3'; 54 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::헬pḜrS; use mro 'c3'; 62 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::Pr오xᐇMeᖪ옫ś; use mro 'c3'; 65 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::밧え; use mro 'c3'; 68 package Ẋẋ::ḐʙIX::Cl았::ᛕķ::Ạuต; use mro 'c3'; 71 package Ẋẋ::ḐʙIX::Cl았::ᛕķ; use mro 'c3'; [all …]
|
| H A D | dbic_dfs_utf8.t | 22 package Ẋẋ::ḐʙIX::Cl았::Coレ; use mro 'dfs'; 34 package Ẋẋ::ḐʙIX::Cl았::Ĭⁿᰒ텣올움ᶮ; use mro 'dfs'; 37 package Ẋẋ::ḐʙIX::Cl았::ロẈ; use mro 'dfs'; 40 package Ẋẋ::ḐʙIX::Cl았; use mro 'dfs'; 46 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ; use mro 'dfs'; 56 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::헬pḜrS; use mro 'dfs'; 64 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::Pr오xᐇMeᖪ옫ś; use mro 'dfs'; 67 package Ẋẋ::ḐʙIX::Cl았::렐aチ온ሺṖ::밧え; use mro 'dfs'; 70 package Ẋẋ::ḐʙIX::Cl았::ᛕķ::Ạuต; use mro 'dfs'; 73 package Ẋẋ::ḐʙIX::Cl았::ᛕķ; use mro 'dfs'; [all …]
|
| H A D | basic.t | 17 package MRO_A; 19 package MRO_B; 21 package MRO_C; 23 package MRO_D; 25 package MRO_E; 27 package MRO_F; 79 package MRO_TestBase; 81 package MRO_TestOtherBase; 83 package MRO_M; our @ISA = qw/MRO_TestBase/; 98 package DESTROY_MRO_Baseline; [all …]
|
| H A D | dbic_dfs.t | 18 package xx::DBIx::Class::Core; use mro 'dfs'; 30 package xx::DBIx::Class::InflateColumn; use mro 'dfs'; 33 package xx::DBIx::Class::Row; use mro 'dfs'; 36 package xx::DBIx::Class; use mro 'dfs'; 42 package xx::DBIx::Class::Relationship; use mro 'dfs'; 52 package xx::DBIx::Class::Relationship::Helpers; use mro 'dfs'; 60 package xx::DBIx::Class::Relationship::ProxyMethods; use mro 'dfs'; 63 package xx::DBIx::Class::Relationship::Base; use mro 'dfs'; 66 package xx::DBIx::Class::PK::Auto; use mro 'dfs'; 69 package xx::DBIx::Class::PK; use mro 'dfs'; [all …]
|
| H A D | dbic_c3.t | 18 package xx::DBIx::Class::Core; use mro 'c3'; 30 package xx::DBIx::Class::InflateColumn; use mro 'c3'; 33 package xx::DBIx::Class::Row; use mro 'c3'; 36 package xx::DBIx::Class; use mro 'c3'; 42 package xx::DBIx::Class::Relationship; use mro 'c3'; 52 package xx::DBIx::Class::Relationship::Helpers; use mro 'c3'; 60 package xx::DBIx::Class::Relationship::ProxyMethods; use mro 'c3'; 63 package xx::DBIx::Class::Relationship::Base; use mro 'c3'; 66 package xx::DBIx::Class::PK::Auto; use mro 'c3'; 69 package xx::DBIx::Class::PK; use mro 'c3'; [all …]
|
| H A D | recursion_dfs_utf8.t | 29 package ƙ; 31 package ᶨ; 33 package ィ; 35 package ʰ; 37 package ᶢ; 39 package f; 41 package ǝ; 43 package ᛞ; 45 package ʗ; 47 package B; [all …]
|
| H A D | complex_dfs_utf8.t | 55 package 텟Ṱ::ᐊ; use mro 'dfs'; 57 package 텟Ṱ::ḅ; use mro 'dfs'; 59 package 텟Ṱ::ȼ; use mro 'dfs'; 61 package 텟Ṱ::Ḏ; use mro 'dfs'; 64 package 텟Ṱ::Ӭ; use mro 'dfs'; 67 package 텟Ṱ::Ḟ; use mro 'dfs'; 70 package 텟Ṱ::ḡ; use mro 'dfs'; 73 package 텟Ṱ::Ḣ; use mro 'dfs'; 76 package 텟Ṱ::ᶦ; use mro 'dfs'; 79 package 텟Ṱ::J; use mro 'dfs'; [all …]
|
| H A D | recursion_c3_utf8.t | 31 package ƙ; 34 package ᶨ; 37 package ィ; 40 package ʰ; 43 package ᶢ; 46 package f; 49 package ǝ; 52 package ᛞ; 55 package ʗ; 58 package B; [all …]
|
| H A D | complex_c3_utf8.t | 55 package 텟Ṱ::ᐊ; use mro 'c3'; 57 package 텟Ṱ::ḅ; use mro 'c3'; 59 package 텟Ṱ::ȼ; use mro 'c3'; 61 package 텟Ṱ::Ḏ; use mro 'c3'; 64 package 텟Ṱ::Ӭ; use mro 'c3'; 67 package 텟Ṱ::Ḟ; use mro 'c3'; 71 package 텟Ṱ::ḡ; use mro 'c3'; 74 package 텟Ṱ::Ḣ; use mro 'c3'; 77 package 텟Ṱ::ᶦ; use mro 'c3'; 81 package 텟Ṱ::J; use mro 'c3'; [all …]
|
| /openbsd-src/gnu/usr.bin/perl/dist/Storable/t/ |
| H A D | utf8hash.t | 106 package Hash_Test; 112 package main; 121 my ($object, $package) = @_; 122 unless ($package) { 126 isa_ok ($object, $package); 136 for my $package ('', 'Hash_Test') { 138 if ($package) { 139 bless \%hash, $package; 150 class_test ($copy, $package); 163 if ($package) { [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/AutoLoader/t/ |
| H A D | 01AutoLoader.t | 36 package Foo; 42 package Foo; 48 package Foo; 57 package Foo; 63 package Foo; 72 package main; 115 package Foo; 121 package Foo; 138 package Bar; 143 package Foo; [all …]
|
| /openbsd-src/gnu/usr.bin/perl/t/comp/ |
| H A D | package_block.t | 8 package Foo { 10 package Bar::Baz { 25 package Foo 11 { ; } 26 package Bar 22 { 35 package Foo { } 40 eval q[package Foo {]; 46 package Foo { 48 package Bar::Baz { 54 package Quux { } 66 package Foo { [all …]
|
| /openbsd-src/gnu/usr.bin/perl/t/lib/strict/ |
| H A D | vars | 52 Global symbol "$fred" requires explicit package name (did you forget to declare "my $fred"?) at - l… 60 Global symbol "$fred" requires explicit package name (did you forget to declare "my $fred"?) at - l… 68 Global symbol "$fred" requires explicit package name (did you forget to declare "my $fred"?) at - l… 81 Global symbol "$joe" requires explicit package name (did you forget to declare "my $joe"?) at - lin… 96 Global symbol "$jòè" requires explicit package name (did you forget to declare "my $jòè"?) at - lin… 108 Global symbol "$joe" requires explicit package name (did you forget to declare "my $joe"?) at - lin… 141 Global symbol "$joe" requires explicit package name (did you forget to declare "my $joe"?) at ./abc… 158 Global symbol "$jòè" requires explicit package name (did you forget to declare "my $jòè"?) at ./abc… 171 Global symbol "$joe" requires explicit package name (did you forget to declare "my $joe"?) at abc.p… 189 Global symbol "$jòè" requires explicit package name (did you forget to declare "my $jòè"?) at abc.p… [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-Constant/t/ |
| H A D | Constant.t | 50 my $package = "ExtTest"; 236 open(XS, "$package.xs") or die $!; 247 $regen = `$perl -x $package.xs`; 250 print "not ok $realtest # $perl -x $package.xs failed: $?\n"; 313 my $package = shift; 323 'NAME' => "$package", 324 'VERSION_FROM' => "$package.pm", # finds \$VERSION 326 (#ABSTRACT_FROM => "$package.pm", # XXX add this 348 my ($name, $items, $export_names, $package, $header, $testfile, $num_tests, 359 NAME => $package, [all …]
|
| /openbsd-src/gnu/llvm/llvm/bindings/ocaml/llvm/ |
| H A D | META.llvm.in | 8 package "analysis" ( 16 package "bitreader" ( 24 package "bitwriter" ( 32 package "executionengine" ( 40 package "ipo" ( 48 package "debuginfo" ( 56 package "irreader" ( 64 package "scalar_opts" ( 72 package "transform_utils" ( 80 package "vectorize" ( [all …]
|
| /openbsd-src/gnu/usr.bin/perl/t/uni/ |
| H A D | package.t | 15 package Føø::Bær { } 17 package クラス { } 19 package ฟọ::バッズ { } 28 package ꑭʑ; 33 package 압Ƈ; 59 eval 'package main; is $ㄅĽuṞfⳐ, 123, "comp/stash.t test 6";'; 63 package main; 69 package ᛔQR; 100 eval q[package ᕘ {];
|
| H A D | stash.t | 23 package ꕽ::Ʉ::ꔬz::ꢨᙇ; 42 package ᛐⲞɲe::Šꇇᚽṙᆂṗ; 45 package main; 139 package FŌŌ; 142 package main; 155 package FŌŌ௨; 170 package FŌŌ3; 174 package main; 193 package bᓙṗ; 219 package クラス; [all …]
|