# -*- mode: perl; indent-width: 4; -*-
###############################################################################
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
# 
# File:         PLATFORM/MOS68K
#
# Contents:     Support for the MOS platform with a MC68K toolset
#
# Revision History:
#   10-Feb-04   DDP     Created
#
###############################################################################
#

MosInit();

###############################################################################
#
#   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 MosInit
{
    my( @args ) = @ScmPlatformArgs;             # Platform arguments
    my( $mri );

#.. Parse arguments
#   Nothing to be done here as the toolset will do it
#   Ignore unknown arguments
#
    Debug( "Mos68k(@args)\n" );

    foreach $_ ( @args ) {
        if (/^--Mri=(.*)/) {                    # Mri specific compiler
            $mri = "$1";
        }
    }

#... Toolset
#   The PlatformArgs will also be processed by the toolset
#
    Toolset( '*', "mos_mri.pl", "--68k");


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