ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/COMP/SCRAM/src/BuildSystem/BuildFile.pm
(Generate patch)

Comparing COMP/SCRAM/src/BuildSystem/BuildFile.pm (file contents):
Revision 1.13 by williamc, Wed Nov 15 14:49:22 2000 UTC vs.
Revision 1.14 by sashby, Wed Nov 7 19:49:37 2001 UTC

# Line 124 | Line 124 | sub ParseBuildFile {
124           $fullfilename=$filename;
125          }
126          $self->{path}=$path;
127        #print "Processing $fullfilename\n";
127          $numbins=0;
128          $self->{envnum}=0;
129          $self->{envlevel}=0;
# Line 133 | Line 132 | sub ParseBuildFile {
132          $self->{switch}=$self->_initswitcher();
133          $self->{switch}->filetoparse($fullfilename);
134  
135 < #       $self->{switch}->{Strict_no_cr}='no';
137 <        #open a temporary gnumakefile to store output.
135 >        # open a temporary gnumakefile to store output.
136          use Utilities::AddDir;
137          AddDir::adddir("$ENV{LOCALTOP}/$ENV{INTwork}/$self->{path}");
138          my $fh=FileHandle->new();
# Line 146 | Line 144 | sub ParseBuildFile {
144          if ( -e $ENV{LatestBuildFile} ) {
145            print GNUmakefile "include $ENV{LatestBuildFile}\n";
146          }
147 < #       print "writing to :\n".
150 < #               "$ENV{LOCALTOP}/$ENV{INTwork}/$self->{path}/BuildFile.mk\n";
147 >
148          $ENV{LatestBuildFile}="$ENV{LOCALTOP}/$ENV{INTwork}/".$self->{path}."/BuildFile.mk";
149          $self->{switch}->parse("makebuild"); # sort out supported tags
150          if ( $numbins > 0 ) {
# Line 202 | Line 199 | sub _parseexport {
199                                          \&export_end_export,$self);
200          $self->_commontags($switchex,"export");
201          $switchex->allowgroup("__export","export");
205 #       $switchex->{Strict_no_cr}='no';
202          $self->{switch}=$switchex;
203          $switchex->parse("export"); # sort out supported tags
204   }
# Line 284 | Line 280 | sub Build_start {
280            }
281            else {
282              $self->{switch}->parseerror("No name specified for build product");
287            #$name="\$(buildname)";
283            }
284  
285            # -- check we have a lookup for the class type
# Line 324 | Line 319 | sub Build_start {
319              my $dirname=$$hashref{'class'}."_".$type."_".$name;
320              my $here="$ENV{LOCALTOP}/$ENV{INTwork}/".$self->{path}."/".$dirname;
321              my $makefile=$here."/BuildFile.mk";
327 #           AddDir::adddir($here);
322  
323              # -- create link targets to the directory
324              push @targets, $dirname;
# Line 356 | Line 350 | sub Build_start {
350              }
351              print $fh "\tfi\n";
352              print $fh "\n";
359 #           print $typefile "$name :\n";
360 #           print $typefile "\t\$(_quietbuild_)";
361 #           print $typefile $mapper->template($$hashref{'class'},$type)."\n";
362 #           print $typefile "\t\$(_quietstamp_)";
363 #           print $typefile "\$(SCRAMPERL) \$(SCRAM_HOME)/src/scramdatestamp \$@.ds \$@ \$^\n";
353  
354              # -- cleaning targets
355              push @targets, "clean_$dirname";

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines