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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [sync-3.c] - Blame information for rev 750

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 689 jeremybenn
/* { dg-do run } */
2
/* { dg-require-effective-target sync_char_short } */
3
/* { dg-options "-ansi" } */
4
/* { dg-options "-march=i486" { target { { i?86-*-* x86_64-*-* } && ia32 } } } */
5
/* { dg-options "-mcpu=v9" { target sparc*-*-* } } */
6
 
7
/* Test functionality of the intrinsics for 'short' and 'char'.  */
8
 
9
extern void abort (void);
10
extern void *memcpy (void *, const void *, __SIZE_TYPE__);
11
 
12
static char AI[18] __attribute__((__aligned__ (4)));
13
static char init_qi[18] = { 3,5,7,9,0,0,0 ,0  ,-1,0,0,-1,0,0  ,-1,0,0,-1 };
14
static char test_qi[18] = { 3,5,7,9,1,4,22,-12,7 ,8,9,~7,1,-12,7 ,8,9,~7 };
15
 
16
static void
17
do_qi (void)
18
{
19
  if (__sync_fetch_and_add(AI+4, 1) != 0)
20
    abort ();
21
  if (__sync_fetch_and_add(AI+5, 4) != 0)
22
    abort ();
23
  if (__sync_fetch_and_add(AI+6, 22) != 0)
24
    abort ();
25
  if (__sync_fetch_and_sub(AI+7, 12) != 0)
26
    abort ();
27
  if (__sync_fetch_and_and(AI+8, 7) != (char)-1)
28
    abort ();
29
  if (__sync_fetch_and_or(AI+9, 8) != 0)
30
    abort ();
31
  if (__sync_fetch_and_xor(AI+10, 9) != 0)
32
    abort ();
33
  if (__sync_fetch_and_nand(AI+11, 7) != (char)-1) /* { dg-message "note: '__sync_fetch_and_nand' changed semantics in GCC 4.4" "" } */
34
    abort ();
35
 
36
  if (__sync_add_and_fetch(AI+12, 1) != 1)
37
    abort ();
38
  if (__sync_sub_and_fetch(AI+13, 12) != (char)-12)
39
    abort ();
40
  if (__sync_and_and_fetch(AI+14, 7) != 7)
41
    abort ();
42
  if (__sync_or_and_fetch(AI+15, 8) != 8)
43
    abort ();
44
  if (__sync_xor_and_fetch(AI+16, 9) != 9)
45
    abort ();
46
  if (__sync_nand_and_fetch(AI+17, 7) != (char)~7) /* { dg-message "note: '__sync_nand_and_fetch' changed semantics in GCC 4.4" "" } */
47
    abort ();
48
}
49
 
50
static short AL[18];
51
static short init_hi[18] = { 3,5,7,9,0,0,0 ,0  ,-1,0,0,-1,0,0  ,-1,0,0,-1 };
52
static short test_hi[18] = { 3,5,7,9,1,4,22,-12,7 ,8,9,~7,1,-12,7 ,8,9,~7 };
53
 
54
static void
55
do_hi (void)
56
{
57
  if (__sync_fetch_and_add(AL+4, 1) != 0)
58
    abort ();
59
  if (__sync_fetch_and_add(AL+5, 4) != 0)
60
    abort ();
61
  if (__sync_fetch_and_add(AL+6, 22) != 0)
62
    abort ();
63
  if (__sync_fetch_and_sub(AL+7, 12) != 0)
64
    abort ();
65
  if (__sync_fetch_and_and(AL+8, 7) != -1)
66
    abort ();
67
  if (__sync_fetch_and_or(AL+9, 8) != 0)
68
    abort ();
69
  if (__sync_fetch_and_xor(AL+10, 9) != 0)
70
    abort ();
71
  if (__sync_fetch_and_nand(AL+11, 7) != -1)
72
    abort ();
73
 
74
  if (__sync_add_and_fetch(AL+12, 1) != 1)
75
    abort ();
76
  if (__sync_sub_and_fetch(AL+13, 12) != -12)
77
    abort ();
78
  if (__sync_and_and_fetch(AL+14, 7) != 7)
79
    abort ();
80
  if (__sync_or_and_fetch(AL+15, 8) != 8)
81
    abort ();
82
  if (__sync_xor_and_fetch(AL+16, 9) != 9)
83
    abort ();
84
  if (__sync_nand_and_fetch(AL+17, 7) != ~7)
85
    abort ();
86
}
87
 
88
int main()
89
{
90
  memcpy(AI, init_qi, sizeof(init_qi));
91
  memcpy(AL, init_hi, sizeof(init_hi));
92
 
93
  do_qi ();
94
  do_hi ();
95
 
96
  if (memcmp (AI, test_qi, sizeof(test_qi)))
97
    abort ();
98
  if (memcmp (AL, test_hi, sizeof(test_hi)))
99
    abort ();
100
 
101
  return 0;
102
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.