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 clean a given tools target with Raptor

    12 # Will look for BLD.INF or bld.inf in the current directory.

    13 # If not found will try in ./group.

    14 # $1 is the build dir for the desired target relative to $EPOCROOT/build/

    15 

    16 use strict;

    17 use perl_run;

    18 

    19 if (@ARGV) {

    20     if (grep(/$ARGV[0]/,("-h","--help"))) {

    21         print "This script cleans a target with Raptor\n";

    22         print "Call with \$ARG[0] = the name of a component directory ";

    23         print "relative to EPOCROOT/build\n";        

    24         print "Looks for BLD.INF or bld.inf in the component directory\n";

    25         print "In not found will try in ./group\n";                        

    26         exit 0;

    27     }         

    28 }

    29 exit perl_run("build_target.pl @ARGV CLEAN");

    30