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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.c-torture/] [execute/] [20000726-1.c] - Blame information for rev 825

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

Line No. Rev Author Line
1 149 jeremybenn
void adjust_xy (short *, short *);
2
 
3
struct adjust_template
4
{
5
  short kx_x;
6
  short kx_y;
7
  short kx;
8
  short kz;
9
};
10
 
11
static struct adjust_template adjust = {0, 0, 1, 1};
12
 
13
main ()
14
{
15
  short x = 1, y = 1;
16
 
17
  adjust_xy (&x, &y);
18
 
19
  if (x != 1)
20
    abort ();
21
 
22
  exit (0);
23
}
24
 
25
void
26
adjust_xy (x, y)
27
     short  *x;
28
     short  *y;
29
{
30
  *x = adjust.kx_x * *x + adjust.kx_y * *y + adjust.kx;
31
}

powered by: WebSVN 2.1.0

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