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/libgo.testmain/testmain.exp | 60 +++++++++++++++++++++++++++++ 1 file changed, 60 insertions(+) create mode 100644 libgo/testsuite/libgo.testmain/testmain.exp (limited to 'libgo/testsuite/libgo.testmain/testmain.exp') diff --git a/libgo/testsuite/libgo.testmain/testmain.exp b/libgo/testsuite/libgo.testmain/testmain.exp new file mode 100644 index 000000000..efdd28d91 --- /dev/null +++ b/libgo/testsuite/libgo.testmain/testmain.exp @@ -0,0 +1,60 @@ +# 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 +# . + +load_lib libgo.exp + +lappend options "additional_flags=-I. -w -g" + +if [istarget "*-*-rtems*"] { + global options + + verbose -log "Executing on host: tar cf FilesystemImage -h -C \ + $tool_root_dir/$tool/${GOTEST_TMPDIR} ." + if [catch "exec tar cf FilesystemImage -h -C \ + $tool_root_dir/$tool/${GOTEST_TMPDIR} ." error] { + perror "Error during tar of local filesystem: $error" + exit 1 + } + + verbose -log "Executing on host: ${RTEMS_BIN2C} FilesystemImage FilesystemImage" + if [catch "exec ${RTEMS_BIN2C} FilesystemImage FilesystemImage" error] { + perror "Error when creating FilesystemImage source file: $error" + exit 1 + } + set comp_output [target_compile "${RTEMS_LIBGO_INIT}" \ + "./rtems_libgo_init.o" "object" $options] + if ![ string match "" $comp_output ] { + verbose -log $comp_output + exit 1 + } +} + +set object_files [glob -nocomplain "*.o"] +if [info exists gluefile] { + regsub $gluefile $object_files "" object_files +} + +set comp_output [go_target_compile "$object_files _testmain.go" \ + "./a.exe" "executable" $options] +if ![ string match "" $comp_output ] { + verbose -log $comp_output + exit 1 +} + +set result [libgo_load "./a.exe" "" ""] + +set status [lindex $result 0] +$status go -- cgit v1.2.3