Lines Matching refs:spec
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{optimize}} ,
24 @{$spec{defines}} ,
25 @{$spec{perlinc}} ,
26 "-o$spec{output}" ,
27 $spec{source} ,
32 my ($self, %spec) = @_;
34 my $script = File::Spec->catfile( $spec{srcdir},
35 $spec{basename} . '.ccs' );
53 @spec{ qw(includes cflags optimize perlinc) } )
56 push @{$spec{includes}}, '@"' . $script . '"';
58 return %spec;
62 my ($self, %spec) = @_;
64 foreach my $path ( @{$spec{libpath}} ) {
68 push( @{$spec{startup}}, 'c0d32.obj' )
69 unless ( $spec{startup} && @{$spec{startup}} );
71 %spec = $self->write_linker_script(%spec)
72 if $spec{use_scripts};
75 $spec{ld} ,
76 @{$spec{lddlflags}} ,
77 @{$spec{libpath}} ,
78 @{$spec{other_ldflags}} ,
79 @{$spec{startup}} ,
80 @{$spec{objects}} , ',',
81 $spec{output} , ',',
82 $spec{map_file} , ',',
83 $spec{libperl} ,
84 @{$spec{perllibs}} , ',',
85 $spec{def_file}
90 my ($self, %spec) = @_;
95 my $ld_script = File::Spec->catfile( $spec{srcdir},
96 $spec{basename} . '.lds' );
97 my $ld_libs = File::Spec->catfile( $spec{srcdir},
98 $spec{basename} . '.lbs' );
112 @spec{ qw(lddlflags libpath other_ldflags startup objects) } )
120 (delete $spec{libperl} || ''),
121 @{delete $spec{perllibs} || []},
124 push @{$spec{lddlflags}}, '@"' . $ld_script . '"';
125 push @{$spec{perllibs}}, '@"' . $ld_libs . '"';
127 return %spec;