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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20111208-1.c] - Blame information for rev 688

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 688 jeremybenn
/* PR tree-optimization/51315 */
2
/* Reported by Jurij Smakov <jurij@wooyd.org> */
3
 
4
typedef unsigned int size_t;
5
 
6
extern void *memcpy (void *__restrict __dest,
7
       __const void *__restrict __src, size_t __n)
8
     __attribute__ ((__nothrow__)) __attribute__ ((__nonnull__ (1, 2)));
9
 
10
extern size_t strlen (__const char *__s)
11
     __attribute__ ((__nothrow__)) __attribute__ ((__pure__)) __attribute__ ((__nonnull__ (1)));
12
 
13
typedef __INT16_TYPE__ int16_t;
14
typedef __INT32_TYPE__ int32_t;
15
 
16
extern void abort (void);
17
 
18
int a;
19
 
20
static void __attribute__ ((noinline,noclone))
21
do_something (int item)
22
{
23
  a = item;
24
}
25
 
26
int
27
pack_unpack (char *s, char *p)
28
{
29
  char *send, *pend;
30
  char type;
31
  int integer_size;
32
 
33
  send = s + strlen (s);
34
  pend = p + strlen (p);
35
 
36
  while (p < pend)
37
    {
38
      type = *p++;
39
 
40
      switch (type)
41
 {
42
 case 's':
43
   integer_size = 2;
44
   goto unpack_integer;
45
 
46
 case 'l':
47
   integer_size = 4;
48
   goto unpack_integer;
49
 
50
 unpack_integer:
51
   switch (integer_size)
52
     {
53
     case 2:
54
       {
55
  union
56
  {
57
    int16_t i;
58
    char a[sizeof (int16_t)];
59
  }
60
  v;
61
  memcpy (v.a, s, sizeof (int16_t));
62
  s += sizeof (int16_t);
63
  do_something (v.i);
64
       }
65
       break;
66
 
67
     case 4:
68
       {
69
  union
70
  {
71
    int32_t i;
72
    char a[sizeof (int32_t)];
73
  }
74
  v;
75
  memcpy (v.a, s, sizeof (int32_t));
76
  s += sizeof (int32_t);
77
  do_something (v.i);
78
       }
79
       break;
80
     }
81
   break;
82
 }
83
    }
84
  return (int) *s;
85
}
86
 
87
int
88
main (void)
89
{
90
  int n = pack_unpack ("\200\001\377\376\035\300", "sl");
91
  if (n != 0)
92
    abort ();
93
  return 0;
94
}

powered by: WebSVN 2.1.0

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