OSDN Git Service

gcc/fortran:
[pf3gnuchains/gcc-fork.git] / gcc / exec-tool.in
1 #! /bin/sh
2
3 # Copyright (C) 2007 Free Software Foundation, Inc.
4 # This file is part of GCC.
5
6 # GCC is free software; you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation; either version 3, or (at your option)
9 # any later version.
10
11 # GCC is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 # GNU General Public License for more details.
15
16 # You should have received a copy of the GNU General Public License
17 # along with GCC; see the file COPYING3.  If not see
18 # <http://www.gnu.org/licenses/>.
19
20 # Invoke as, ld or nm from the build tree.
21
22 ORIGINAL_AS_FOR_TARGET="@ORIGINAL_AS_FOR_TARGET@"
23 ORIGINAL_LD_FOR_TARGET="@ORIGINAL_LD_FOR_TARGET@"
24 ORIGINAL_NM_FOR_TARGET="@ORIGINAL_NM_FOR_TARGET@"
25 exeext=@host_exeext@
26
27 invoked=`basename "$0"`
28 case "$invoked" in
29   as)
30     original=$ORIGINAL_AS_FOR_TARGET
31     prog=as-new$exeext
32     dir=gas
33     ;;
34   collect-ld)
35     original=$ORIGINAL_LD_FOR_TARGET
36     prog=ld-new$exeext
37     dir=ld
38     ;;
39   nm)
40     original=$ORIGINAL_NM_FOR_TARGET
41     prog=nm-new$exeext
42     dir=binutils
43     ;;
44 esac
45
46 case "$original" in
47   ../*)
48     # compute absolute path of the location of this script
49     tdir=`dirname "$0"`
50     scriptdir=`cd "$tdir" && pwd`
51
52     if test -x $scriptdir/../$dir/$prog; then
53       exec $scriptdir/../$dir/$prog ${1+"$@"}
54     else
55       exec $scriptdir/../prev-$dir/$prog ${1+"$@"}
56     fi
57     ;;
58   *)
59     exec "$original" ${1+"$@"}
60     ;;
61 esac
62
63