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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vmx/] [3a-06.c] - Blame information for rev 801

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


#include "harness.h"
 
vector unsigned int
f(vector unsigned int a, vector unsigned int b)
{
  return vec_addc(vec_addc(a,b),b);
}
 
static void test()
{
  check(vec_all_eq(f(((vector unsigned int){2,4,6,8}),
                     ((vector unsigned int){-1,-2,-3,-4})),
                   ((vector unsigned int){1,0,0,0})),
        "f");
}

Line No.	Rev	Author	Line
1	689	jeremybenn	`#include "harness.h"`
2
3			`vector unsigned int`
4			`f(vector unsigned int a, vector unsigned int b)`
5			`{`
6			`return vec_addc(vec_addc(a,b),b);`
7			`}`
8
9			`static void test()`
10			`{`
11			`check(vec_all_eq(f(((vector unsigned int){2,4,6,8}),`
12			`((vector unsigned int){-1,-2,-3,-4})),`
13			`((vector unsigned int){1,0,0,0})),`
14			`"f");`
15			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [vmx/] [3a-06.c] - Blame information for rev 801