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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log


/* { dg-do run } */
 
/* Verify that the RX specific builtin functions work.  */
 
#include <stdlib.h>
#include <stdio.h>
 
/* We need to prevent these functions from being inlined
   as otherwise gcc will attempt to optimize away their
   arguments and we need the operations on them in order
   to correctly set the psw flags.  */
 
int saturate_add         (int, int)      __attribute__((__noinline__));
int exchange             (int, int)      __attribute__((__noinline__));
 
int
half_word_swap (int arg)
{
  return __builtin_rx_revw (arg);
}
 
long
multiply_and_accumulate (long arg1, long arg2, long arg3)
{
  __builtin_rx_mvtaclo (0);
  __builtin_rx_mvtachi (0);
 
  __builtin_rx_mullo (arg1, arg2);
  __builtin_rx_mulhi (arg1, arg2);
  __builtin_rx_maclo (arg1, arg3);
  __builtin_rx_machi (arg1, arg3);
 
  __builtin_rx_racw (1);
 
  arg1 = __builtin_rx_mvfachi ();
  arg1 += __builtin_rx_mvfacmi ();
 
  return arg1;
}
 
int
rxround (float arg)
{
  return __builtin_rx_round (arg);
}
 
/* #define DEBUG 1 */
 
#ifdef DEBUG
#define CHECK_0ARG(func, result)                                        \
  if (func () != result)                                                \
    {                                                                   \
      printf (#func " () fails: %x not %x\n", func (), result);         \
      abort ();                                                         \
    }
 
#define CHECK_1ARG(func, arg, result)                                   \
  if (func (arg) != result)                                             \
    {                                                                   \
      printf (#func " (" #arg ") fails: %x not %x\n", func (arg), result); \
      abort ();                                                         \
    }
 
#define CHECK_2ARG(func, arg1, arg2, result)                            \
  if (func (arg1, arg2) != result)                                      \
    {                                                                   \
      printf (#func " (" #arg1 "," #arg2 ") fails: %x not %x\n",        \
              func (arg1, arg2), result);                               \
      abort ();                                                         \
    }
 
#define CHECK_3ARG(func, arg1, arg2, arg3, result)                      \
  if (func (arg1, arg2, arg3) != result)                                \
    {                                                                   \
      printf (#func " (" #arg1 "," #arg2 "," #arg3 ") fails: %x not %x\n",      \
              func (arg1, arg2, arg3), result);                         \
      abort ();                                                         \
    }
#else
#define CHECK_0ARG(func, result)                                        \
  if (func () != result)                                                \
    abort ();
 
#define CHECK_1ARG(func, arg, result)                                   \
  if (func (arg) != result)                                             \
    abort ();
 
#define CHECK_2ARG(func, arg1, arg2, result)                            \
  if (func (arg1, arg2) != result)                                      \
    abort ();
 
#define CHECK_3ARG(func, arg1, arg2, arg3, result)                      \
  if (func (arg1, arg2, arg3) != result)                                \
    abort ();
#endif
 
int
main (void)
{
  CHECK_1ARG (half_word_swap, 0x12345678, 0x34127856);
  CHECK_3ARG (multiply_and_accumulate, 0x111, 0x222, 0x333, 0x70007);
  CHECK_1ARG (rxround, 0.5, 1);
  return 0;
}
 
/* The following builtins are compiled but
   not executed because they need OS support.  */
 
void
rxbreak (void)
{
  __builtin_rx_brk ();
}
 
void
interrupt (void)
{
  __builtin_rx_int (0x12);
}
 
int
get_stack_pointer (void)
{
  return __builtin_rx_mvfc (2);
}
 
void
set_stack_pointer (int value)
{
  __builtin_rx_mvtc (2, value);
  __builtin_rx_mvtc (2, 0x1234);
}
 
void
wait (void)
{
  __builtin_rx_wait ();
}
 
void
rmpa (int * multiplicand, int * multiplier, int num)
{
  __builtin_rx_rmpa ();
}

Line No.	Rev	Author	Line
1	691	jeremybenn	`/* { dg-do run } */`
2
3			`/* Verify that the RX specific builtin functions work. */`
4
5			`#include <stdlib.h>`
6			`#include <stdio.h>`
7
8			`/* We need to prevent these functions from being inlined`
9			`as otherwise gcc will attempt to optimize away their`
10			`arguments and we need the operations on them in order`
11			`to correctly set the psw flags. */`
12
13			`int saturate_add (int, int) __attribute__((__noinline__));`
14			`int exchange (int, int) __attribute__((__noinline__));`
15
16			`int`
17			`half_word_swap (int arg)`
18			`{`
19			`return __builtin_rx_revw (arg);`
20			`}`
21
22			`long`
23			`multiply_and_accumulate (long arg1, long arg2, long arg3)`
24			`{`
25			`__builtin_rx_mvtaclo (0);`
26			`__builtin_rx_mvtachi (0);`
27
28			`__builtin_rx_mullo (arg1, arg2);`
29			`__builtin_rx_mulhi (arg1, arg2);`
30			`__builtin_rx_maclo (arg1, arg3);`
31			`__builtin_rx_machi (arg1, arg3);`
32
33			`__builtin_rx_racw (1);`
34
35			`arg1 = __builtin_rx_mvfachi ();`
36			`arg1 += __builtin_rx_mvfacmi ();`
37
38			`return arg1;`
39			`}`
40
41			`int`
42			`rxround (float arg)`
43			`{`
44			`return __builtin_rx_round (arg);`
45			`}`
46
47			`/* #define DEBUG 1 */`
48
49			`#ifdef DEBUG`
50			`#define CHECK_0ARG(func, result) \`
51			`if (func () != result) \`
52			`{ \`
53			`printf (#func " () fails: %x not %x\n", func (), result); \`
54			`abort (); \`
55			`}`
56
57			`#define CHECK_1ARG(func, arg, result) \`
58			`if (func (arg) != result) \`
59			`{ \`
60			`printf (#func " (" #arg ") fails: %x not %x\n", func (arg), result); \`
61			`abort (); \`
62			`}`
63
64			`#define CHECK_2ARG(func, arg1, arg2, result) \`
65			`if (func (arg1, arg2) != result) \`
66			`{ \`
67			`printf (#func " (" #arg1 "," #arg2 ") fails: %x not %x\n", \`
68			`func (arg1, arg2), result); \`
69			`abort (); \`
70			`}`
71
72			`#define CHECK_3ARG(func, arg1, arg2, arg3, result) \`
73			`if (func (arg1, arg2, arg3) != result) \`
74			`{ \`
75			`printf (#func " (" #arg1 "," #arg2 "," #arg3 ") fails: %x not %x\n", \`
76			`func (arg1, arg2, arg3), result); \`
77			`abort (); \`
78			`}`
79			`#else`
80			`#define CHECK_0ARG(func, result) \`
81			`if (func () != result) \`
82			`abort ();`
83
84			`#define CHECK_1ARG(func, arg, result) \`
85			`if (func (arg) != result) \`
86			`abort ();`
87
88			`#define CHECK_2ARG(func, arg1, arg2, result) \`
89			`if (func (arg1, arg2) != result) \`
90			`abort ();`
91
92			`#define CHECK_3ARG(func, arg1, arg2, arg3, result) \`
93			`if (func (arg1, arg2, arg3) != result) \`
94			`abort ();`
95			`#endif`
96
97			`int`
98			`main (void)`
99			`{`
100			`CHECK_1ARG (half_word_swap, 0x12345678, 0x34127856);`
101			`CHECK_3ARG (multiply_and_accumulate, 0x111, 0x222, 0x333, 0x70007);`
102			`CHECK_1ARG (rxround, 0.5, 1);`
103			`return 0;`
104			`}`
105
106			`/* The following builtins are compiled but`
107			`not executed because they need OS support. */`
108
109			`void`
110			`rxbreak (void)`
111			`{`
112			`__builtin_rx_brk ();`
113			`}`
114
115			`void`
116			`interrupt (void)`
117			`{`
118			`__builtin_rx_int (0x12);`
119			`}`
120
121			`int`
122			`get_stack_pointer (void)`
123			`{`
124			`return __builtin_rx_mvfc (2);`
125			`}`
126
127			`void`
128			`set_stack_pointer (int value)`
129			`{`
130			`__builtin_rx_mvtc (2, value);`
131			`__builtin_rx_mvtc (2, 0x1234);`
132			`}`
133
134			`void`
135			`wait (void)`
136			`{`
137			`__builtin_rx_wait ();`
138			`}`
139
140			`void`
141			`rmpa (int * multiplicand, int * multiplier, int num)`
142			`{`
143			`__builtin_rx_rmpa ();`
144			`}`

Browse

Tools

Subversion Repositories openrisc

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