Subversion Repositories DevTools

Rev

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

Rev 235 Rev 239
Line 1236... Line 1236...
1236
    if ( $::GBE_PLATFORM )
1236
    if ( $::GBE_PLATFORM )
1237
    {
1237
    {
1238
        my @MAKE_PLATFORMS;
1238
        my @MAKE_PLATFORMS;
1239
        my %active_platforms;
1239
        my %active_platforms;
1240
 
1240
 
1241
        foreach ( @BUILD_ACTIVEPLATFORMS  )
-
 
1242
        {
1241
        #
-
 
1242
        #   Create a hash of active platforms based on the array of
1243
            $active_platforms{$_} = 1;
1243
        #   active platforms to simplify testing
1244
        }
1244
        #
-
 
1245
        $active_platforms{$_} = 1 foreach ( @BUILD_ACTIVEPLATFORMS  );
1245
 
1246
 
1246
        foreach  ( split( ' ', $::GBE_PLATFORM) )
1247
        unless ( defined($active_platforms{GENERIC}) )
1247
        {
1248
        {
-
 
1249
            foreach  ( split( ' ', $::GBE_PLATFORM) )
-
 
1250
            {
1248
            push @MAKE_PLATFORMS, $_
1251
                push @MAKE_PLATFORMS, $_
1249
                if ( $active_platforms{$_} );
1252
                    if ( $active_platforms{$_} );
1250
        }
1253
            }
1251
 
1254
 
1252
        Error ("The GBE_PLATFORM filter prevents any targets being made",
1255
            Error ("The GBE_PLATFORM filter prevents any targets being made",
1253
               "GBE_PLATFORM: $::GBE_PLATFORM" ) unless ( @MAKE_PLATFORMS );
1256
                   "GBE_PLATFORM: $::GBE_PLATFORM" ) unless ( @MAKE_PLATFORMS );
1254
 
1257
 
1255
        Log( "Make for ... ". PrintPlatforms(\@MAKE_PLATFORMS, $sep)."\n");
1258
            Log( "Make for ... ". PrintPlatforms(\@MAKE_PLATFORMS, $sep)."\n");
-
 
1259
        }
1256
 
1260
 
1257
    }
1261
    }
1258
 
1262
 
1259
    return 1;
1263
    return 1;
1260
}
1264
}