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

Subversion Repositories openrisc

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

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

#include "harness.h"
 
vector unsigned char
f (vector unsigned char a, vector unsigned char b, vector unsigned char c)
{
  return vec_perm(a,b,c); 
}
 
static void test()
{
  check(vec_all_eq(f(((vector unsigned char){0,1,2,3,4,5,6,7,
					    8,9,10,11,12,13,14,15}),
		     ((vector unsigned char){70,71,72,73,74,75,76,77,
					    78,79,80,81,82,83,84,85}),
		     ((vector unsigned char){0x1,0x14,0x18,0x10,0x16,0x15,0x19,0x1a,
					    0x1c,0x1c,0x1c,0x12,0x8,0x1d,0x1b,0xe})),
		   ((vector unsigned char){1,74,78,70,76,75,79,80,82,82,82,72,8,83,81,14})),
	"f");
}
 

Go to most recent revision | 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.