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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [mips/] [pr33635-1.c] - Blame information for rev 749

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


/* { dg-options "-mabi=64 -O2" } */
 
NOMIPS16 long double __powitf2 (long double x, int m)
{
  long double y = x;
  while (m >>= 1)
    {
      x = x * x;
      if (m % 2)
        y = y * x;
    }
  return y;
}

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* { dg-options "-mabi=64 -O2" } */`
2
3			`NOMIPS16 long double __powitf2 (long double x, int m)`
4			`{`
5			`long double y = x;`
6			`while (m >>= 1)`
7			`{`
8			`x = x * x;`
9			`if (m % 2)`
10			`y = y * x;`
11			`}`
12			`return y;`
13			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [mips/] [pr33635-1.c] - Blame information for rev 749