Subversion Repositories gelsvn

Rev

Rev 107 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
107 bj 1 
package VC6ProjectCreator;
2 
 
3 
# ************************************************************
4 
# Description   : A VC6 Project Creator
5 
# Author        : Chad Elliott
6 
# Create Date   : 3/14/2002
7 
# ************************************************************
8 
 
9 
# ************************************************************
10 
# Pragmas
11 
# ************************************************************
12 
 
13 
use strict;
14 
 
15 
use ProjectCreator;
16 
use VCProjectBase;
17 
 
18 
use vars qw(@ISA);
19 
@ISA = qw(VCProjectBase ProjectCreator);
20 
 
21 
# ************************************************************
22 
# Subroutine Section
23 
# ************************************************************
24 
 
25 
sub project_file_extension {
26 
  #my($self) = shift;
27 
  return '.dsp';
28 
}
29 
 
30 
 
31 
sub override_valid_component_extensions {
32 
  my($self)  = shift;
33 
  my($comp)  = shift;
34 
  my($array) = undef;
35 
 
36 
  if ($comp eq 'source_files' && $self->get_language() eq 'cplusplus') {
37 
    $array = ["\\.cpp", "\\.cxx", "\\.c"];
38 
  }
39 
 
40 
  return $array;
41 
}
42 
 
43 
 
44 
sub override_exclude_component_extensions {
45 
  my($self)  = shift;
46 
  my($comp)  = shift;
47 
  my($array) = undef;
48 
 
49 
  if ($comp eq 'source_files') {
50 
    my(@exts) = ("_T\\.cpp", "_T\\.cxx");
51 
    $array = \@exts;
52 
  }
53 
 
54 
  return $array;
55 
}
56 
 
57 
 
58 
sub get_dll_exe_template_input_file {
59 
  #my($self) = shift;
60 
  return 'vc6dspdllexe';
61 
}
62 
 
63 
 
64 
sub get_lib_exe_template_input_file {
65 
  #my($self) = shift;
66 
  return 'vc6dsplibexe';
67 
}
68 
 
69 
 
70 
sub get_lib_template_input_file {
71 
  #my($self) = shift;
72 
  return 'vc6dsplib';
73 
}
74 
 
75 
 
76 
sub get_dll_template_input_file {
77 
  #my($self) = shift;
78 
  return 'vc6dspdll';
79 
}
80 
 
81 
 
82 
1;