1 #!/usr/bin/perl

     2 # Copyright (c) 2010 Symbian Foundation Ltd

     3 # This component and the accompanying materials are made available

     4 # under the terms of the License "Eclipse Public License v1.0"

     5 # which accompanies this distribution, and is available

     6 # at the URL "http://www.eclipse.org/legal/epl-v10.html".

     7 #

     8 # Initial Contributors:

     9 # Mike Kinghan, mikek@symbian.org for Symbian Foundation Ltd - initial contribution.

    10  

    11 # Script to apply fixes to the Windows Raptor config so that it 

    12 # will use the regular standard C++ library instead of stlport 

    13 

    14 use strict;

    15 use apply_patch_file;

    16 use usage;

    17 use check_os;

    18 use File::Spec;

    19 

    20 require_os_windows();

    21 usage(\@ARGV,"This script makes required fixes to the Windows Raptor configuration");

    22 unless($ENV{'SBS_HOME'}) {

    23 	die "*** SBS_HOME is not set ***";

    24 }

    25 my $gcc_config_file = File::Spec->catfile("\$SBS_HOME","lib","config","gcc.xml");

    26 apply_patch_file($gcc_config_file);

    27 exit 0;