From: Eric Botcazou <ebotcazou@libertysurf.fr>
Date: Mon, 21 Nov 2005 20:52:25 +0000 (+0100)
Subject: re PR libfortran/24432 (Missing symbols)
X-Git-Tag: releases/gcc-4.2.0~5830
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=9cfda6fa545e5be0b860644df1b4579f168ec26f;p=thirdparty%2Fgcc.git

re PR libfortran/24432 (Missing symbols)

	PR libfortran/24432
	* lib/target-supports.exp (check_effective_target_fortran_large_real):
	Check that 'cos' is supported.

From-SVN: r107321
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 5dd8d06c44ca..315c0f9648fd 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2005-11-21  Eric Botcazou  <ebotcazou@libertysurf.fr>
+
+	PR libfortran/24432
+	* lib/target-supports.exp (check_effective_target_fortran_large_real):
+	Check that 'cos' is supported.
+
 2005-11-21  Paul Thomas  <pault@gcc.gnu.org
 
 	PR fortran/24223
diff --git a/gcc/testsuite/lib/target-supports.exp b/gcc/testsuite/lib/target-supports.exp
index 5b770dc5ca45..bb6352f7c893 100644
--- a/gcc/testsuite/lib/target-supports.exp
+++ b/gcc/testsuite/lib/target-supports.exp
@@ -530,6 +530,7 @@ proc check_effective_target_fortran_large_real { } {
 	puts $f "integer,parameter :: k = &"
         puts $f "  selected_real_kind (precision (0.0_8) + 1)"
         puts $f "real(kind=k) :: x"
+        puts $f "x = cos (x);"
 	puts $f "end"
 	close $f