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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [bfin/] [builtins/] [norm16-2.c] - Blame information for rev 691

Details | Compare with Previous | View Log


extern void abort (void);
extern void exit (int);
 
typedef short fract16;
 
int main ()
{
  fract16 f = 0x1234, g;
  int a;
 
  a = __builtin_bfin_norm_fr1x16 (f);
  g = f << a;
  if (g != (fract16) 0x48d0)
    abort ();
 
  exit (0);
}
 

Line No.	Rev	Author	Line
1	691	jeremybenn	`extern void abort (void);`
2			`extern void exit (int);`
3
4			`typedef short fract16;`
5
6			`int main ()`
7			`{`
8			`fract16 f = 0x1234, g;`
9			`int a;`
10
11			`a = __builtin_bfin_norm_fr1x16 (f);`
12			`g = f << a;`
13			`if (g != (fract16) 0x48d0)`
14			`abort ();`
15
16			`exit (0);`
17			`}`
18

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.target/] [bfin/] [builtins/] [norm16-2.c] - Blame information for rev 691