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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vmx/] [3b-10.c] - Rev 689

Compare with Previous | Blame | View Log

#include "harness.h"
 
typedef vector unsigned int x;
 
x f (x a)
{
  return vec_addc(a,a); 
}
 
void g (int b) 
{
  vec_dst(&b, 3, 3); 
  vec_dst(&b, 1, 1);
}
 
static void test()
{
  check(vec_all_eq(f(((vector unsigned int){0x80000000,0x7fffffff,3,4})),
		   ((vector unsigned int){1,0,0,0})),
	"f");
}
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

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