Subversion Repositories openrisc

/* Test the __M{,D}{ADD,SUB}ACC functions.  */
/* { dg-do run } */
extern void abort (void);
extern void exit (int);
 
int
main ()
{
  __MWTACC (6, 10);
  __MWTACC (7, 25);
  __MADDACCS (5, 6);
  if (__MRDACC (5) != 35)
    abort ();
  __MSUBACCS (4, 6);
  if (__MRDACC (4) != -15)
    abort ();
  __MASACCS (4, 6);
  if (__MRDACC (4) != 35 || __MRDACC (5) != -15)
    abort ();
 
  __MWTACC (0, 100);
  __MWTACC (1, 150);
  __MWTACC (2, 1000);
  __MWTACC (3, 1500);
  __MDADDACCS (2, 0);
  if (__MRDACC (2) != 250 || __MRDACC (3) != 2500)
    abort ();
 
  __MWTACC (0, 100);
  __MWTACC (1, 150);
  __MWTACC (2, 1000);
  __MWTACC (3, 1500);
  __MDSUBACCS (2, 0);
  if (__MRDACC (2) != -50 || __MRDACC (3) != -500)
    abort ();
 
  __MWTACC (0, 100);
  __MWTACC (1, 150);
  __MWTACC (2, 1000);
  __MWTACC (3, 1500);
  __MDASACCS (0, 0);
  if (__MRDACC (0) != 250 || __MRDACC (1) != -50)
    abort ();
  if (__MRDACC (2) != 2500 || __MRDACC (3) != -500)
    abort ();
 
  exit (0);
}