From 54893deb510c886a48646461e6bed9ff39c84399 Mon Sep 17 00:00:00 2001 From: Hans-Peter Nilsson Date: Mon, 21 Jan 2002 22:04:02 +0000 Subject: [PATCH] * ld-cris: New testsuite directory. --- ld/testsuite/ChangeLog | 4 ++++ ld/testsuite/ld-cris/badgotr1.d | 11 +++++++++++ ld/testsuite/ld-cris/cris.exp | 30 ++++++++++++++++++++++++++++++ ld/testsuite/ld-cris/gotrel1.s | 4 ++++ 4 files changed, 49 insertions(+) create mode 100644 ld/testsuite/ld-cris/badgotr1.d create mode 100644 ld/testsuite/ld-cris/cris.exp create mode 100644 ld/testsuite/ld-cris/gotrel1.s diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog index 677ff8c8d2c..720fe8e6189 100644 --- a/ld/testsuite/ChangeLog +++ b/ld/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2002-01-21 Hans-Peter Nilsson + + * ld-cris: New testsuite directory. + 2002-01-15 Nick Clifton * ld-sh/sh.exp: Copy start.s file into test directory. diff --git a/ld/testsuite/ld-cris/badgotr1.d b/ld/testsuite/ld-cris/badgotr1.d new file mode 100644 index 00000000000..c5fd11684f9 --- /dev/null +++ b/ld/testsuite/ld-cris/badgotr1.d @@ -0,0 +1,11 @@ +#source: gotrel1.s +#as: --pic +#ld: -m crislinux -shared +#objdump: -dr +#error: ^[^c][^h][^i][^l][^d].* uses _-prefixed .* failed to merge .* no GOT .* Bad value$ + +# The error regex above is supposed to not match if we get a +# SEGV, in which case we'll see "child killed: segmentation +# violation", supposedly at the beginning (seen) or end (in +# theory) of it. The input ELF type (with underscores on +# symbols) mismatches the output type (no underscores). diff --git a/ld/testsuite/ld-cris/cris.exp b/ld/testsuite/ld-cris/cris.exp new file mode 100644 index 00000000000..296f7033637 --- /dev/null +++ b/ld/testsuite/ld-cris/cris.exp @@ -0,0 +1,30 @@ +# Expect script for ld-cris tests +# Copyright 2002 Free Software Foundation, Inc. +# +# This file 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 2 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 this program; if not, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# +# Written by Hans-Peter Nilsson (hp@axis.com) +# + +if ![istarget cris-*-*] { + return +} + +set rd_test_list [lsort [glob -nocomplain $srcdir/$subdir/*.d]] +foreach atest $rd_test_list { + # We need to strip the ".d", but can leave the dirname. + verbose [file rootname $atest] + run_dump_test [file rootname $atest] +} diff --git a/ld/testsuite/ld-cris/gotrel1.s b/ld/testsuite/ld-cris/gotrel1.s new file mode 100644 index 00000000000..68f035d5a0d --- /dev/null +++ b/ld/testsuite/ld-cris/gotrel1.s @@ -0,0 +1,4 @@ + .global _start +_start: +localsym: + move.d localsym:GOTOFF,$r3 -- 2.30.2