FreeChainXenon/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

pr5473.f: New test

Browse source 
2002-02-05  David Billinghurst <David.Billinghurst@riotinto.com>

	* g77.dg/pr5473.f:  New test

From-SVN: r49531
This commit is contained in:
David Billinghurst 2002-02-05 22:34:37 +00:00 • committed by David Billinghurst
parent ad08e60e89
commit 8a921c08a7
2 changed files with 15 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
gcc/testsuite/ChangeLog
View file

@ -1,3 +1,7 @@
2002-02-05 David Billinghurst <David.Billinghurst@riotinto.com>
* g77.dg/pr5473.f: New test
2002-02-05 Aldy Hernandez <aldyh@redhat.com>
* gcc.dg/altivec-4.c: AltiVec builtin predicates changed format.

11
gcc/testsuite/g77.dg/pr5473.f Normal file
View file

@ -0,0 +1,11 @@
program pr5473
c Derived from g77.f-torture/execute/intrinsic-unix-bessel.f
c Origin: David Billinghurst <David.Billinghurst@riotinto.com>
c { dg-do compile { xfail *-*-* } }
c { dg-excess-errors "Assertion failed" { xfail *-*-* } }
real x, a
integer*8 m
x = 2.0
m = 2
a = BESJN(m,x)
end