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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr21380.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
void bar (void);
2
 
3
void
4
foo (int *diff)
5
{
6
  double deltay = 0.0;
7
  int Stangent = 0;
8
  int mindiff;
9
  int Sflipped = 0;
10
  int i;
11
  int Sturn, Snofit;
12
 
13
  Sturn = 1;
14
  if (Sturn)
15
    Stangent = 1;
16
  if (Sturn)
17
    {
18
      Sflipped = 0;
19
      Snofit = 1;
20
      while (Snofit)
21
        {
22
          Snofit = 0;
23
          mindiff = 0;
24
          for (i = 0; i < 4; i++)
25
            mindiff = diff[i];
26
          while (!Snofit && (mindiff < 0.0))
27
            {
28
              deltay = (Stangent ? deltay : 0.0);
29
              if (deltay < 0.0)
30
                Snofit = 1;
31
              for (i = 0; i < 4; i++)
32
                {
33
                }
34
            }
35
          if (Snofit)
36
            if (Sflipped)
37
              break;
38
        }
39
      if (Snofit)
40
        bar ();
41
    }
42
}

powered by: WebSVN 2.1.0

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