aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c')
-rw-r--r--gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c97
1 files changed, 0 insertions, 97 deletions
diff --git a/gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c b/gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c
deleted file mode 100644
index c646899a3..000000000
--- a/gcc-4.8.1/gcc/testsuite/gcc.dg/torture/matrix-3.c
+++ /dev/null
@@ -1,97 +0,0 @@
-/* { dg-do compile } */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <math.h>
-#include <string.h>
-
-void mem_init (void);
-int ARCHnodes, ARCHnodes1;
-int ***vel;
-void just_a_call (int *);
-
-/* The last dimension of VEL escapes because it was sent
- as argumet to just_a_call(). (external function)
- Only the two external dimensions are flattened.
- Run with -c. */
-
-
-/*--------------------------------------------------------------------------*/
-
-int
-main (int argc, char **argv)
-{
- int i, j, k;
-
- ARCHnodes = 2;
- ARCHnodes1 = 4;
-
-/* Dynamic memory allocations and initializations */
-
- mem_init ();
-
- for (i = 0; i < ARCHnodes; i++)
- {
- for (j = 0; j < 3; j++)
- {
- for (k = 0; k < ARCHnodes1; k++)
- printf ("[%d][%d][%d]=%d ", i, j, k, vel[i][j][k]);
- printf ("\n");
- }
- printf ("\n");
- }
- for (i = 0; i < ARCHnodes; i++)
- for (j = 0; j < 3; j++)
- free (vel[i][j]);
-
- for (i = 0; i < ARCHnodes; i++)
- free (vel[i]);
-
- free (vel);
- return 0;
-}
-
-/*--------------------------------------------------------------------------*/
-/* Dynamic memory allocations and initializations */
-
-void
-mem_init (void)
-{
-
- int i, j, k,d;
-
- d = 0;
- vel = (int ***) malloc (ARCHnodes * sizeof (int **));
-
- for (i = 0; i < ARCHnodes; i++)
- {
- vel[i] = (int **) malloc (3 * sizeof (int *));
- if (vel[i] == (int **) NULL)
- {
- fprintf (stderr, "malloc failed for vel[%d]\n", i);
- fflush (stderr);
- exit (0);
- }
- }
- for (i = 0; i < ARCHnodes; i++)
- {
- for (j = 0; j < 3; j++)
- {
- vel[i][j] = (int *) malloc (ARCHnodes1 * sizeof (int));
- }
- }
- for (i = 0; i < ARCHnodes; i++)
- {
- for (j = 0; j < 3; j++)
- {
- for (k = 0; k < ARCHnodes1; k++)
- {
- vel[i][j][k] = d;
- d++;
- }
- }
- }
- just_a_call (vel[1][1]);
-}
-
-/*--------------------------------------------------------------------------*/