Subversion Repositories openrisc

#define vector(elcount, type)  \
__attribute__((vector_size((elcount)*sizeof(type)))) type
 
#define vidx(type, vec, idx) (*((type *) &(vec) + idx))
#define uint unsigned int
 
int main (int argc, char *argv[]) {
    vector(4, uint) vuint  = { 1,  2,  3,  4};
    vector(4,  int) vint0  = { 1,  1,  1,  1};
    vector(4,  int) vint1  = {-1, -1, -1, -1};
 
    vector(4,  int) i1, i2, i3;
    vector(4, uint) u1, u2, u3;
 
    i1 = vint1<< vint0;
 
    if (vidx(int, i1, 0) != ((int)-1 << (int)1))
        __builtin_abort ();
    if (vidx(int, i1, 1) != ((int)-1 << (int)1))
        __builtin_abort ();
    if (vidx(int, i1, 2) != ((int)-1 << (int)1))
        __builtin_abort ();
    if (vidx(int, i1, 3) != ((int)-1 << (int)1))
        __builtin_abort ();
 
    u1 = vuint << vint0;
 
    if (vidx(int, u1, 0) != ((uint)1  << (int)1))
        __builtin_abort ();
    if (vidx(int, u1, 1) != ((uint)2  << (int)1))
        __builtin_abort ();
    if (vidx(int, u1, 2) != ((uint)3  << (int)1))
        __builtin_abort ();
    if (vidx(int, u1, 3) != ((uint)4  << (int)1))
        __builtin_abort ();
 
 
    i2 = vint1 >> vuint;
 
    if (vidx(int, i2, 0) != ((int)-1  >> (uint)1))
        __builtin_abort ();
    if (vidx(int, i2, 1) != ((int)-1  >> (uint)2))
        __builtin_abort ();
    if (vidx(int, i2, 2) != ((int)-1  >> (uint)3))
        __builtin_abort ();
    if (vidx(int, i2, 3) != ((int)-1  >> (uint)4))
        __builtin_abort ();
 
 
    vint1 >>= vuint;
 
    vuint <<= vint0;
    vuint <<= vint1;
 
 
    return 0;
}