/openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/Windows/ |
H A D | MSVC.pm | 14 my ($self, %spec) = @_; 16 foreach my $path ( @{ $spec{includes} || [] }, 17 @{ $spec{perlinc} || [] } ) { 21 %spec = $self->write_compiler_script(%spec) 22 if $spec{use_scripts}; 25 $spec{cc},'-nologo','-c', 26 @{$spec{includes}} , 27 @{$spec{cflags}} , 28 @{$spec{optimiz [all...] |
H A D | GCC.pm | 9 my ($self, %spec) = @_; 11 foreach my $path ( @{ $spec{includes} || [] }, 12 @{ $spec{perlinc} || [] } ) { 17 my @cc = split / (?=-)/, $spec{cc}; 21 @{$spec{includes}} , 22 @{$spec{cflags}} , 23 @{$spec{optimize}} , 24 @{$spec{defines}} , 25 @{$spec{perlinc}} , 26 '-o', $spec{outpu [all...] |
H A D | BCC.pm | 9 my ($self, %spec) = @_; 11 foreach my $path ( @{ $spec{includes} || [] }, 12 @{ $spec{perlinc} || [] } ) { 16 %spec = $self->write_compiler_script(%spec) 17 if $spec{use_scripts}; 20 $spec{cc}, '-c' , 21 @{$spec{includes}} , 22 @{$spec{cflags}} , 23 @{$spec{optimiz [all...] |
/openbsd-src/gnu/usr.bin/perl/dist/ExtUtils-CBuilder/lib/ExtUtils/CBuilder/Platform/ |
H A D | Windows.pm | 6 use File::Spec; 114 $srcdir ||= File::Spec->curdir(); 118 my %spec = ( 123 output => $args{object_file} || File::Spec->catfile($srcdir, $basename) . $cf->{obj_ext}, 141 \$spec{source}, 142 \$spec{output}, 143 $spec{includes}, 144 $spec{perlinc}, 147 my @cmds = $self->format_compiler_cmd(%spec); 153 (my $out = $spec{outpu [all...] |
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/lib/File/Spec/ |
H A D | Functions.pm | 1 package File::Spec::Functions; 3 use File::Spec; 38 require File::Spec::Unix; 51 my $sub = File::Spec->can($meth); 53 if (exists($udeps{$meth}) && $sub == File::Spec::Unix->can($meth) && 55 File::Spec->can($_) != File::Spec::Unix->can($_) 57 defined(&{"File::Spec::Unix::_fn_$meth"})) { 58 *{$meth} = \&{"File::Spec::Unix::_fn_$meth"}; 60 *{$meth} = sub {&$sub('File::Spec', [all...] |
H A D | AmigaOS.pm | 1 package File::Spec::AmigaOS; 4 require File::Spec::Unix; 9 our @ISA = qw(File::Spec::Unix); 13 File::Spec::AmigaOS - File::Spec for AmigaOS 17 require File::Spec::AmigaOS; # Done automatically by File::Spec 57 All the other methods are from L<File::Spec::Unix>.
|
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/lib/File/ |
H A D | Spec.pm | 1 package File::Spec; 14 NetWare => 'Win32', # Yes, File::Spec::Win32 works on NetWare. 15 symbian => 'Win32', # Yes, File::Spec::Win32 works on symbian. 16 dos => 'OS2', # Yes, File::Spec::OS2 works on DJGPP. 23 require "File/Spec/$module.pm"; 24 our @ISA = ("File::Spec::$module"); 32 File::Spec - portably perform operations on file names 36 use File::Spec; 38 my $x = File::Spec->catfile('a', 'b', 'c'); 42 use File::Spec [all...] |
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/t/ |
H A D | Functions.t | 4 BEGIN {use_ok('File::Spec::Functions', ':ALL');} 6 is(canonpath('a/b/c'), File::Spec->canonpath('a/b/c')); 7 is(case_tolerant(), File::Spec->case_tolerant()); 8 is(catdir(), File::Spec->catdir()); 9 is(catdir('a'), File::Spec->catdir('a')); 10 is(catdir('a','b'), File::Spec->catdir('a','b')); 11 is(catdir('a','b','c'), File::Spec->catdir('a','b','c')); 12 is(catfile(), File::Spec->catfile()); 13 is(catfile('a'), File::Spec->catfile('a')); 14 is(catfile('a','b'), File::Spec->catfile('a','b')); [all …]
|
H A D | tmpdir.t | 4 # Grab all of the plain routines from File::Spec 5 use File::Spec; 6 use File::Spec::Win32; 8 require_ok($_) foreach qw(File::Spec File::Spec::Win32); 18 File::Spec->tmpdir; 26 File::Spec::Win32->tmpdir; 30 File::Spec::Win32->tmpdir; 34 for ('File::Spec', "File::Spec::Win32") { 51 File::Spec->file_name_is_absolute(File::Spec->tmpdir()),
|
H A D | abs2rel.t | 7 use File::Spec(); 25 File::Spec->catdir('first_sub_dir', 'sub_sub_dir'), 32 File::Spec->catfile('second_sub_dir', 'second_file') 45 my $rel_base = File::Spec->catdir(File::Spec->curdir(), 'sub_sub_dir'); 46 my $abs_path = File::Spec->rel2abs($rel_path); 47 my $abs_base = File::Spec->rel2abs($rel_base); 62 my $rr_link = File::Spec->abs2rel($rel_path, $rel_base); 63 my $ra_link = File::Spec->abs2rel($rel_path, $abs_base); 64 my $ar_link = File::Spec->abs2rel($abs_path, $rel_base); 65 my $aa_link = File::Spec->abs2rel($abs_path, $abs_base);
|
/openbsd-src/gnu/usr.bin/perl/dist/PathTools/ |
H A D | MANIFEST | 4 lib/File/Spec.pm 5 lib/File/Spec/AmigaOS.pm 6 lib/File/Spec/Cygwin.pm 7 lib/File/Spec/Epoc.pm 8 lib/File/Spec/Functions.pm 9 lib/File/Spec/Mac.pm 10 lib/File/Spec/OS2.pm 11 lib/File/Spec/Unix.pm 12 lib/File/Spec/VMS.pm 13 lib/File/Spec/Win32.pm [all …]
|
H A D | Changes | 92 - Add security usage note to File::Spec::no_upwards 104 - ensure File::Spec::canonpath() preserves taint (CVE-2015-8607) 110 - add File::Spec::AmigaOS -- and actually ship it, this time 116 - add File::Spec::AmigaOS 127 - Force barename base to be a directory in File::Spec::VMS:abs2rel 128 - Revise Unix syntax detection File::Spec::VMS::abs2rel 135 - File::Spec::Unix->tmpdir: Always return an absolute path 136 - File::Spec now has an XS version for performance. 141 - Stop inadvertently skipping Spec.t on VMS. (Craig Berry) 142 - Rethink EFS in File::Spec::VMS. (Craig Berry) [all …]
|
/openbsd-src/gnu/llvm/llvm/lib/Support/ |
H A D | FormatVariadic.cpp | 28 bool formatv_object_base::consumeFieldLayout(StringRef &Spec, AlignStyle &Where, in consumeFieldLayout() argument 33 if (Spec.empty()) in consumeFieldLayout() 36 if (Spec.size() > 1) { in consumeFieldLayout() 40 // If Spec[1] is a loc char, then Spec[0] is a pad char and Spec[2:...] in consumeFieldLayout() 42 // Otherwise, if Spec[0] is a loc char, then Spec[1:...] contains the width. in consumeFieldLayout() 43 // Otherwise, Spec[0:...] contains the width. in consumeFieldLayout() 44 if (auto Loc = translateLocChar(Spec[1])) { in consumeFieldLayout() 45 Pad = Spec[0]; in consumeFieldLayout() 47 Spec = Spec.drop_front(2); in consumeFieldLayout() 48 } else if (auto Loc = translateLocChar(Spec[0])) { in consumeFieldLayout() [all …]
|
/openbsd-src/gnu/usr.bin/binutils/gprof/ |
H A D | sym_ids.c | 34 char *spec; /* Parsing modifies this. */ member 87 sym_id_add (spec, which_table) in sym_id_add() argument 88 const char *spec; in sym_id_add() 92 int len = strlen (spec); 97 id->spec = (char *) id + sizeof (*id); 98 strcpy (id->spec, spec); 106 /* A spec has the syntax FILENAME:(FUNCNAME|LINENUM). As a convenience 107 to the user, a spec without a colon is interpreted as: 117 parse_spec (spec, sym) in parse_spec() argument 118 char *spec; in parse_spec() [all …]
|
/openbsd-src/libexec/ld.so/ |
H A D | trace.c | 33 char *spec; /* comma separated spec entries */ member 122 _dl_trace_parse_spec(const char *var, struct tracespec *spec) in _dl_trace_parse_spec() argument 127 spec->inverse = 1; in _dl_trace_parse_spec() 137 spec->spec = _dl_malloc(1 + end - start); in _dl_trace_parse_spec() 138 if (spec->spec == NULL) in _dl_trace_parse_spec() 141 _dl_bcopy(start, spec->spec, end - start); in _dl_trace_parse_spec() 142 spec->spec[end - start] = '\0'; in _dl_trace_parse_spec() 155 _dl_trace_match(const char *name, struct tracespec *spec, int allow_so) in _dl_trace_match() argument 161 /* no spec means trace everything */ in _dl_trace_match() 162 if (spec->spec == NULL) in _dl_trace_match() [all …]
|
/openbsd-src/gnu/usr.bin/binutils-2.17/gprof/ |
H A D | sym_ids.c | 34 char *spec; /* Parsing modifies this. */ member 87 sym_id_add (const char *spec, Table_Id which_table) in sym_id_add() argument 90 int len = strlen (spec); in sym_id_add() 95 id->spec = (char *) id + sizeof (*id); in sym_id_add() 96 strcpy (id->spec, spec); in sym_id_add() 104 /* A spec has the syntax FILENAME:(FUNCNAME|LINENUM). As a convenience 105 to the user, a spec without a colon is interpreted as: 115 parse_spec (char *spec, Sym *sym) in parse_spec() argument 120 colon = strrchr (spec, ':'); in parse_spec() 126 if (colon > spec) in parse_spec() [all …]
|
/openbsd-src/gnu/usr.bin/perl/cpan/CPAN-Meta/t/ |
H A D | converter-fragments.t | 14 url => 'http://search.cpan.org/perldoc?CPAN::Meta::Spec', 25 'File::Spec' => "0.80", 29 'meta-spec' => $spec2, 33 'File::Spec' => "0.80", 47 'meta-spec' => $spec2, 52 label => "meta-spec included", 55 'meta-spec' => { version => '1.0' }, 57 'File::Spec' => "0.80", 61 'meta-spec' => $spec2, 65 'File::Spec' => "0.80", [all …]
|
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/t/ |
H A D | metafile_data.t | 29 my $have_url = delete $have->{'meta-spec'}->{url}; 30 my $want_url = delete $want->{'meta-spec'}->{url}; 33 like $have_url, qr{CPAN::Meta::Spec}, "CPAN::Meta::Spec mentioned in meta-spec URL"; 41 'meta-spec' => { 42 url => 'http://module-build.sourceforge.net/META-spec-v1.4.html', 47 'meta-spec' => { 48 url => 'https://metacpan.org/pod/CPAN::Meta::Spec', 123 # Test MIN_PERL_VERSION meta-spec 1.4 135 }, 'MIN_PERL_VERSION meta-spec 1.4'; 138 # Test MIN_PERL_VERSION meta-spec 2.0 [all …]
|
H A D | INST_PREFIX.t | 18 use File::Spec; 35 my $Curdir = File::Spec->curdir; 36 my $Updir = File::Spec->updir; 40 ok( chdir File::Spec->updir ); 80 my $PREFIX = File::Spec->catdir('foo', 'bar'); 112 $perl_src = File::Spec->catdir($Updir, $Updir, $Updir, $Updir, $Updir, $Updir); 113 $perl_src = File::Spec->canonpath($perl_src); 114 $mm_perl_src = File::Spec->canonpath($mm->{PERL_SRC}); 162 my $wibble = File::Spec->catdir(qw(wibble and such)); 180 _set_config(installvendorman1dir => File::Spec->catdir('foo','bar') ); [all …]
|
/openbsd-src/usr.sbin/pkg_add/OpenBSD/ |
H A D | LibSpec.pm | 65 sub lookup($spec, $repo, $base) 67 my $approx = $spec->lookup_stem($repo); 73 if ($spec->match($c, $base)) { 114 # $spec->match($library, $base) 184 sub no_match_dispatch($library, $spec, $base) 186 return $spec->no_match_shared($library, $base); 250 sub lookup_stem($spec, $repo) 252 my $result = $repo->{$spec->stem}; 260 sub no_match_major($spec, $library) 262 return $spec->major != $library->major; [all …]
|
/openbsd-src/gnu/usr.bin/perl/cpan/ExtUtils-MakeMaker/lib/ExtUtils/ |
H A D | Mksymlists.pm | 18 my(%spec) = @_; 22 unless ( $spec{NAME} or 23 ($spec{FILE} and ($spec{DL_FUNCS} or $spec{FUNCLIST})) ); 25 $spec{DL_VARS} = [] unless $spec{DL_VARS}; 26 ($spec{FILE} = $spec{NAME}) =~ s/.*::// unless $spec{FILE}; 27 $spec{FUNCLIST} = [] unless $spec{FUNCLIST}; 28 $spec{DL_FUNCS} = { $spec{NAME} => [] } 29 unless ( ($spec{DL_FUNCS} and keys %{$spec{DL_FUNCS}}) or 30 @{$spec{FUNCLIST}}); 31 if (defined $spec{DL_FUNCS}) { [all …]
|
/openbsd-src/gnu/usr.bin/perl/ext/VMS-Stdio/ |
H A D | Stdio.xs | 292 vmsopen(spec,...) 293 char * spec 303 if (!spec || !*spec) { 310 if (*spec == '+') { 312 spec++; 314 if (*spec == '>') { 315 if (*(spec+1) == '>') *mode = 'a', spec += 2; 316 else *mode = 'w', spec++; 318 else if (*spec == '<') spec++; 324 fp = fopen(spec,mode); [all …]
|
/openbsd-src/gnu/usr.bin/perl/t/lib/ |
H A D | deprecate.t | 10 use File::Spec (); 13 my $test_dir = File::Spec->catdir(qw(lib deprecate)); 15 @INC = ( File::Spec->catdir( (File::Spec->updir)x3, qw(lib)) ); 18 privlibexp => File::Spec->catdir(qw(lib perl)), 19 sitelibexp => File::Spec->catdir(qw(lib site)), 20 archlibexp => File::Spec->catdir(qw(lib perl arch)), 21 sitearchexp => File::Spec->catdir(qw(lib site arch)), 41 my $pm = File::Spec->catfile($dir, $module); 67 my $dir = File::Spec->catdir($libdir{$lib}, $sub_dir); 70 my $pm = File::Spec->catfile($dir, $module);
|
/openbsd-src/gnu/usr.bin/perl/cpan/CPAN-Meta/lib/CPAN/Meta/History/ |
H A D | Meta_1_2.pod | 53 File::Spec: 0 66 meta-spec: 68 url: http://module-build.sourceforge.net/META-spec-v1.2.html 87 found at L<http://module-build.sourceforge.net/META-spec-current.html>, 90 L<http://module-build.sourceforge.net/META-spec-blead.html>.> 176 =head2 meta-spec 180 meta-spec: 182 url: http://module-build.sourceforge.net/META-spec-v1.2.html 184 (Spec 1.1) [required] {URL} This field indicates the location of the 193 (Spec 1.0) [required] {string} The name of the distribution which is often [all …]
|
H A D | Meta_1_4.pod | 53 File::Spec: 0 66 meta-spec: 68 url: http://module-build.sourceforge.net/META-spec-v1.3.html 87 found at L<http://module-build.sourceforge.net/META-spec-current.html>, 90 L<http://module-build.sourceforge.net/META-spec-blead.html>.> 148 =head2 meta-spec 152 meta-spec: 154 url: http://module-build.sourceforge.net/META-spec-v1.3.html 156 (Spec 1.1) [required] {URL} This field indicates the location of the 165 (Spec 1.0) [required] {string} The name of the distribution which is often [all …]
|