7 |
|
BEGIN { |
8 |
|
use ToolBox; |
9 |
|
$buildfile="BuildFile"; |
10 |
< |
#$toolbox=ToolBox->new(); |
10 |
> |
$toolbox=ToolBox->new(); |
11 |
|
} |
12 |
|
|
13 |
|
#Parse the BuildFile |
29 |
|
'ConfigurationClass' => \&OutToMakefile, |
30 |
|
'AssociateGroup' => \&AssociateGroup, |
31 |
|
'none' => \&OutToMakefile, |
32 |
< |
'Bin' => \&OutToMakefile, |
32 |
> |
'Bin' => 'none', |
33 |
|
'Bin_StartTag' => \&Bin_start, |
34 |
|
'ClassPath' => \&OutToMakefile, |
35 |
|
'ClassPath_StartTag' => \&setBlockClassPath |
108 |
|
if ( ! defined $$hashref{name} ) { |
109 |
|
($$hashref{name}=$$hashref{file})=~s/\..*//; |
110 |
|
} |
111 |
< |
$fileclass=getclass($file); |
112 |
< |
$toolbox->maketargets("exe",$fileclass, $$hashref{name}, $file ); |
113 |
< |
print GNUmakefile "bin::$file\n\n"; |
111 |
> |
# This stuff for later |
112 |
> |
#$fileclass=$toolbox->getclass($file); |
113 |
> |
#$toolbox->maketargets("exe",$fileclass, $$hashref{name}, $file ); |
114 |
> |
print GNUmakefile "bin:$$hashref{name}\n"; |
115 |
> |
print GNUmakefile "bin_debug:$$hashref{name}_d\n"; |
116 |
> |
print GNUmakefile ".SECONDARY:$$hashref{name}_d.exe ". |
117 |
> |
"$$hashref{name}.exe\n"; |
118 |
> |
print GNUmakefile "$$hashref{name}_d.exe:$$hashref{file}\n"; |
119 |
> |
print GNUmakefile "$$hashref{name}.exe:$$hashref{file}\n"; |
120 |
> |
# print GNUmakefile "$$hashref{name}:$$hashref{file}\n"; |
121 |
> |
print GNUmakefile "$$hashref{name}_d:$$hashref{name}_d.exe\n"; |
122 |
> |
print GNUmakefile "\t\@mv $$hashref{name}_d.exe \$(binarystore)/". |
123 |
> |
"$$hashref{name}\n"; |
124 |
> |
print GNUmakefile "$$hashref{name}:$$hashref{name}.exe\n"; |
125 |
> |
print GNUmakefile "\t\@mv $$hashref{name}.exe \$(binarystore)/". |
126 |
> |
"$$hashref{name}\n"; |
127 |
> |
print GNUmakefile "files+=$$hashref{file}\n"; |
128 |
> |
|
129 |
|
} |
130 |
|
|
131 |
|
sub External_StartTag { |
134 |
|
my $hashref; |
135 |
|
|
136 |
|
$hashref=$switch->SetupValueHash(\@vars); |
137 |
+ |
$$hashref{'ref'}=~tr[A-Z][a-z]; |
138 |
|
print GNUmakefile $$hashref{'ref'}; |
139 |
|
if ( defined $$hashref{'version'} ) { |
140 |
|
print GNUmakefile "_V_".$$hashref{'version'}; |
188 |
|
print GNUmakefile "local__$$hashref{name}=true\n"; |
189 |
|
} |
190 |
|
|
191 |
< |
sub CheckBuildFile($directory) { |
191 |
> |
sub CheckBuildFile { |
192 |
|
my $classdir=shift; |
193 |
|
$ClassName=""; |
194 |
|
$thisfile="$classdir/$buildfile"; |
219 |
|
} |
220 |
|
|
221 |
|
# Split up the Class Block String into a useable array |
222 |
< |
sub _CutBlock($string) { |
222 |
> |
sub _CutBlock { |
223 |
|
my $string= shift @_; |
224 |
|
@BlockClassA = split /\//, $string; |
225 |
|
} |