File: vector-shift2.c

package info (click to toggle)
gcc-arm-none-eabi 15%3A14.2.rel1-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,099,328 kB
  • sloc: cpp: 3,627,108; ansic: 2,571,498; ada: 834,230; f90: 235,082; makefile: 79,231; asm: 74,984; xml: 51,692; exp: 39,736; sh: 33,298; objc: 15,629; python: 15,069; fortran: 14,429; pascal: 7,003; awk: 5,070; perl: 3,106; ml: 285; lisp: 253; lex: 204; haskell: 135
file content (61 lines) | stat: -rw-r--r-- 1,756 bytes parent folder | download | duplicates (10)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
/* { dg-do run } */

#define vector(elcount, type)  \
__attribute__((vector_size((elcount)*sizeof(type)))) type

#define vidx(type, vec, idx) (*((type *) &(vec) + idx))
#define schar signed char
#define uchar unsigned char

#define ch14 1,2,3,4
#define ch1  1,1,1,1
#define chm1 -1,-1,-1,-1

int main (int argc, char *argv[]) {
    vector(16, uchar) vuchar  = { ch14, ch14, ch14, ch14};
    vector(16, schar) vchar0  = { ch1, ch1, ch1, ch1};
    vector(16, schar) vchar1  = { chm1, chm1, chm1, chm1};

    vector(16, schar) i1, i2, i3;
    vector(16, uchar) u1, u2, u3;

    i1 = vchar1<< vchar0;
    
    if (vidx(schar, i1, 0) != ((schar)-1 << (schar)1))
        __builtin_abort ();
    if (vidx(schar, i1, 1) != ((schar)-1 << (schar)1))
        __builtin_abort ();
    if (vidx(schar, i1, 2) != ((schar)-1 << (schar)1))
        __builtin_abort ();
    if (vidx(schar, i1, 3) != ((schar)-1 << (schar)1))
        __builtin_abort ();
    u1 = vuchar << vchar0;

    if (vidx(uchar, u1, 0) != ((uchar)1  << (schar)1))
        __builtin_abort ();
    if (vidx(uchar, u1, 1) != ((uchar)2  << (schar)1))
        __builtin_abort ();
    if (vidx(uchar, u1, 2) != ((uchar)3  << (schar)1))
        __builtin_abort ();
    if (vidx(uchar, u1, 3) != ((uchar)4  << (schar)1))
        __builtin_abort ();

    
    i2 = vchar1 >> vuchar;

    if (vidx(schar, i2, 0) != ((schar)-1  >> (uchar)1))
        __builtin_abort ();
    if (vidx(schar, i2, 1) != ((schar)-1  >> (uchar)2))
        __builtin_abort ();
    if (vidx(schar, i2, 2) != ((schar)-1  >> (uchar)3))
        __builtin_abort ();
    if (vidx(schar, i2, 3) != ((schar)-1  >> (uchar)4))
        __builtin_abort ();
    
    vchar1 >>= vuchar;
    vuchar <<= vchar0;
    vuchar <<= vchar1;

    return 0;
}