diff options
| author | David Billinghurst <David.Billinghurst@riotinto.com> | 2002-02-05 22:34:37 +0000 |
|---|---|---|
| committer | David Billinghurst <billingd@gcc.gnu.org> | 2002-02-05 22:34:37 +0000 |
| commit | 8a921c08a7675540dc7c075dbad9c9feaad805cf (patch) | |
| tree | a3cc6b0151d0a2a279d02c8cdccdbdc1676601d5 | |
| parent | ad08e60e89612bdbc454835e2d7b231c37c63274 (diff) | |
| download | gcc-8a921c08a7675540dc7c075dbad9c9feaad805cf.zip gcc-8a921c08a7675540dc7c075dbad9c9feaad805cf.tar.gz gcc-8a921c08a7675540dc7c075dbad9c9feaad805cf.tar.bz2 | |
pr5473.f: New test
2002-02-05 David Billinghurst <David.Billinghurst@riotinto.com>
* g77.dg/pr5473.f: New test
From-SVN: r49531
| -rw-r--r-- | gcc/testsuite/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/testsuite/g77.dg/pr5473.f | 11 |
2 files changed, 15 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index ed43a3a..34d4afd 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -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. diff --git a/gcc/testsuite/g77.dg/pr5473.f b/gcc/testsuite/g77.dg/pr5473.f new file mode 100644 index 0000000..5901f2f --- /dev/null +++ b/gcc/testsuite/g77.dg/pr5473.f @@ -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 |