Subversion Repositories DevTools

Rev

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

Rev 371 Rev 383
Line 16... Line 16...
16
our $s;
16
our $s;
17
our $o;
17
our $o;
18
our $so;
18
our $so;
19
our $exe;
19
our $exe;
20
our $tool_vxp430img;
20
our $tool_vxp430img;
-
 
21
our $itp_mode;
21
 
22
 
22
##############################################################################
23
##############################################################################
23
#   ToolsetInit()
24
#   ToolsetInit()
24
#       Runtime initialisation
25
#       Runtime initialisation
25
#
26
#
Line 36... Line 37...
36
    Debug( "msp430(@::ScmToolsetArgs)\n" );
37
    Debug( "msp430(@::ScmToolsetArgs)\n" );
37
 
38
 
38
    foreach $_ ( @::ScmToolsetArgs ) {
39
    foreach $_ ( @::ScmToolsetArgs ) {
39
        if (/^--Version=(.*)/) {                # Compiler version
40
        if (/^--Version=(.*)/) {                # Compiler version
40
            $version = "$1";
41
            $version = "$1";
-
 
42
        } elsif ( /^--itp/ ) {
-
 
43
            $itp_mode = 1;
41
        } else {
44
        } else {
42
            Message( "msp430: unknown toolset argument $_ -- ignored\n" );
45
            Message( "msp430: unknown toolset argument $_ -- ignored\n" );
43
        }
46
        }
44
    }
47
    }
45
 
48
 
Line 89... Line 92...
89
    ToolsetDefine ( "#" );
92
    ToolsetDefine ( "#" );
90
    ToolsetDefines( "msp430.def" );
93
    ToolsetDefines( "msp430.def" );
91
    ToolsetRules  ( "msp430.rul" );
94
    ToolsetRules  ( "msp430.rul" );
92
    ToolsetRules  ( "standard.rul" );
95
    ToolsetRules  ( "standard.rul" );
93
 
96
 
-
 
97
    # Support for ITP
-
 
98
    ToolsetDefine ( "ITP_MODE = 1" )    if $itp_mode;
-
 
99
    
94
}
100
}
95
 
101
 
96
 
102
 
97
##############################################################################
103
##############################################################################
98
#   ToolsetPreprocess()
104
#   ToolsetPreprocess()
Line 259... Line 265...
259
sub ToolsetLD
265
sub ToolsetLD
260
{
266
{
261
    my( $name, $pArgs, $pObjs, $pLibs ) = @_;
267
    my( $name, $pArgs, $pObjs, $pLibs ) = @_;
262
    my $progName = $name;
268
    my $progName = $name;
263
    my $script;
269
    my $script;
264
    my $img_file = 1;
270
    my $img_file = 1 unless $itp_mode;
265
    my $noVersion;
271
    my $noVersion;
266
 
272
 
267
 
273
 
268
#.. Parse arguments
274
#.. Parse arguments
269
#
275
#
Line 293... Line 299...
293
#   Sanity check
299
#   Sanity check
294
#       - Ensure a linker script has been provided
300
#       - Ensure a linker script has been provided
295
#
301
#
296
unless ( $script )
302
unless ( $script )
297
{
303
{
298
    $script = "$name.opt";
304
    $script = "$name.cmd";
299
    Warning( "Prog: Linker Script file not provided. Using $script" );
305
    Warning( "Prog: Linker Script file not provided. Using $script" );
300
}
306
}
301
 
307
 
302
#
308
#
303
#   Locate the true path of the provided script file
309
#   Locate the true path of the provided script file