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.target/] [bfin/] [hisilh.c] - Rev 328
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do run { target bfin*-*-* } } */ /* { dg-options "-O2" } */ #include <stdlib.h> typedef short raw2x16 __attribute__ ((vector_size(4))); int x; int ll(raw2x16 a, raw2x16 b) { x = __builtin_bfin_mulhisill(a, b); return x; } int lh(raw2x16 a, raw2x16 b) { x = __builtin_bfin_mulhisilh(a, b); return x; } int hl(raw2x16 a, raw2x16 b) { x = __builtin_bfin_mulhisihl(a, b); return x; } int hh(raw2x16 a, raw2x16 b) { x = __builtin_bfin_mulhisihh(a, b); return x; } int main () { raw2x16 a = __builtin_bfin_compose_2x16 (0x1234, 0x5678); raw2x16 b = __builtin_bfin_compose_2x16 (0xFEDC, 0xBA98); if (ll (a, b) != 0xe88e8740) abort (); if (lh (a, b) != 0xff9d5f20) abort (); if (hl (a, b) != 0xfb1096e0) abort (); if (hh (a, b) != 0xffeb3cb0) abort (); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log