###############################################################################
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
# 
# File:         PLATFORM/AVR_IAR
#
# Contents:     Support for the AVR chipset platform with a IAR toolset
#
# Revision History:
#   16-Aug-04   DDP     Created
#
###############################################################################
#

AVR_IARInit();

###############################################################################
#
#   This function is named after the invoking platform and the file that
#   this function is in. The two are bound.
#
#   The purpose of the xxxInit() is to provide platform-specfic support
#   to JATS. The function must do:
#
#       1) Parse any platform specific arguments
#          Arguments are specified with a PlatformRequire() statement
#       2) Define the toolset in use
#       3) Add flags and definitions as required
#
#
#   Note: Platform arguments are passed through in the Platform()
#         statement within a makefile.pl
#
#
sub AVR_IARInit
{
    my( @args ) = @ScmPlatformArgs;            # Platform arguments
    my( $mri, $product );

#.. Parse arguments
#
    Debug( "AVR_IAR(@args)\n" );

    foreach $_ ( @args ) {
        if (/^--product=(.*)/) {
            $product = $1;
        } else {
            Message( "AVR_IAR: unknown option $_ -- ignored\n" );
        }
    }

#... Toolset
#
    Toolset( '*', "avr_iar" );

#... Platform
#    
    PlatformDefines( "AVR_IAR.def" );
}