nsz Git - libfirm/blob - ir/be/test/am_test4.c

   1 #include <stdio.h>
   2
   3 char c;
   4
   5 int f(int x, int y) {
   6         return x + y * 8;
   7 }
   8
   9 int f2(int x, int y) {
  10         return x * 2 + y * 8;
  11 }
  12
  13 int f3(int x) {
  14         return x * 2;
  15 }
  16
  17 char f4(char *p, int k) {
  18         return p[k];
  19 }
  20
  21 #define TTYPE(name, type, OP, OP2) \
  22 void dest_am_##name##type(type *arr, int from, int to) {  \
  23         int i;                                  \
  24                                             \
  25         for(i = from; i < to; ++i) {            \
  26                 arr[i] = OP arr[i] OP2;             \
  27         }                                       \
  28 }
  29
  30 #define T(name, OP, OP2)     \
  31         TTYPE(name,int,OP,OP2)   \
  32         TTYPE(name,short,OP,OP2) \
  33         TTYPE(name,char,OP,OP2)
  34
  35 T(neg, -,)
  36 T(not, ~,)
  37 T(add, 3 +,)
  38 T(sub, , - 42)
  39 T(and, 0x12345 &,)
  40 T(or, 0x12345 |,)
  41 T(xor, 0x12345 ^,)
  42 T(inc, 1 + ,)
  43 T(dec, , - 1)
  44 T(shl, , << 3)
  45 T(shr, , >> 3)
  46
  47 int main(void) {
  48         int   arrint[] = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
  49         short arrshort[] = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
  50         char  arrchar[] = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 };
  51
  52         int i;
  53
  54 #define CTYPE(type,name)   dest_am_##name##type(arr##type, 0, 10); \
  55         for(i = 0; i < 10; ++i) {                 \
  56                 printf("%d ", arr##type[i]);          \
  57         }                                         \
  58         printf("\n");
  59
  60 #define C(name) \
  61         CTYPE(int,name) \
  62         CTYPE(short,name) \
  63         CTYPE(char,name)
  64
  65         C(neg);
  66         C(not);
  67         C(add);
  68         C(sub);
  69         C(and);
  70         C(or);
  71         C(inc);
  72         C(dec);
  73         C(xor);
  74
  75         return 0;
  76 }