diff options
Diffstat (limited to 'bin/MakeProjectCreator/modules/GNUACEProjectCreator.pm')
-rw-r--r-- | bin/MakeProjectCreator/modules/GNUACEProjectCreator.pm | 95 |
1 files changed, 0 insertions, 95 deletions
diff --git a/bin/MakeProjectCreator/modules/GNUACEProjectCreator.pm b/bin/MakeProjectCreator/modules/GNUACEProjectCreator.pm deleted file mode 100644 index 9d0ae9eb366..00000000000 --- a/bin/MakeProjectCreator/modules/GNUACEProjectCreator.pm +++ /dev/null @@ -1,95 +0,0 @@ -package GNUACEProjectCreator; - -# ************************************************************ -# Description : A GNU Project Creator for ACE -# Author : Chad Elliott -# Create Date : 3/13/2002 -# ************************************************************ - -# ************************************************************ -# Pragmas -# ************************************************************ - -use strict; -use File::Basename; - -use MakeProjectBase; -use ProjectCreator; - -use vars qw(@ISA); -@ISA = qw(MakeProjectBase ProjectCreator); - -# ************************************************************ -# Subroutine Section -# ************************************************************ - -sub expand_variables_from_template_values { - #my($self) = shift; - return 0; -} - - -sub convert_slashes { - #my($self) = shift; - return 0; -} - - -sub fill_value { - my($self) = shift; - my($name) = shift; - - if ($name eq 'vpath') { - my(%vpath) = (); - foreach my $item ($self->get_component_list('source_files')) { - my($dname) = $self->relative($self->mpc_dirname($item)); - if ($dname ne '.') { - $vpath{$dname} = 1; - } - } - my($str) = join(':', keys %vpath); - if ($str ne '') { - return 'VPATH = .:' . $str . $self->crlf(); - } - } - elsif ($name eq 'tao') { - my($incs) = $self->get_assignment('includes'); - my($libs) = $self->get_assignment('libpaths'); - return ((defined $incs && $incs =~ /tao/i) || - (defined $libs && $libs =~ /tao/i)); - } - elsif ($name eq 'ciao') { - my($incs) = $self->get_assignment('includes'); - my($libs) = $self->get_assignment('libpaths'); - return ((defined $incs && $incs =~ /ciao/i) || - (defined $libs && $libs =~ /ciao/i)); - } - - return undef; -} - - -sub project_file_prefix { - #my($self) = shift; - return 'GNUmakefile.'; -} - - -sub get_dll_exe_template_input_file { - #my($self) = shift; - return 'gnuexe'; -} - - -sub get_dll_template_input_file { - #my($self) = shift; - return 'gnudll'; -} - - -sub get_template { - #my($self) = shift; - return 'gnu'; -} - -1; |