diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2003-11-04 12:22:54 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2003-11-04 12:22:54 +0000 |
commit | 6a00e0141060342c2bc011a2e47ccb3e85264e5b (patch) | |
tree | 42e57fcfbc0b2cccb01a1dd8db1fa51ff1c2039a /modules/VC7ProjectCreator.pm | |
parent | da99effcf978b0f8b7619c7e47774b596ec6c1eb (diff) | |
download | MPC-6a00e0141060342c2bc011a2e47ccb3e85264e5b.tar.gz |
ChangeLogTag: Tue Nov 4 06:20:18 2003 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/VC7ProjectCreator.pm')
-rw-r--r-- | modules/VC7ProjectCreator.pm | 42 |
1 files changed, 39 insertions, 3 deletions
diff --git a/modules/VC7ProjectCreator.pm b/modules/VC7ProjectCreator.pm index 6be9b130..60ebf91f 100644 --- a/modules/VC7ProjectCreator.pm +++ b/modules/VC7ProjectCreator.pm @@ -19,6 +19,12 @@ use vars qw(@ISA); @ISA = qw(ProjectCreator); # ************************************************************ +# Data Section +# ************************************************************ + +my($sname) = '_Static'; + +# ************************************************************ # Subroutine Section # ************************************************************ @@ -29,6 +35,7 @@ sub file_sorter { return lc($left) cmp lc($right); } + sub translate_value { my($self) = shift; my($key) = shift; @@ -37,10 +44,15 @@ sub translate_value { if ($key eq 'after' && $val ne '') { my($arr) = $self->create_array($val); $val = ''; - foreach my $entry (@$arr) { - $val .= '"' . $entry . '" '; + + ## Only write dependencies for non-static projects + ## and static exe projects + if ($self->get_writing_type() == 0 || $self->exe_target()) { + foreach my $entry (@$arr) { + $val .= '"' . $entry . '" '; + } + $val =~ s/\s+$//; } - $val =~ s/\s+$//; } return $val; } @@ -76,6 +88,12 @@ sub fill_value { } +sub separate_static_project { + #my($self) = shift; + return 1; +} + + sub project_file_name { my($self) = shift; my($name) = shift; @@ -88,6 +106,12 @@ sub project_file_name { } +sub static_project_file_name { + my($self) = shift; + return $self->project_name() . "$sname.vcproj"; +} + + sub get_env_accessor { #my($self) = shift; return ('%', '%'); @@ -100,12 +124,24 @@ sub get_dll_exe_template_input_file { } +sub get_lib_exe_template_input_file { + #my($self) = shift; + return 'vc7libexe'; +} + + sub get_dll_template_input_file { #my($self) = shift; return 'vc7dll'; } +sub get_lib_template_input_file { + #my($self) = shift; + return 'vc7lib'; +} + + sub get_template { #my($self) = shift; return 'vc7'; |