Subversion Repositories gelsvn

Rev

Rev 107 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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