Subversion Repositories DevTools

Rev

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

Rev 227 Rev 261
Line 41... Line 41...
41 
        }
 41 
        }
42 
    }
 42 
    }
43 
 
 43 
 
44 
#.. Parse Platform Arguments
 44 
#.. Parse Platform Arguments
45 
#
 45 
#
46 
    my( @args ) = @ScmPlatformArgs;             # Platform arguments
 46 
    @args = @ScmPlatformArgs;                   # Platform arguments
47 
    foreach $_ ( @args ) {
 47 
    foreach $_ ( @args ) {
48 
        if (/^--product=(.*)/) {                # GBE product
 48 
        if (/^--product=(.*)/) {                # GBE product
49 
            $product = $1;
 49 
            $product = $1;
50 
        } else {
 50 
        } else {
51 
            Message( "GENERIC: unknown platform argument $_ -- ignored\n" );
 51 
            Message( "GENERIC: unknown platform argument $_ -- ignored\n" );