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.1.2.5 by williamc, Fri Apr 14 12:37:41 2000 UTC vs.
Revision 1.1.2.6 by williamc, Fri Apr 14 14:15:23 2000 UTC

# Line 99 | Line 99 | sub _commontags {
99                                          \&Arch_Start,$self,
100                                          \&OutToMakefile, $self,
101                                          \&Arch_End,$self);
102 +        $switch->addtag($parse,"INCLUDE_PATH",
103 +                                        \&IncludePath_Start,$self,
104 +                                        \&OutToMakefile, $self,
105 +                                        "",$self);
106          return $switch;
107   }
108  
# Line 165 | Line 169 | sub ParseBuildFile_Export {
169          undef $bf;
170   }
171  
172 + sub _location {
173 +        my $self=shift;
174 +        use File::Basename;
175 +
176 +        return dirname($self->{switch}->filetoparse());
177 + }
178 +
179   sub _parseexport {
180          my $self=shift;
181          my $filename=shift;
# Line 221 | Line 232 | sub Class_StartTag {
232          }
233   }
234  
235 + sub IncludePath_Start {
236 +        my $self=shift;
237 +        my $name=shift;
238 +        my $hashref=shift;
239 +
240 +        $self->{switch}->checktag( $name, $hashref, 'path');
241 +        if ( $self->{Arch} ) {
242 +          print GNUmakefile "INCLUDE+=".$self->_location()."/".
243 +                                                $$hashref{'path'}."\n";
244 +        }
245 + }
246 +
247   sub Bin_start {
248          my $self=shift;
249          my $name=shift;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines