Subversion Repositories DevTools

Rev

Rev 6504 | Rev 6887 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6504 Rev 6511
Line 256... Line 256...
256 
#                   toolset extension paths within the tree. These will be
 256 
#                   toolset extension paths within the tree. These will be
257 
#                   saved and later used when user tools and scripts are
 257 
#                   saved and later used when user tools and scripts are
258 
#                   invoked.
 258 
#                   invoked.
259 
#
 259 
#
260 
#   Examine:
 260 
#   Examine:
- 
 
 261 
#       - tools/bin/GBE_MACHTYPE/bin    - Hardware specfic tools
261 
#       - tools/bin/GBE_MACHTYPE    - Hardware specfic tools
 262 
#       - tools/bin/GBE_MACHTYPE        - Hardware specfic tools
262 
#       - tools/bin                 - Hardware independent tools - scripts
 263 
#       - tools/bin                     - Hardware independent tools - scripts
263 
#       - tools/scripts/GBE_MACHINE - Hardware specific scripts
 264 
#       - tools/scripts/GBE_MACHINE     - Hardware specific scripts
264 
#       - tools/scripts             - Hardware independent scripts (too)
 265 
#       - tools/scripts                 - Hardware independent scripts (too)
265 
#
 266 
#
266 
# Inputs          : self
 267 
# Inputs          : self
267 
#
 268 
#
268 
# Returns         : Nothing
 269 
# Returns         : Nothing
269 
#
 270 
#
Line 280... Line 281...
280 
    $base_dir = "$::Cwd/$BUILDINTERFACE"
 281 
    $base_dir = "$::Cwd/$BUILDINTERFACE"
281 
        if ( $self->{'type'} eq 'build' );
 282 
        if ( $self->{'type'} eq 'build' );
282 
 
 283 
 
283 
    my @searchList;
 284 
    my @searchList;
284 
    my $path = "/tools/bin";
 285 
    my $path = "/tools/bin";
285 
    foreach my $suffix ( "/$::GBE_MACHTYPE", "/$::GBE_MACHTYPE/bin" ) {
 286 
    foreach my $suffix ( "/$::GBE_MACHTYPE", "/$::GBE_MACHTYPE/bin", "" ) {
286 
        push @searchList, $path . $suffix;
 287 
        push @searchList, $path . $suffix;
287 
    }
 288 
    }
288 
 
 289 
 
289 
    $path = "/tools/scripts";
 290 
    $path = "/tools/scripts";
290 
    foreach my $suffix ( "/$::GBE_MACHTYPE", "" ) {
 291 
    foreach my $suffix ( "/$::GBE_MACHTYPE", "" ) {