From 34137553f95c4c36d1f601101becf90afc68d21e Mon Sep 17 00:00:00 2001 From: Franz Sirl Date: Tue, 17 Oct 2000 22:04:51 +0000 Subject: [PATCH] 20001017-1.c: New test. 2000-10-17 Franz Sirl * gcc.c-torture/execute/20001017-1.c: New test. From-SVN: r36913 --- gcc/testsuite/ChangeLog | 4 ++++ .../gcc.c-torture/execute/20001017-1.c | 17 +++++++++++++++++ 2 files changed, 21 insertions(+) create mode 100644 gcc/testsuite/gcc.c-torture/execute/20001017-1.c diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 0859351eb8b..891e533e0a4 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,7 @@ +2000-10-17 Franz Sirl + + * gcc.c-torture/execute/20001017-1.c: New test. + 2000-10-17 Joseph S. Myers * gcc.dg/format-xopen-1.c: Update comments; adjust for checking diff --git a/gcc/testsuite/gcc.c-torture/execute/20001017-1.c b/gcc/testsuite/gcc.c-torture/execute/20001017-1.c new file mode 100644 index 00000000000..f55886f4acd --- /dev/null +++ b/gcc/testsuite/gcc.c-torture/execute/20001017-1.c @@ -0,0 +1,17 @@ + +void bug (double *Cref, char transb, int m, int n, int k, + double a, double *A, int fdA, double *B, int fdB, + double b, double *C, int fdC) +{ + if (C != Cref) abort (); +} + +int main (void) +{ + double A[1], B[1], C[1]; + + bug (C, 'B', 1, 2, 3, 4.0, A, 5, B, 6, 7.0, C, 8); + + return 0; +} + -- 2.30.2