OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [pending-4.c] - Blame information for rev 774

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 688 jeremybenn
 
2
void dummy (x, y)
3
     int *x;
4
     int y;
5
{}
6
 
7
int
8
main (argc, argv)
9
     int argc;
10
     char **argv;
11
{
12
  int number_columns=9;
13
  int cnt0 = 0;
14
  int cnt1 = 0;
15
  int i,A1;
16
 
17
  for (i = number_columns-1; i != 0; i--)
18
    {
19
      if (i == 1)
20
        {
21
          dummy(&A1, i);
22
          cnt0++;
23
        }
24
      else
25
        {
26
          dummy(&A1, i-1);
27
          cnt1++;
28
        }
29
    }
30
  if (cnt0 != 1 || cnt1 != 7)
31
    abort ();
32
  exit (0);
33
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.