Subversion Repositories DevTools

Rev

Rev 7299 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
227 dpurdie 1 
###############################################################################
7300 dpurdie 2 
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
227 dpurdie 3 
#
4 
# File:         PLATFORM/JAVA
5 
#
6 
# Contents:     Minimul support for packages that are machine independent
7 
#
8 
###############################################################################
9 
#
10 
 
11 
JAVAInit();
12 
 
13 
###############################################################################
14 
#
15 
sub JAVAInit
16 
{
17 
    my( @args ) = @ScmPlatformArgs;            # Platform arguments
18 
    my( $product, $version );
19 
 
20 
#.. Parse arguments
21 
#
22 
    Debug( "JAVA(@args)\n" );
23 
 
24 
    foreach $_ ( @args ) {
25 
        if (/^--product=(.*)/) {
26 
            $product = $1;
27 
 
28 
        } elsif (/^--Version=(.*)/) {
29 
            $version = $1;
30 
 
31 
        } else {
32 
            Message( "JAVA: unknown option $_ -- ignored\n" );
33 
        }
34 
    }
35 
 
36 
#... Toolset
37 
#
38 
    Toolset( '*', "JAVA.PL" );
39 
    return 1;
40 
}
41