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

Comparing COMP/SCRAM/src/BuildSetup.pm (file contents):
Revision 1.1 by williamc, Mon Mar 1 10:37:53 1999 UTC vs.
Revision 1.5.2.2 by williamc, Mon Jun 21 13:24:25 1999 UTC

# Line 1 | Line 1
1 #!/usr/local/bin/perl5 -I/afs/cern.ch/user/w/williamc/public/ConfigMan/toolbox/objects/schema1
2 #
3 # Wrapper around the perl objects for system calling
4 #
5
1   package BuildSetup;
2 + require 5.001;
3   require Exporter;
4   @ISA=qw(Exporter);
5   @EXPORT=qw(BuildSetup);
6   use Interface;
7   use BuildFile;
8 < use AddDir;
8 > use Utilities::AddDir;
9  
10   sub BuildSetup {
11   my $THISDIR=shift;
# Line 19 | Line 15 | $Class="";
15  
16   # Create working directory
17   chdir $ENV{LOCALTOP};
18 < adddir($ENV{INTwork}."/".$THISDIR);
18 > AddDir::adddir($ENV{INTwork}."/".$THISDIR);
19  
20   GetClass($THISDIR);
21 < print "Class = $Class\n";
21 > #print "Class = $Class\n";
22 > #print "ClassDir = $ClassDir\n";
23   if ( grep /none/i , @BuildFile::groups) {
24          print "Nothing to be done - empty group\n";
25          exit
# Line 69 | Line 66 | $ENV{DefaultBuildFile}=$DefaultBuildFile
66  
67   chdir $fullworkdir || die "Unable to enter working directory $!";
68  
69 + # Set up some other useful variables fo the Build
70 + # list of directories available
71 + opendir IDR, "$ENV{LOCALTOP}/$THISDIR";
72 + @allfiles= grep !/^\.\.?$/, readdir IDR;
73 + foreach $file ( @allfiles ) {
74 +   if ( -d "$ENV{LOCALTOP}/$THISDIR/$file" ) { # only add if its a directory
75 +        $ENV{SCRAM_AVAILDIRS}=$ENV{SCRAM_AVAILDIRS}." ".$file;
76 +   }
77 +   else {
78 +        $ENV{SCRAM_AVAILFILES}=$ENV{SCRAM_AVAILFILES}." ".$file;
79 +   }
80 + }
81 +
82 +
83   # If not specified default to the class name target
84   if ( $#Targets == -1 ) {
85          $Targets[0]=$Class
86   }
87   $ENV{DefaultMakefile}="$ENV{TOOL_HOME}/basics.mk";
88 < system("gmake","-j 1","-f","$ENV{DefaultMakefile}","-I$ENV{TOOL_HOME}",@Targets);
88 > system("gmake","--no-print-directory","-r","-j 1","-f","$ENV{DefaultMakefile}","-I$ENV{TOOL_HOME}",@Targets);
89   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines