From 554fd8c5195424bdbcabf5de30fdc183aba391bd Mon Sep 17 00:00:00 2001 From: upstream source tree Date: Sun, 15 Mar 2015 20:14:05 -0400 Subject: obtained gcc-4.6.4.tar.bz2 from upstream website; verified gcc-4.6.4.tar.bz2.sig; imported gcc-4.6.4 source tree from verified upstream tarball. downloading a git-generated archive based on the 'upstream' tag should provide you with a source tree that is binary identical to the one extracted from the above tarball. if you have obtained the source via the command 'git clone', however, do note that line-endings of files in your working directory might differ from line-endings of the respective files in the upstream repository. --- libgo/testsuite/lib/libgo.exp | 50 +++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 libgo/testsuite/lib/libgo.exp (limited to 'libgo/testsuite/lib') diff --git a/libgo/testsuite/lib/libgo.exp b/libgo/testsuite/lib/libgo.exp new file mode 100644 index 000000000..a6d44323d --- /dev/null +++ b/libgo/testsuite/lib/libgo.exp @@ -0,0 +1,50 @@ +# Copyright (C) 2010 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with GCC; see the file COPYING3. If not see +# . + +set gccdir [lookfor_file $tool_root_dir gcc/libgcc.a] +if {$gccdir != ""} { + set gccdir [file dirname $gccdir] +} +set GOC_UNDER_TEST "$gccdir/gccgo -B$gccdir/" +set TESTING_IN_BUILD_TREE 1 + +if [info exists GOTEST_TMPDIR] { + set tmpdir $GOTEST_TMPDIR +} + +proc go_maybe_build_wrapper { args } { + libgo_maybe_build_wrapper $args +} + +# DejaGnu does not have proper library search paths for load_lib. +# We have to explicitly load everything that go.exp wants to load. + +proc load_gcc_lib { filename } { + global srcdir loaded_libs + + load_file $srcdir/../../gcc/testsuite/lib/$filename + set loaded_libs($filename) "" +} + +load_gcc_lib prune.exp +load_gcc_lib target-libpath.exp +load_gcc_lib wrapper.exp +load_gcc_lib gcc-defs.exp +load_gcc_lib go.exp + +proc libgo_init { args } { + go_init $args +} -- cgit v1.2.3