Subversion Repositories DevTools

Rev

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

Rev 283 Rev 327
Line 10... Line 10...
10 
 
 10 
 
11 
H400Init();
 11 
H400Init();
12 
 
 12 
 
13 
sub H400Init
 13 
sub H400Init
14 
{
 14 
{
- 
 
 15 
    my $version = '3.40';
- 
 
 16 
    foreach $_ ( @ScmPlatformArgs ) {
- 
 
 17 
        if (/^--Version=(.*)/i) {
- 
 
 18 
            $version = $1;
- 
 
 19 
        }
- 
 
 20 
    }
15 
    Toolset( '*', "KeilArmV3.pl", '--Thumb', '--Device=DARMATS' );
 21 
    Toolset( '*', "KeilArmV3.pl", '--Thumb', '--Device=DARMATS', "--Version=$version" );
16 
 
 22 
 
17 
    PlatformDefine( "#################################################");
 23 
    PlatformDefine( "#################################################");
18 
    PlatformDefine( "# Building an application using the Keil Arm RV31" );
 24 
    PlatformDefine( "# Building using the Keil Arm Compiler" );
19 
    PlatformDefine( "#" );
 25 
    PlatformDefine( "# Version: $version" );
20 
}
 26 
}
21 
 
 27 
 
22 
1;
 28 
1;
23 
 
 29 
 
24 
 
 30