############################################################################## # COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED. # # File: PLATFORM/wce # # Contents: Generic WCE (Windows CE) platform definition # ############################################################################## WCEInit(); sub WCEInit { my( @args ) = @ScmPlatformArgs; # Platform arguments my( $CEVersion, $CEPlatform, $CETargetCPU, $CEHostCPU, $CEToolchain ); #.. Parse arguments # Debug( "wce(@args)\n" ); foreach $_ ( @args ) { if (/^--Version=(.*)/) { # OS Version $CEVersion = "$1"; } elsif (/^--SDK=(.*)/) { # SDK $CEPlatform = "$1"; } elsif (/^--Target=(.*)/) { # CPU $CETargetCPU = "$1"; } elsif (/^--Host=(.*)/) { # HOST CPU $CEHostCPU = "$1"; } elsif (/^--Toolchain=(.*)/) { # Underling Toolchain $CEToolchain = "$1"; } } Error ("WCE platform must specify --Target") unless ( $CETargetCPU ne "" ); Error ("WCE platform must specify emulator --Host") unless ( $CETargetCPU ne "emulator" || $CEHostCPU ne "" ); if ($CEVersion eq "") { Error ("WCE platform must specify --Version or WCEDefaultVersion") unless ( defined($WCEDefaultVersion) ); push( @ScmPlatformArgs, "--Version=$WCEDefaultVersion" ); } if ($CEPlatform eq "") { Error ("WCE platform must specify --SDK or WCEDefaultPlatform") unless ( defined($WCEDefaultPlatform) ); push( @ScmPlatformArgs, "--SDK=$WCEDefaultPlatform" ); } if ($CEToolchain eq "") { push( @ScmPlatformArgs, "--Toolchain=EVC4" ); } #.. Toolset # Toolset( '*', 'vcwce.pl' ); # Embedded Visual C } 1;