Subversion Repositories gelsvn

Rev

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

Rev 218 Rev 259
1
package BDSProjectCreator;
1
package BDSProjectCreator;
2
 
2
 
3
# ************************************************************
3
# ************************************************************
4
# Description   : The Borland Developer Studio Project Creator
4
# Description   : The Borland Developer Studio Project Creator
5
# Author        : Johnny Willemsen
5
# Author        : Johnny Willemsen
6
# Create Date   : 14/12/2005
6
# Create Date   : 14/12/2005
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 WinProjectBase;
16
use WinProjectBase;
17
use XMLProjectBase;
17
use XMLProjectBase;
18
 
18
 
19
use vars qw(@ISA);
19
use vars qw(@ISA);
20
@ISA = qw(XMLProjectBase WinProjectBase ProjectCreator);
20
@ISA = qw(XMLProjectBase WinProjectBase ProjectCreator);
21
 
21
 
22
# ************************************************************
22
# ************************************************************
23
# Subroutine Section
23
# Subroutine Section
24
# ************************************************************
24
# ************************************************************
25
 
25
 
26
sub crlf {
26
sub crlf {
27
  #my($self) = shift;
27
  #my($self) = shift;
28
  return "\n";
28
  return "\n";
29
}
29
}
30
 
30
 
31
 
31
 
32
sub project_file_extension {
32
sub project_file_extension {
33
  #my($self) = shift;
33
  #my($self) = shift;
34
  return '.bdsproj';
34
  return '.bdsproj';
35
}
35
}
36
 
36
 
37
 
37
 
38
sub get_dll_exe_template_input_file {
38
sub get_dll_exe_template_input_file {
39
  #my($self) = shift;
39
  #my($self) = shift;
40
  return 'bdsexe';
40
  return 'bdsexe';
41
}
41
}
42
 
42
 
43
 
43
 
44
sub get_dll_template_input_file {
44
sub get_dll_template_input_file {
45
  #my($self) = shift;
45
  #my($self) = shift;
46
  return 'bdsdll';
46
  return 'bdsdll';
47
}
47
}
48
 
48
 
49
 
49
 
50
1;
50
1;
51
 
51