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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gcc.dg/] [vmx/] [3b-13.c] - Blame information for rev 298

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 298 jeremybenn
#include "harness.h"
2
 
3
vector signed int
4
f(vector float a, vector signed int b)
5
{
6
  return vec_splat(vec_cts(vec_ctf(vec_ctu(a, 31),0),9),30);
7
}
8
 
9
static void test()
10
{
11
  check(vec_all_eq(f(((vector float){1,2,3,4}),
12
                     ((vector signed int){2,4,6,8})),
13
                   ((vector signed int){2147483647, 2147483647, 2147483647, 2147483647})),
14
        "f");
15
}

powered by: WebSVN 2.1.0

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