Subversion Repositories DevTools

Rev

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

Rev 6133 Rev 6177
Line 1... Line 1...
1 
########################################################################
 1 
########################################################################
2 
# Copyright (c) VIX TECHNOLOGY (AUST) LTD
 2 
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
3 
#
 3 
#
4 
# Module name   : jats.sh
 4 
# Module name   : jats.sh
5 
# Module type   : Makefile system
 5 
# Module type   : Makefile system
6 
# Compiler(s)   : n/a
 6 
# Compiler(s)   : n/a
7 
# Environment(s): jats build system
 7 
# Environment(s): jats build system
Line 162... Line 162...
162 
sub TestMachType
 162 
sub TestMachType
163 
{
 163 
{
164 
    my ($MachType, $src) = @_;
 164 
    my ($MachType, $src) = @_;
165 
 
 165 
 
166 
    Error ("Incorrect Machine Type in $src",
 166 
    Error ("Incorrect Machine Type in $src",
167 
           "The build has been construct for a Machine Type of: $MachType",
 167 
           "The build has been constructed for a Machine Type of: $MachType",
168 
           "Current Machine Type is: $::GBE_HOSTMACH",
 168 
           "Current Machine Type is: $::GBE_HOSTMACH",
169 
           ) unless ( $MachType eq $::GBE_HOSTMACH );
 169 
           ) unless ( $MachType eq $::GBE_HOSTMACH );
170 
}
 170 
}
171 
 
 171 
 
172 
#------------------------------------------------------------------------------
 172 
#------------------------------------------------------------------------------