1/* PowerPC E500 user include file. 2 Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc. 3 Contributed by Aldy Hernandez (aldyh@redhat.com). 4 5 This file is part of GCC. 6 7 GCC is free software; you can redistribute it and/or modify it 8 under the terms of the GNU General Public License as published 9 by the Free Software Foundation; either version 2, or (at your 10 option) any later version. 11 12 GCC is distributed in the hope that it will be useful, but WITHOUT 13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY 14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public 15 License for more details. 16 17 You should have received a copy of the GNU General Public License 18 along with GCC; see the file COPYING. If not, write to the 19 Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston, 20 MA 02110-1301, USA. */ 21 22/* As a special exception, if you include this header file into source 23 files compiled by GCC, this header file does not by itself cause 24 the resulting executable to be covered by the GNU General Public 25 License. This exception does not however invalidate any other 26 reasons why the executable file might be covered by the GNU General 27 Public License. */ 28 29#ifndef _SPE_H 30#define _SPE_H 31 32#define __vector __attribute__((vector_size(8))) 33 34typedef int int32_t; 35typedef unsigned uint32_t; 36typedef short int16_t; 37typedef unsigned short uint16_t; 38typedef long long int64_t; 39typedef unsigned long long uint64_t; 40 41typedef short __vector __ev64_s16__; 42typedef unsigned short __vector __ev64_u16__; 43typedef int __vector __ev64_s32__; 44typedef unsigned __vector __ev64_u32__; 45typedef long long __vector __ev64_s64__; 46typedef unsigned long long __vector __ev64_u64__; 47typedef float __vector __ev64_fs__; 48 49#define __v2si __ev64_opaque__ 50#define __v2sf __ev64_fs__ 51 52#define __ev_addw __builtin_spe_evaddw 53#define __ev_addiw __builtin_spe_evaddiw 54#define __ev_subfw(a,b) __builtin_spe_evsubfw ((b), (a)) 55#define __ev_subw __builtin_spe_evsubfw 56#define __ev_subifw(a,b) __builtin_spe_evsubifw ((b), (a)) 57#define __ev_subiw __builtin_spe_evsubifw 58#define __ev_abs __builtin_spe_evabs 59#define __ev_neg __builtin_spe_evneg 60#define __ev_extsb __builtin_spe_evextsb 61#define __ev_extsh __builtin_spe_evextsh 62#define __ev_and __builtin_spe_evand 63#define __ev_or __builtin_spe_evor 64#define __ev_xor __builtin_spe_evxor 65#define __ev_nand __builtin_spe_evnand 66#define __ev_nor __builtin_spe_evnor 67#define __ev_eqv __builtin_spe_eveqv 68#define __ev_andc __builtin_spe_evandc 69#define __ev_orc __builtin_spe_evorc 70#define __ev_rlw __builtin_spe_evrlw 71#define __ev_rlwi __builtin_spe_evrlwi 72#define __ev_slw __builtin_spe_evslw 73#define __ev_slwi __builtin_spe_evslwi 74#define __ev_srws __builtin_spe_evsrws 75#define __ev_srwu __builtin_spe_evsrwu 76#define __ev_srwis __builtin_spe_evsrwis 77#define __ev_srwiu __builtin_spe_evsrwiu 78#define __ev_cntlzw __builtin_spe_evcntlzw 79#define __ev_cntlsw __builtin_spe_evcntlsw 80#define __ev_rndw __builtin_spe_evrndw 81#define __ev_mergehi __builtin_spe_evmergehi 82#define __ev_mergelo __builtin_spe_evmergelo 83#define __ev_mergelohi __builtin_spe_evmergelohi 84#define __ev_mergehilo __builtin_spe_evmergehilo 85#define __ev_splati __builtin_spe_evsplati 86#define __ev_splatfi __builtin_spe_evsplatfi 87#define __ev_divws __builtin_spe_evdivws 88#define __ev_divwu __builtin_spe_evdivwu 89#define __ev_mra __builtin_spe_evmra 90 91#define __brinc __builtin_spe_brinc 92 93/* Loads. */ 94 95#define __ev_lddx __builtin_spe_evlddx 96#define __ev_ldwx __builtin_spe_evldwx 97#define __ev_ldhx __builtin_spe_evldhx 98#define __ev_lwhex __builtin_spe_evlwhex 99#define __ev_lwhoux __builtin_spe_evlwhoux 100#define __ev_lwhosx __builtin_spe_evlwhosx 101#define __ev_lwwsplatx __builtin_spe_evlwwsplatx 102#define __ev_lwhsplatx __builtin_spe_evlwhsplatx 103#define __ev_lhhesplatx __builtin_spe_evlhhesplatx 104#define __ev_lhhousplatx __builtin_spe_evlhhousplatx 105#define __ev_lhhossplatx __builtin_spe_evlhhossplatx 106#define __ev_ldd __builtin_spe_evldd 107#define __ev_ldw __builtin_spe_evldw 108#define __ev_ldh __builtin_spe_evldh 109#define __ev_lwhe __builtin_spe_evlwhe 110#define __ev_lwhou __builtin_spe_evlwhou 111#define __ev_lwhos __builtin_spe_evlwhos 112#define __ev_lwwsplat __builtin_spe_evlwwsplat 113#define __ev_lwhsplat __builtin_spe_evlwhsplat 114#define __ev_lhhesplat __builtin_spe_evlhhesplat 115#define __ev_lhhousplat __builtin_spe_evlhhousplat 116#define __ev_lhhossplat __builtin_spe_evlhhossplat 117 118/* Stores. */ 119 120#define __ev_stddx __builtin_spe_evstddx 121#define __ev_stdwx __builtin_spe_evstdwx 122#define __ev_stdhx __builtin_spe_evstdhx 123#define __ev_stwwex __builtin_spe_evstwwex 124#define __ev_stwwox __builtin_spe_evstwwox 125#define __ev_stwhex __builtin_spe_evstwhex 126#define __ev_stwhox __builtin_spe_evstwhox 127#define __ev_stdd __builtin_spe_evstdd 128#define __ev_stdw __builtin_spe_evstdw 129#define __ev_stdh __builtin_spe_evstdh 130#define __ev_stwwe __builtin_spe_evstwwe 131#define __ev_stwwo __builtin_spe_evstwwo 132#define __ev_stwhe __builtin_spe_evstwhe 133#define __ev_stwho __builtin_spe_evstwho 134 135/* Fixed point complex. */ 136 137#define __ev_mhossf __builtin_spe_evmhossf 138#define __ev_mhosmf __builtin_spe_evmhosmf 139#define __ev_mhosmi __builtin_spe_evmhosmi 140#define __ev_mhoumi __builtin_spe_evmhoumi 141#define __ev_mhessf __builtin_spe_evmhessf 142#define __ev_mhesmf __builtin_spe_evmhesmf 143#define __ev_mhesmi __builtin_spe_evmhesmi 144#define __ev_mheumi __builtin_spe_evmheumi 145#define __ev_mhossfa __builtin_spe_evmhossfa 146#define __ev_mhosmfa __builtin_spe_evmhosmfa 147#define __ev_mhosmia __builtin_spe_evmhosmia 148#define __ev_mhoumia __builtin_spe_evmhoumia 149#define __ev_mhessfa __builtin_spe_evmhessfa 150#define __ev_mhesmfa __builtin_spe_evmhesmfa 151#define __ev_mhesmia __builtin_spe_evmhesmia 152#define __ev_mheumia __builtin_spe_evmheumia 153 154#define __ev_mhoumf __ev_mhoumi 155#define __ev_mheumf __ev_mheumi 156#define __ev_mhoumfa __ev_mhoumia 157#define __ev_mheumfa __ev_mheumia 158 159#define __ev_mhossfaaw __builtin_spe_evmhossfaaw 160#define __ev_mhossiaaw __builtin_spe_evmhossiaaw 161#define __ev_mhosmfaaw __builtin_spe_evmhosmfaaw 162#define __ev_mhosmiaaw __builtin_spe_evmhosmiaaw 163#define __ev_mhousiaaw __builtin_spe_evmhousiaaw 164#define __ev_mhoumiaaw __builtin_spe_evmhoumiaaw 165#define __ev_mhessfaaw __builtin_spe_evmhessfaaw 166#define __ev_mhessiaaw __builtin_spe_evmhessiaaw 167#define __ev_mhesmfaaw __builtin_spe_evmhesmfaaw 168#define __ev_mhesmiaaw __builtin_spe_evmhesmiaaw 169#define __ev_mheusiaaw __builtin_spe_evmheusiaaw 170#define __ev_mheumiaaw __builtin_spe_evmheumiaaw 171 172#define __ev_mhousfaaw __ev_mhousiaaw 173#define __ev_mhoumfaaw __ev_mhoumiaaw 174#define __ev_mheusfaaw __ev_mheusiaaw 175#define __ev_mheumfaaw __ev_mheumiaaw 176 177#define __ev_mhossfanw __builtin_spe_evmhossfanw 178#define __ev_mhossianw __builtin_spe_evmhossianw 179#define __ev_mhosmfanw __builtin_spe_evmhosmfanw 180#define __ev_mhosmianw __builtin_spe_evmhosmianw 181#define __ev_mhousianw __builtin_spe_evmhousianw 182#define __ev_mhoumianw __builtin_spe_evmhoumianw 183#define __ev_mhessfanw __builtin_spe_evmhessfanw 184#define __ev_mhessianw __builtin_spe_evmhessianw 185#define __ev_mhesmfanw __builtin_spe_evmhesmfanw 186#define __ev_mhesmianw __builtin_spe_evmhesmianw 187#define __ev_mheusianw __builtin_spe_evmheusianw 188#define __ev_mheumianw __builtin_spe_evmheumianw 189 190#define __ev_mhousfanw __ev_mhousianw 191#define __ev_mhoumfanw __ev_mhoumianw 192#define __ev_mheusfanw __ev_mheusianw 193#define __ev_mheumfanw __ev_mheumianw 194 195#define __ev_mhogsmfaa __builtin_spe_evmhogsmfaa 196#define __ev_mhogsmiaa __builtin_spe_evmhogsmiaa 197#define __ev_mhogumiaa __builtin_spe_evmhogumiaa 198#define __ev_mhegsmfaa __builtin_spe_evmhegsmfaa 199#define __ev_mhegsmiaa __builtin_spe_evmhegsmiaa 200#define __ev_mhegumiaa __builtin_spe_evmhegumiaa 201 202#define __ev_mhogumfaa __ev_mhogumiaa 203#define __ev_mhegumfaa __ev_mhegumiaa 204 205#define __ev_mhogsmfan __builtin_spe_evmhogsmfan 206#define __ev_mhogsmian __builtin_spe_evmhogsmian 207#define __ev_mhogumian __builtin_spe_evmhogumian 208#define __ev_mhegsmfan __builtin_spe_evmhegsmfan 209#define __ev_mhegsmian __builtin_spe_evmhegsmian 210#define __ev_mhegumian __builtin_spe_evmhegumian 211 212#define __ev_mhogumfan __ev_mhogumian 213#define __ev_mhegumfan __ev_mhegumian 214 215#define __ev_mwhssf __builtin_spe_evmwhssf 216#define __ev_mwhsmf __builtin_spe_evmwhsmf 217#define __ev_mwhsmi __builtin_spe_evmwhsmi 218#define __ev_mwhumi __builtin_spe_evmwhumi 219#define __ev_mwhssfa __builtin_spe_evmwhssfa 220#define __ev_mwhsmfa __builtin_spe_evmwhsmfa 221#define __ev_mwhsmia __builtin_spe_evmwhsmia 222#define __ev_mwhumia __builtin_spe_evmwhumia 223 224#define __ev_mwhumf __ev_mwhumi 225#define __ev_mwhumfa __ev_mwhumia 226 227#define __ev_mwlumi __builtin_spe_evmwlumi 228#define __ev_mwlumia __builtin_spe_evmwlumia 229#define __ev_mwlumiaaw __builtin_spe_evmwlumiaaw 230 231#define __ev_mwlssiaaw __builtin_spe_evmwlssiaaw 232#define __ev_mwlsmiaaw __builtin_spe_evmwlsmiaaw 233#define __ev_mwlusiaaw __builtin_spe_evmwlusiaaw 234#define __ev_mwlusiaaw __builtin_spe_evmwlusiaaw 235 236#define __ev_mwlssianw __builtin_spe_evmwlssianw 237#define __ev_mwlsmianw __builtin_spe_evmwlsmianw 238#define __ev_mwlusianw __builtin_spe_evmwlusianw 239#define __ev_mwlumianw __builtin_spe_evmwlumianw 240 241#define __ev_mwssf __builtin_spe_evmwssf 242#define __ev_mwsmf __builtin_spe_evmwsmf 243#define __ev_mwsmi __builtin_spe_evmwsmi 244#define __ev_mwumi __builtin_spe_evmwumi 245#define __ev_mwssfa __builtin_spe_evmwssfa 246#define __ev_mwsmfa __builtin_spe_evmwsmfa 247#define __ev_mwsmia __builtin_spe_evmwsmia 248#define __ev_mwumia __builtin_spe_evmwumia 249 250#define __ev_mwumf __ev_mwumi 251#define __ev_mwumfa __ev_mwumia 252 253#define __ev_mwssfaa __builtin_spe_evmwssfaa 254#define __ev_mwsmfaa __builtin_spe_evmwsmfaa 255#define __ev_mwsmiaa __builtin_spe_evmwsmiaa 256#define __ev_mwumiaa __builtin_spe_evmwumiaa 257 258#define __ev_mwumfaa __ev_mwumiaa 259 260#define __ev_mwssfan __builtin_spe_evmwssfan 261#define __ev_mwsmfan __builtin_spe_evmwsmfan 262#define __ev_mwsmian __builtin_spe_evmwsmian 263#define __ev_mwumian __builtin_spe_evmwumian 264 265#define __ev_mwumfan __ev_mwumian 266 267#define __ev_addssiaaw __builtin_spe_evaddssiaaw 268#define __ev_addsmiaaw __builtin_spe_evaddsmiaaw 269#define __ev_addusiaaw __builtin_spe_evaddusiaaw 270#define __ev_addumiaaw __builtin_spe_evaddumiaaw 271 272#define __ev_addusfaaw __ev_addusiaaw 273#define __ev_addumfaaw __ev_addumiaaw 274#define __ev_addsmfaaw __ev_addsmiaaw 275#define __ev_addssfaaw __ev_addssiaaw 276 277#define __ev_subfssiaaw __builtin_spe_evsubfssiaaw 278#define __ev_subfsmiaaw __builtin_spe_evsubfsmiaaw 279#define __ev_subfusiaaw __builtin_spe_evsubfusiaaw 280#define __ev_subfumiaaw __builtin_spe_evsubfumiaaw 281 282#define __ev_subfusfaaw __ev_subfusiaaw 283#define __ev_subfumfaaw __ev_subfumiaaw 284#define __ev_subfsmfaaw __ev_subfsmiaaw 285#define __ev_subfssfaaw __ev_subfssiaaw 286 287/* Floating Point SIMD Instructions */ 288 289#define __ev_fsabs __builtin_spe_evfsabs 290#define __ev_fsnabs __builtin_spe_evfsnabs 291#define __ev_fsneg __builtin_spe_evfsneg 292#define __ev_fsadd __builtin_spe_evfsadd 293#define __ev_fssub __builtin_spe_evfssub 294#define __ev_fsmul __builtin_spe_evfsmul 295#define __ev_fsdiv __builtin_spe_evfsdiv 296#define __ev_fscfui __builtin_spe_evfscfui 297#define __ev_fscfsi __builtin_spe_evfscfsi 298#define __ev_fscfuf __builtin_spe_evfscfuf 299#define __ev_fscfsf __builtin_spe_evfscfsf 300#define __ev_fsctui __builtin_spe_evfsctui 301#define __ev_fsctsi __builtin_spe_evfsctsi 302#define __ev_fsctuf __builtin_spe_evfsctuf 303#define __ev_fsctsf __builtin_spe_evfsctsf 304#define __ev_fsctuiz __builtin_spe_evfsctuiz 305#define __ev_fsctsiz __builtin_spe_evfsctsiz 306 307/* NOT SUPPORTED IN FIRST e500, support via two instructions: */ 308 309#define __ev_mwhusfaaw __ev_mwhusiaaw 310#define __ev_mwhumfaaw __ev_mwhumiaaw 311#define __ev_mwhusfanw __ev_mwhusianw 312#define __ev_mwhumfanw __ev_mwhumianw 313#define __ev_mwhgumfaa __ev_mwhgumiaa 314#define __ev_mwhgumfan __ev_mwhgumian 315 316#define __ev_mwhgssfaa __internal_ev_mwhgssfaa 317#define __ev_mwhgsmfaa __internal_ev_mwhgsmfaa 318#define __ev_mwhgsmiaa __internal_ev_mwhgsmiaa 319#define __ev_mwhgumiaa __internal_ev_mwhgumiaa 320#define __ev_mwhgssfan __internal_ev_mwhgssfan 321#define __ev_mwhgsmfan __internal_ev_mwhgsmfan 322#define __ev_mwhgsmian __internal_ev_mwhgsmian 323#define __ev_mwhgumian __internal_ev_mwhgumian 324#define __ev_mwhssiaaw __internal_ev_mwhssiaaw 325#define __ev_mwhssfaaw __internal_ev_mwhssfaaw 326#define __ev_mwhsmfaaw __internal_ev_mwhsmfaaw 327#define __ev_mwhsmiaaw __internal_ev_mwhsmiaaw 328#define __ev_mwhusiaaw __internal_ev_mwhusiaaw 329#define __ev_mwhumiaaw __internal_ev_mwhumiaaw 330#define __ev_mwhssfanw __internal_ev_mwhssfanw 331#define __ev_mwhssianw __internal_ev_mwhssianw 332#define __ev_mwhsmfanw __internal_ev_mwhsmfanw 333#define __ev_mwhsmianw __internal_ev_mwhsmianw 334#define __ev_mwhusianw __internal_ev_mwhusianw 335#define __ev_mwhumianw __internal_ev_mwhumianw 336 337static inline __ev64_opaque__ 338__internal_ev_mwhssfaaw (__ev64_opaque__ a, __ev64_opaque__ b) 339{ 340 __ev64_opaque__ t; 341 342 t = __ev_mwhssf (a, b); 343 return __ev_addssiaaw (t); 344} 345 346static inline __ev64_opaque__ 347__internal_ev_mwhssiaaw (__ev64_opaque__ a, __ev64_opaque__ b) 348{ 349 __ev64_opaque__ t; 350 351 t = __ev_mwhsmi (a, b); 352 return __ev_addssiaaw (t); 353} 354 355static inline __ev64_opaque__ 356__internal_ev_mwhsmfaaw (__ev64_opaque__ a, __ev64_opaque__ b) 357{ 358 __ev64_opaque__ t; 359 360 t = __ev_mwhsmf (a, b); 361 return __ev_addsmiaaw (t); 362} 363 364static inline __ev64_opaque__ 365__internal_ev_mwhsmiaaw (__ev64_opaque__ a, __ev64_opaque__ b) 366{ 367 __ev64_opaque__ t; 368 369 t = __ev_mwhsmi (a, b); 370 return __ev_addsmiaaw (t); 371} 372 373static inline __ev64_opaque__ 374__internal_ev_mwhusiaaw (__ev64_opaque__ a, __ev64_opaque__ b) 375{ 376 __ev64_opaque__ t; 377 378 t = __ev_mwhumi (a, b); 379 return __ev_addusiaaw (t); 380} 381 382static inline __ev64_opaque__ 383__internal_ev_mwhumiaaw (__ev64_opaque__ a, __ev64_opaque__ b) 384{ 385 __ev64_opaque__ t; 386 387 t = __ev_mwhumi (a, b); 388 return __ev_addumiaaw (t); 389} 390 391static inline __ev64_opaque__ 392__internal_ev_mwhssfanw (__ev64_opaque__ a, __ev64_opaque__ b) 393{ 394 __ev64_opaque__ t; 395 396 t = __ev_mwhssf (a, b); 397 return __ev_subfssiaaw (t); 398} 399 400static inline __ev64_opaque__ 401__internal_ev_mwhssianw (__ev64_opaque__ a, __ev64_opaque__ b) 402{ 403 __ev64_opaque__ t; 404 405 t = __ev_mwhsmi (a, b); 406 return __ev_subfssiaaw (t); 407} 408 409static inline __ev64_opaque__ 410__internal_ev_mwhsmfanw (__ev64_opaque__ a, __ev64_opaque__ b) 411{ 412 __ev64_opaque__ t; 413 414 t = __ev_mwhsmf (a, b); 415 return __ev_subfsmiaaw (t); 416} 417 418static inline __ev64_opaque__ 419__internal_ev_mwhsmianw (__ev64_opaque__ a, __ev64_opaque__ b) 420{ 421 __ev64_opaque__ t; 422 423 t = __ev_mwhsmi (a, b); 424 return __ev_subfsmiaaw (t); 425} 426 427static inline __ev64_opaque__ 428__internal_ev_mwhusianw (__ev64_opaque__ a, __ev64_opaque__ b) 429{ 430 __ev64_opaque__ t; 431 432 t = __ev_mwhumi (a, b); 433 return __ev_subfusiaaw (t); 434} 435 436static inline __ev64_opaque__ 437__internal_ev_mwhumianw (__ev64_opaque__ a, __ev64_opaque__ b) 438{ 439 __ev64_opaque__ t; 440 441 t = __ev_mwhumi (a, b); 442 return __ev_subfumiaaw (t); 443} 444 445static inline __ev64_opaque__ 446__internal_ev_mwhgssfaa (__ev64_opaque__ a, __ev64_opaque__ b) 447{ 448 __ev64_opaque__ t; 449 450 t = __ev_mwhssf (a, b); 451 return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1})); 452} 453 454static inline __ev64_opaque__ 455__internal_ev_mwhgsmfaa (__ev64_opaque__ a, __ev64_opaque__ b) 456{ 457 __ev64_opaque__ t; 458 459 t = __ev_mwhsmf (a, b); 460 return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1})); 461} 462 463static inline __ev64_opaque__ 464__internal_ev_mwhgsmiaa (__ev64_opaque__ a, __ev64_opaque__ b) 465{ 466 __ev64_opaque__ t; 467 468 t = __ev_mwhsmi (a, b); 469 return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1})); 470} 471 472static inline __ev64_opaque__ 473__internal_ev_mwhgumiaa (__ev64_opaque__ a, __ev64_opaque__ b) 474{ 475 __ev64_opaque__ t; 476 477 t = __ev_mwhumi (a, b); 478 return __ev_mwumiaa (t, ((__ev64_s32__){1, 1})); 479} 480 481static inline __ev64_opaque__ 482__internal_ev_mwhgssfan (__ev64_opaque__ a, __ev64_opaque__ b) 483{ 484 __ev64_opaque__ t; 485 486 t = __ev_mwhssf (a, b); 487 return __ev_mwsmian (t, ((__ev64_s32__){1, 1})); 488} 489 490static inline __ev64_opaque__ 491__internal_ev_mwhgsmfan (__ev64_opaque__ a, __ev64_opaque__ b) 492{ 493 __ev64_opaque__ t; 494 495 t = __ev_mwhsmf (a, b); 496 return __ev_mwsmian (t, ((__ev64_s32__){1, 1})); 497} 498 499static inline __ev64_opaque__ 500__internal_ev_mwhgsmian (__ev64_opaque__ a, __ev64_opaque__ b) 501{ 502 __ev64_opaque__ t; 503 504 t = __ev_mwhsmi (a, b); 505 return __ev_mwsmian (t, ((__ev64_s32__){1, 1})); 506} 507 508static inline __ev64_opaque__ 509__internal_ev_mwhgumian (__ev64_opaque__ a, __ev64_opaque__ b) 510{ 511 __ev64_opaque__ t; 512 513 t = __ev_mwhumi (a, b); 514 return __ev_mwumian (t, ((__ev64_s32__){1, 1})); 515} 516 517/* END OF NOT SUPPORTED */ 518 519/* __ev_create* functions. */ 520 521#define __ev_create_ufix32_u32 __ev_create_u32 522#define __ev_create_sfix32_s32 __ev_create_s32 523 524static inline __ev64_opaque__ 525__ev_create_s16 (int16_t a, int16_t b, int16_t c, int16_t d) 526{ 527 union 528 { 529 __ev64_opaque__ v; 530 int16_t i[4]; 531 } u; 532 533 u.i[0] = a; 534 u.i[1] = b; 535 u.i[2] = c; 536 u.i[3] = d; 537 538 return u.v; 539} 540 541static inline __ev64_opaque__ 542__ev_create_u16 (uint16_t a, uint16_t b, uint16_t c, uint16_t d) 543 544{ 545 union 546 { 547 __ev64_opaque__ v; 548 uint16_t i[4]; 549 } u; 550 551 u.i[0] = a; 552 u.i[1] = b; 553 u.i[2] = c; 554 u.i[3] = d; 555 556 return u.v; 557} 558 559static inline __ev64_opaque__ 560__ev_create_s32 (int32_t a, int32_t b) 561{ 562 union 563 { 564 __ev64_opaque__ v; 565 int32_t i[2]; 566 } u; 567 568 u.i[0] = a; 569 u.i[1] = b; 570 571 return u.v; 572} 573 574static inline __ev64_opaque__ 575__ev_create_u32 (uint32_t a, uint32_t b) 576{ 577 union 578 { 579 __ev64_opaque__ v; 580 uint32_t i[2]; 581 } u; 582 583 u.i[0] = a; 584 u.i[1] = b; 585 586 return u.v; 587} 588 589static inline __ev64_opaque__ 590__ev_create_fs (float a, float b) 591{ 592 union 593 { 594 __ev64_opaque__ v; 595 float f[2]; 596 } u; 597 598 u.f[0] = a; 599 u.f[1] = b; 600 601 return u.v; 602} 603 604static inline __ev64_opaque__ 605__ev_create_sfix32_fs (float a, float b) 606{ 607 __ev64_opaque__ ev; 608 609 ev = (__ev64_opaque__) __ev_create_fs (a, b); 610 return (__ev64_opaque__) __builtin_spe_evfsctsf ((__v2sf) ev); 611} 612 613static inline __ev64_opaque__ 614__ev_create_ufix32_fs (float a, float b) 615{ 616 __ev64_opaque__ ev; 617 618 ev = (__ev64_opaque__) __ev_create_fs (a, b); 619 return (__ev64_opaque__) __builtin_spe_evfsctuf ((__v2sf) ev); 620} 621 622static inline __ev64_opaque__ 623__ev_create_s64 (int64_t a) 624{ 625 union 626 { 627 __ev64_opaque__ v; 628 int64_t i; 629 } u; 630 631 u.i = a; 632 return u.v; 633} 634 635static inline __ev64_opaque__ 636__ev_create_u64 (uint64_t a) 637{ 638 union 639 { 640 __ev64_opaque__ v; 641 uint64_t i; 642 } u; 643 644 u.i = a; 645 return u.v; 646} 647 648static inline uint64_t 649__ev_convert_u64 (__ev64_opaque__ a) 650{ 651 return (uint64_t) a; 652} 653 654static inline int64_t 655__ev_convert_s64 (__ev64_opaque__ a) 656{ 657 return (int64_t) a; 658} 659 660/* __ev_get_* functions. */ 661 662#define __ev_get_upper_u32(a) __ev_get_u32_internal ((a), 0) 663#define __ev_get_lower_u32(a) __ev_get_u32_internal ((a), 1) 664#define __ev_get_upper_s32(a) __ev_get_s32_internal ((a), 0) 665#define __ev_get_lower_s32(a) __ev_get_s32_internal ((a), 1) 666#define __ev_get_upper_fs(a) __ev_get_fs_internal ((a), 0) 667#define __ev_get_lower_fs(a) __ev_get_fs_internal ((a), 1) 668#define __ev_get_upper_ufix32_u32 __ev_get_upper_u32 669#define __ev_get_lower_ufix32_u32 __ev_get_lower_u32 670#define __ev_get_upper_sfix32_s32 __ev_get_upper_s32 671#define __ev_get_lower_sfix32_s32 __ev_get_lower_s32 672#define __ev_get_upper_sfix32_fs(a) __ev_get_sfix32_fs ((a), 0) 673#define __ev_get_lower_sfix32_fs(a) __ev_get_sfix32_fs ((a), 1) 674#define __ev_get_upper_ufix32_fs(a) __ev_get_ufix32_fs ((a), 0) 675#define __ev_get_lower_ufix32_fs(a) __ev_get_ufix32_fs ((a), 1) 676 677#define __ev_get_u32 __ev_get_u32_internal 678#define __ev_get_s32 __ev_get_s32_internal 679#define __ev_get_fs __ev_get_fs_internal 680#define __ev_get_u16 __ev_get_u16_internal 681#define __ev_get_s16 __ev_get_s16_internal 682 683#define __ev_get_ufix32_u32 __ev_get_u32 684#define __ev_get_sfix32_s32 __ev_get_s32 685#define __ev_get_ufix32_fs __ev_get_ufix32_fs_internal 686#define __ev_get_sfix32_fs __ev_get_sfix32_fs_internal 687 688static inline uint32_t 689__ev_get_u32_internal (__ev64_opaque__ a, uint32_t pos) 690{ 691 union 692 { 693 __ev64_opaque__ v; 694 uint32_t i[2]; 695 } u; 696 697 u.v = a; 698 return u.i[pos]; 699} 700 701static inline int32_t 702__ev_get_s32_internal (__ev64_opaque__ a, uint32_t pos) 703{ 704 union 705 { 706 __ev64_opaque__ v; 707 int32_t i[2]; 708 } u; 709 710 u.v = a; 711 return u.i[pos]; 712} 713 714static inline float 715__ev_get_fs_internal (__ev64_opaque__ a, uint32_t pos) 716{ 717 union 718 { 719 __ev64_opaque__ v; 720 float f[2]; 721 } u; 722 723 u.v = a; 724 return u.f[pos]; 725} 726 727static inline float 728__ev_get_sfix32_fs_internal (__ev64_opaque__ a, uint32_t pos) 729{ 730 __ev64_fs__ v; 731 732 v = __builtin_spe_evfscfsf ((__v2sf) a); 733 return __ev_get_fs_internal ((__ev64_opaque__) v, pos); 734} 735 736static inline float 737__ev_get_ufix32_fs_internal (__ev64_opaque__ a, uint32_t pos) 738{ 739 __ev64_fs__ v; 740 741 v = __builtin_spe_evfscfuf ((__v2sf) a); 742 return __ev_get_fs_internal ((__ev64_opaque__) v, pos); 743} 744 745static inline uint16_t 746__ev_get_u16_internal (__ev64_opaque__ a, uint32_t pos) 747{ 748 union 749 { 750 __ev64_opaque__ v; 751 uint16_t i[4]; 752 } u; 753 754 u.v = a; 755 return u.i[pos]; 756} 757 758static inline int16_t 759__ev_get_s16_internal (__ev64_opaque__ a, uint32_t pos) 760{ 761 union 762 { 763 __ev64_opaque__ v; 764 int16_t i[4]; 765 } u; 766 767 u.v = a; 768 return u.i[pos]; 769} 770 771/* __ev_set_* functions. */ 772 773#define __ev_set_u32 __ev_set_u32_internal 774#define __ev_set_s32 __ev_set_s32_internal 775#define __ev_set_fs __ev_set_fs_internal 776#define __ev_set_u16 __ev_set_u16_internal 777#define __ev_set_s16 __ev_set_s16_internal 778 779#define __ev_set_ufix32_u32 __ev_set_u32 780#define __ev_set_sfix32_s32 __ev_set_s32 781 782#define __ev_set_sfix32_fs __ev_set_sfix32_fs_internal 783#define __ev_set_ufix32_fs __ev_set_ufix32_fs_internal 784 785#define __ev_set_upper_u32(a, b) __ev_set_u32 (a, b, 0) 786#define __ev_set_lower_u32(a, b) __ev_set_u32 (a, b, 1) 787#define __ev_set_upper_s32(a, b) __ev_set_s32 (a, b, 0) 788#define __ev_set_lower_s32(a, b) __ev_set_s32 (a, b, 1) 789#define __ev_set_upper_fs(a, b) __ev_set_fs (a, b, 0) 790#define __ev_set_lower_fs(a, b) __ev_set_fs (a, b, 1) 791#define __ev_set_upper_ufix32_u32 __ev_set_upper_u32 792#define __ev_set_lower_ufix32_u32 __ev_set_lower_u32 793#define __ev_set_upper_sfix32_s32 __ev_set_upper_s32 794#define __ev_set_lower_sfix32_s32 __ev_set_lower_s32 795#define __ev_set_upper_sfix32_fs(a, b) __ev_set_sfix32_fs (a, b, 0) 796#define __ev_set_lower_sfix32_fs(a, b) __ev_set_sfix32_fs (a, b, 1) 797#define __ev_set_upper_ufix32_fs(a, b) __ev_set_ufix32_fs (a, b, 0) 798#define __ev_set_lower_ufix32_fs(a, b) __ev_set_ufix32_fs (a, b, 1) 799 800#define __ev_set_acc_vec64 __builtin_spe_evmra 801 802static inline __ev64_opaque__ 803__ev_set_acc_u64 (uint64_t a) 804{ 805 __ev64_opaque__ ev32; 806 ev32 = __ev_create_u64 (a); 807 __ev_mra (ev32); 808 return ev32; 809} 810 811static inline __ev64_opaque__ 812__ev_set_acc_s64 (int64_t a) 813{ 814 __ev64_opaque__ ev32; 815 ev32 = __ev_create_s64 (a); 816 __ev_mra (ev32); 817 return ev32; 818} 819 820static inline __ev64_opaque__ 821__ev_set_u32_internal (__ev64_opaque__ a, uint32_t b, uint32_t pos) 822{ 823 union 824 { 825 __ev64_opaque__ v; 826 uint32_t i[2]; 827 } u; 828 829 u.v = a; 830 u.i[pos] = b; 831 return u.v; 832} 833 834static inline __ev64_opaque__ 835__ev_set_s32_internal (__ev64_opaque__ a, int32_t b, uint32_t pos) 836{ 837 union 838 { 839 __ev64_opaque__ v; 840 int32_t i[2]; 841 } u; 842 843 u.v = a; 844 u.i[pos] = b; 845 return u.v; 846} 847 848static inline __ev64_opaque__ 849__ev_set_fs_internal (__ev64_opaque__ a, float b, uint32_t pos) 850{ 851 union 852 { 853 __ev64_opaque__ v; 854 float f[2]; 855 } u; 856 857 u.v = a; 858 u.f[pos] = b; 859 return u.v; 860} 861 862static inline __ev64_opaque__ 863__ev_set_sfix32_fs_internal (__ev64_opaque__ a, float b, uint32_t pos) 864{ 865 __ev64_opaque__ v; 866 float other; 867 868 /* Get other half. */ 869 other = __ev_get_fs_internal (a, pos ^ 1); 870 871 /* Make an sfix32 with 'b'. */ 872 v = __ev_create_sfix32_fs (b, b); 873 874 /* Set other half to what it used to be. */ 875 return __ev_set_fs_internal (v, other, pos ^ 1); 876} 877 878static inline __ev64_opaque__ 879__ev_set_ufix32_fs_internal (__ev64_opaque__ a, float b, uint32_t pos) 880{ 881 __ev64_opaque__ v; 882 float other; 883 884 /* Get other half. */ 885 other = __ev_get_fs_internal (a, pos ^ 1); 886 887 /* Make an ufix32 with 'b'. */ 888 v = __ev_create_ufix32_fs (b, b); 889 890 /* Set other half to what it used to be. */ 891 return __ev_set_fs_internal (v, other, pos ^ 1); 892} 893 894static inline __ev64_opaque__ 895__ev_set_u16_internal (__ev64_opaque__ a, uint16_t b, uint32_t pos) 896{ 897 union 898 { 899 __ev64_opaque__ v; 900 uint16_t i[4]; 901 } u; 902 903 u.v = a; 904 u.i[pos] = b; 905 return u.v; 906} 907 908static inline __ev64_opaque__ 909__ev_set_s16_internal (__ev64_opaque__ a, int16_t b, uint32_t pos) 910{ 911 union 912 { 913 __ev64_opaque__ v; 914 int16_t i[4]; 915 } u; 916 917 u.v = a; 918 u.i[pos] = b; 919 return u.v; 920} 921 922/* Predicates. */ 923 924#define __pred_all 0 925#define __pred_any 1 926#define __pred_upper 2 927#define __pred_lower 3 928 929#define __ev_any_gts(a, b) __builtin_spe_evcmpgts (__pred_any, (a), (b)) 930#define __ev_all_gts(a, b) __builtin_spe_evcmpgts (__pred_all, (a), (b)) 931#define __ev_upper_gts(a, b) __builtin_spe_evcmpgts (__pred_upper, (a), (b)) 932#define __ev_lower_gts(a, b) __builtin_spe_evcmpgts (__pred_lower, (a), (b)) 933#define __ev_select_gts __builtin_spe_evsel_gts 934 935#define __ev_any_gtu(a, b) __builtin_spe_evcmpgtu (__pred_any, (a), (b)) 936#define __ev_all_gtu(a, b) __builtin_spe_evcmpgtu (__pred_all, (a), (b)) 937#define __ev_upper_gtu(a, b) __builtin_spe_evcmpgtu (__pred_upper, (a), (b)) 938#define __ev_lower_gtu(a, b) __builtin_spe_evcmpgtu (__pred_lower, (a), (b)) 939#define __ev_select_gtu __builtin_spe_evsel_gtu 940 941#define __ev_any_lts(a, b) __builtin_spe_evcmplts (__pred_any, (a), (b)) 942#define __ev_all_lts(a, b) __builtin_spe_evcmplts (__pred_all, (a), (b)) 943#define __ev_upper_lts(a, b) __builtin_spe_evcmplts (__pred_upper, (a), (b)) 944#define __ev_lower_lts(a, b) __builtin_spe_evcmplts (__pred_lower, (a), (b)) 945#define __ev_select_lts(a, b, c, d) ((__v2si) __builtin_spe_evsel_lts ((a), (b), (c), (d))) 946 947#define __ev_any_ltu(a, b) __builtin_spe_evcmpltu (__pred_any, (a), (b)) 948#define __ev_all_ltu(a, b) __builtin_spe_evcmpltu (__pred_all, (a), (b)) 949#define __ev_upper_ltu(a, b) __builtin_spe_evcmpltu (__pred_upper, (a), (b)) 950#define __ev_lower_ltu(a, b) __builtin_spe_evcmpltu (__pred_lower, (a), (b)) 951#define __ev_select_ltu __builtin_spe_evsel_ltu 952#define __ev_any_eq(a, b) __builtin_spe_evcmpeq (__pred_any, (a), (b)) 953#define __ev_all_eq(a, b) __builtin_spe_evcmpeq (__pred_all, (a), (b)) 954#define __ev_upper_eq(a, b) __builtin_spe_evcmpeq (__pred_upper, (a), (b)) 955#define __ev_lower_eq(a, b) __builtin_spe_evcmpeq (__pred_lower, (a), (b)) 956#define __ev_select_eq __builtin_spe_evsel_eq 957 958#define __ev_any_fs_gt(a, b) __builtin_spe_evfscmpgt (__pred_any, (a), (b)) 959#define __ev_all_fs_gt(a, b) __builtin_spe_evfscmpgt (__pred_all, (a), (b)) 960#define __ev_upper_fs_gt(a, b) __builtin_spe_evfscmpgt (__pred_upper, (a), (b)) 961#define __ev_lower_fs_gt(a, b) __builtin_spe_evfscmpgt (__pred_lower, (a), (b)) 962#define __ev_select_fs_gt __builtin_spe_evsel_fsgt 963 964#define __ev_any_fs_lt(a, b) __builtin_spe_evfscmplt (__pred_any, (a), (b)) 965#define __ev_all_fs_lt(a, b) __builtin_spe_evfscmplt (__pred_all, (a), (b)) 966#define __ev_upper_fs_lt(a, b) __builtin_spe_evfscmplt (__pred_upper, (a), (b)) 967#define __ev_lower_fs_lt(a, b) __builtin_spe_evfscmplt (__pred_lower, (a), (b)) 968#define __ev_select_fs_lt __builtin_spe_evsel_fslt 969 970#define __ev_any_fs_eq(a, b) __builtin_spe_evfscmpeq (__pred_any, (a), (b)) 971#define __ev_all_fs_eq(a, b) __builtin_spe_evfscmpeq (__pred_all, (a), (b)) 972#define __ev_upper_fs_eq(a, b) __builtin_spe_evfscmpeq (__pred_upper, (a), (b)) 973#define __ev_lower_fs_eq(a, b) __builtin_spe_evfscmpeq (__pred_lower, (a), (b)) 974#define __ev_select_fs_eq __builtin_spe_evsel_fseq 975 976#define __ev_any_fs_tst_gt(a, b) __builtin_spe_evfststgt (__pred_any, (a), (b)) 977#define __ev_all_fs_tst_gt(a, b) __builtin_spe_evfststgt (__pred_all, (a), (b)) 978#define __ev_upper_fs_tst_gt(a, b) __builtin_spe_evfststgt (__pred_upper, (a), (b)) 979#define __ev_lower_fs_tst_gt(a, b) __builtin_spe_evfststgt (__pred_lower, (a), (b)) 980#define __ev_select_fs_tst_gt __builtin_spe_evsel_fststgt 981 982#define __ev_any_fs_tst_lt(a, b) __builtin_spe_evfststlt (__pred_any, (a), (b)) 983#define __ev_all_fs_tst_lt(a, b) __builtin_spe_evfststlt (__pred_all, (a), (b)) 984#define __ev_upper_fs_tst_lt(a, b) __builtin_spe_evfststlt (__pred_upper, (a), (b)) 985#define __ev_lower_fs_tst_lt(a, b) __builtin_spe_evfststlt (__pred_lower, (a), (b)) 986#define __ev_select_fs_tst_lt __builtin_spe_evsel_fststlt 987 988#define __ev_any_fs_tst_eq(a, b) __builtin_spe_evfststeq (__pred_any, (a), (b)) 989#define __ev_all_fs_tst_eq(a, b) __builtin_spe_evfststeq (__pred_all, (a), (b)) 990#define __ev_upper_fs_tst_eq(a, b) __builtin_spe_evfststeq (__pred_upper, (a), (b)) 991#define __ev_lower_fs_tst_eq(a, b) __builtin_spe_evfststeq (__pred_lower, (a), (b)) 992#define __ev_select_fs_tst_eq __builtin_spe_evsel_fststeq 993 994/* SPEFSCR accessor functions. */ 995 996#define __SPEFSCR_SOVH 0x80000000 997#define __SPEFSCR_OVH 0x40000000 998#define __SPEFSCR_FGH 0x20000000 999#define __SPEFSCR_FXH 0x10000000 1000#define __SPEFSCR_FINVH 0x08000000 1001#define __SPEFSCR_FDBZH 0x04000000 1002#define __SPEFSCR_FUNFH 0x02000000 1003#define __SPEFSCR_FOVFH 0x01000000 1004/* 2 unused bits. */ 1005#define __SPEFSCR_FINXS 0x00200000 1006#define __SPEFSCR_FINVS 0x00100000 1007#define __SPEFSCR_FDBZS 0x00080000 1008#define __SPEFSCR_FUNFS 0x00040000 1009#define __SPEFSCR_FOVFS 0x00020000 1010#define __SPEFSCR_MODE 0x00010000 1011#define __SPEFSCR_SOV 0x00008000 1012#define __SPEFSCR_OV 0x00004000 1013#define __SPEFSCR_FG 0x00002000 1014#define __SPEFSCR_FX 0x00001000 1015#define __SPEFSCR_FINV 0x00000800 1016#define __SPEFSCR_FDBZ 0x00000400 1017#define __SPEFSCR_FUNF 0x00000200 1018#define __SPEFSCR_FOVF 0x00000100 1019/* 1 unused bit. */ 1020#define __SPEFSCR_FINXE 0x00000040 1021#define __SPEFSCR_FINVE 0x00000020 1022#define __SPEFSCR_FDBZE 0x00000010 1023#define __SPEFSCR_FUNFE 0x00000008 1024#define __SPEFSCR_FOVFE 0x00000004 1025#define __SPEFSCR_FRMC 0x00000003 1026 1027#define __ev_get_spefscr_sovh() (__builtin_spe_mfspefscr () & __SPEFSCR_SOVH) 1028#define __ev_get_spefscr_ovh() (__builtin_spe_mfspefscr () & __SPEFSCR_OVH) 1029#define __ev_get_spefscr_fgh() (__builtin_spe_mfspefscr () & __SPEFSCR_FGH) 1030#define __ev_get_spefscr_fxh() (__builtin_spe_mfspefscr () & __SPEFSCR_FXH) 1031#define __ev_get_spefscr_finvh() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVH) 1032#define __ev_get_spefscr_fdbzh() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZH) 1033#define __ev_get_spefscr_funfh() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFH) 1034#define __ev_get_spefscr_fovfh() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFH) 1035#define __ev_get_spefscr_finxs() (__builtin_spe_mfspefscr () & __SPEFSCR_FINXS) 1036#define __ev_get_spefscr_finvs() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVS) 1037#define __ev_get_spefscr_fdbzs() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZS) 1038#define __ev_get_spefscr_funfs() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFS) 1039#define __ev_get_spefscr_fovfs() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFS) 1040#define __ev_get_spefscr_mode() (__builtin_spe_mfspefscr () & __SPEFSCR_MODE) 1041#define __ev_get_spefscr_sov() (__builtin_spe_mfspefscr () & __SPEFSCR_SOV) 1042#define __ev_get_spefscr_ov() (__builtin_spe_mfspefscr () & __SPEFSCR_OV) 1043#define __ev_get_spefscr_fg() (__builtin_spe_mfspefscr () & __SPEFSCR_FG) 1044#define __ev_get_spefscr_fx() (__builtin_spe_mfspefscr () & __SPEFSCR_FX) 1045#define __ev_get_spefscr_finv() (__builtin_spe_mfspefscr () & __SPEFSCR_FINV) 1046#define __ev_get_spefscr_fdbz() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZ) 1047#define __ev_get_spefscr_funf() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNF) 1048#define __ev_get_spefscr_fovf() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVF) 1049#define __ev_get_spefscr_finxe() (__builtin_spe_mfspefscr () & __SPEFSCR_FINXE) 1050#define __ev_get_spefscr_finve() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVE) 1051#define __ev_get_spefscr_fdbze() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZE) 1052#define __ev_get_spefscr_funfe() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFE) 1053#define __ev_get_spefscr_fovfe() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFE) 1054#define __ev_get_spefscr_frmc() (__builtin_spe_mfspefscr () & __SPEFSCR_FRMC) 1055 1056static inline void 1057__ev_clr_spefscr_field (int mask) 1058{ 1059 int i; 1060 1061 i = __builtin_spe_mfspefscr (); 1062 i &= ~mask; 1063 __builtin_spe_mtspefscr (i); 1064} 1065 1066#define __ev_clr_spefscr_sovh() __ev_clr_spefscr_field (__SPEFSCR_SOVH) 1067#define __ev_clr_spefscr_sov() __ev_clr_spefscr_field (__SPEFSCR_SOV) 1068#define __ev_clr_spefscr_finxs() __ev_clr_spefscr_field (__SPEFSCR_FINXS) 1069#define __ev_clr_spefscr_finvs() __ev_clr_spefscr_field (__SPEFSCR_FINVS) 1070#define __ev_clr_spefscr_fdbzs() __ev_clr_spefscr_field (__SPEFSCR_FDBZS) 1071#define __ev_clr_spefscr_funfs() __ev_clr_spefscr_field (__SPEFSCR_FUNFS) 1072#define __ev_clr_spefscr_fovfs() __ev_clr_spefscr_field (__SPEFSCR_FOVFS) 1073 1074/* Set rounding mode: 1075 rnd = 0 (nearest) 1076 rnd = 1 (zero) 1077 rnd = 2 (+inf) 1078 rnd = 3 (-inf). */ 1079 1080static inline void 1081__ev_set_spefscr_frmc (int rnd) 1082{ 1083 int i; 1084 1085 i = __builtin_spe_mfspefscr (); 1086 i &= ~__SPEFSCR_FRMC; 1087 i |= rnd; 1088 __builtin_spe_mtspefscr (i); 1089} 1090 1091/* The SPE PIM says these are declared in <spe.h>, although they are 1092 not provided by GCC: they must be taken from a separate 1093 library. */ 1094extern short int atosfix16 (const char *); 1095extern int atosfix32 (const char *); 1096extern long long atosfix64 (const char *); 1097 1098extern unsigned short atoufix16 (const char *); 1099extern unsigned int atoufix32 (const char *); 1100extern unsigned long long atoufix64 (const char *); 1101 1102extern short int strtosfix16 (const char *, char **); 1103extern int strtosfix32 (const char *, char **); 1104extern long long strtosfix64 (const char *, char **); 1105 1106extern unsigned short int strtoufix16 (const char *, char **); 1107extern unsigned int strtoufix32 (const char *, char **); 1108extern unsigned long long strtoufix64 (const char *, char **); 1109 1110#endif /* _SPE_H */ 1111