spe.h revision 132718
1103285Sikob/* PowerPC E500 user include file.
2103285Sikob   Copyright (C) 2002, 2003 Free Software Foundation, Inc.
3103285Sikob   Contributed by Aldy Hernandez (aldyh@redhat.com).
4103285Sikob
5103285Sikob   This file is part of GCC.
6103285Sikob
7103285Sikob   GCC is free software; you can redistribute it and/or modify it
8103285Sikob   under the terms of the GNU General Public License as published
9103285Sikob   by the Free Software Foundation; either version 2, or (at your
10103285Sikob   option) any later version.
11103285Sikob
12103285Sikob   GCC is distributed in the hope that it will be useful, but WITHOUT
13103285Sikob   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14103285Sikob   or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
15103285Sikob   License for more details.
16103285Sikob
17103285Sikob   You should have received a copy of the GNU General Public License
18103285Sikob   along with GCC; see the file COPYING.  If not, write to the
19103285Sikob   Free Software Foundation, 59 Temple Place - Suite 330, Boston,
20103285Sikob   MA 02111-1307, USA.  */
21103285Sikob
22103285Sikob/* As a special exception, if you include this header file into source
23103285Sikob   files compiled by GCC, this header file does not by itself cause
24103285Sikob   the resulting executable to be covered by the GNU General Public
25103285Sikob   License.  This exception does not however invalidate any other
26103285Sikob   reasons why the executable file might be covered by the GNU General
27103285Sikob   Public License.  */
28103285Sikob
29103285Sikob#ifndef _SPE_H
30103285Sikob#define _SPE_H
31103285Sikob
32103285Sikob#define __vector __attribute__((vector_size(8)))
33103285Sikob
34103285Sikobtypedef int 	 		int32_t;
35103285Sikobtypedef unsigned 		uint32_t;
36103285Sikobtypedef short    		int16_t;
37103285Sikobtypedef unsigned short  	uint16_t;
38103285Sikobtypedef long long 		int64_t;
39103285Sikobtypedef unsigned long long	uint64_t;
40103285Sikob
41103285Sikobtypedef short 			__vector __ev64_s16__;
42103285Sikobtypedef unsigned short  	__vector __ev64_u16__;
43103285Sikobtypedef int 			__vector __ev64_s32__;
44103285Sikobtypedef unsigned 		__vector __ev64_u32__;
45103285Sikobtypedef long long 		__vector __ev64_s64__;
46103285Sikobtypedef unsigned long long 	__vector __ev64_u64__;
47103285Sikobtypedef float 			__vector __ev64_fs__;
48103285Sikob
49103285Sikob#define __v2si __ev64_opaque__
50103285Sikob#define __v2sf __ev64_fs__
51103285Sikob
52103285Sikob#define __ev_addw __builtin_spe_evaddw
53103285Sikob#define __ev_addiw __builtin_spe_evaddiw
54103285Sikob#define __ev_subfw(a,b) __builtin_spe_evsubfw ((b), (a))
55103285Sikob#define __ev_subw __builtin_spe_evsubfw
56103285Sikob#define __ev_subifw(a,b) __builtin_spe_evsubifw ((b), (a))
57103285Sikob#define __ev_subiw __builtin_spe_evsubifw
58103285Sikob#define __ev_abs __builtin_spe_evabs
59103285Sikob#define __ev_neg __builtin_spe_evneg
60103285Sikob#define __ev_extsb __builtin_spe_evextsb
61108281Ssimokawa#define __ev_extsh __builtin_spe_evextsh
62103285Sikob#define __ev_and __builtin_spe_evand
63108281Ssimokawa#define __ev_or __builtin_spe_evor
64103285Sikob#define __ev_xor __builtin_spe_evxor
65103285Sikob#define __ev_nand __builtin_spe_evnand
66103285Sikob#define __ev_nor __builtin_spe_evnor
67103285Sikob#define __ev_eqv __builtin_spe_eveqv
68103285Sikob#define __ev_andc __builtin_spe_evandc
69103285Sikob#define __ev_orc __builtin_spe_evorc
70103285Sikob#define __ev_rlw __builtin_spe_evrlw
71103285Sikob#define __ev_rlwi __builtin_spe_evrlwi
72103285Sikob#define __ev_slw __builtin_spe_evslw
73103285Sikob#define __ev_slwi __builtin_spe_evslwi
74103285Sikob#define __ev_srws __builtin_spe_evsrws
75103285Sikob#define __ev_srwu __builtin_spe_evsrwu
76103285Sikob#define __ev_srwis __builtin_spe_evsrwis
77103285Sikob#define __ev_srwiu __builtin_spe_evsrwiu
78103285Sikob#define __ev_cntlzw __builtin_spe_evcntlzw
79103285Sikob#define __ev_cntlsw __builtin_spe_evcntlsw
80103285Sikob#define __ev_rndw __builtin_spe_evrndw
81103285Sikob#define __ev_mergehi __builtin_spe_evmergehi
82103285Sikob#define __ev_mergelo __builtin_spe_evmergelo
83103285Sikob#define __ev_mergelohi __builtin_spe_evmergelohi
84103285Sikob#define __ev_mergehilo __builtin_spe_evmergehilo
85103285Sikob#define __ev_splati __builtin_spe_evsplati
86103285Sikob#define __ev_splatfi __builtin_spe_evsplatfi
87106543Ssimokawa#define __ev_divws __builtin_spe_evdivws
88103285Sikob#define __ev_divwu __builtin_spe_evdivwu
89106543Ssimokawa#define __ev_mra __builtin_spe_evmra
90103285Sikob
91105620Ssimokawa#define __brinc __builtin_spe_brinc
92103285Sikob
93103285Sikob/* Loads.  */
94103285Sikob
95103285Sikob#define __ev_lddx __builtin_spe_evlddx
96103285Sikob#define __ev_ldwx __builtin_spe_evldwx
97103285Sikob#define __ev_ldhx __builtin_spe_evldhx
98108642Ssimokawa#define __ev_lwhex __builtin_spe_evlwhex
99108642Ssimokawa#define __ev_lwhoux __builtin_spe_evlwhoux
100103285Sikob#define __ev_lwhosx __builtin_spe_evlwhosx
101103285Sikob#define __ev_lwwsplatx __builtin_spe_evlwwsplatx
102103285Sikob#define __ev_lwhsplatx __builtin_spe_evlwhsplatx
103103285Sikob#define __ev_lhhesplatx __builtin_spe_evlhhesplatx
104103285Sikob#define __ev_lhhousplatx __builtin_spe_evlhhousplatx
105103285Sikob#define __ev_lhhossplatx __builtin_spe_evlhhossplatx
106103285Sikob#define __ev_ldd __builtin_spe_evldd
107103285Sikob#define __ev_ldw __builtin_spe_evldw
108103285Sikob#define __ev_ldh __builtin_spe_evldh
109103285Sikob#define __ev_lwhe __builtin_spe_evlwhe
110103285Sikob#define __ev_lwhou __builtin_spe_evlwhou
111103285Sikob#define __ev_lwhos __builtin_spe_evlwhos
112103285Sikob#define __ev_lwwsplat __builtin_spe_evlwwsplat
113103285Sikob#define __ev_lwhsplat __builtin_spe_evlwhsplat
114106813Ssimokawa#define __ev_lhhesplat __builtin_spe_evlhhesplat
115106813Ssimokawa#define __ev_lhhousplat __builtin_spe_evlhhousplat
116106813Ssimokawa#define __ev_lhhossplat __builtin_spe_evlhhossplat
117103285Sikob
118103285Sikob/* Stores.  */
119103285Sikob
120103285Sikob#define __ev_stddx __builtin_spe_evstddx
121103285Sikob#define __ev_stdwx __builtin_spe_evstdwx
122103285Sikob#define __ev_stdhx __builtin_spe_evstdhx
123103285Sikob#define __ev_stwwex __builtin_spe_evstwwex
124103285Sikob#define __ev_stwwox __builtin_spe_evstwwox
125103285Sikob#define __ev_stwhex __builtin_spe_evstwhex
126103285Sikob#define __ev_stwhox __builtin_spe_evstwhox
127103285Sikob#define __ev_stdd __builtin_spe_evstdd
128103285Sikob#define __ev_stdw __builtin_spe_evstdw
129103285Sikob#define __ev_stdh __builtin_spe_evstdh
130103285Sikob#define __ev_stwwe __builtin_spe_evstwwe
131103285Sikob#define __ev_stwwo __builtin_spe_evstwwo
132103285Sikob#define __ev_stwhe __builtin_spe_evstwhe
133103285Sikob#define __ev_stwho __builtin_spe_evstwho
134103285Sikob
135103285Sikob/* Fixed point complex.  */
136103285Sikob
137103285Sikob#define __ev_mhossf __builtin_spe_evmhossf
138103285Sikob#define __ev_mhosmf __builtin_spe_evmhosmf
139103285Sikob#define __ev_mhosmi __builtin_spe_evmhosmi
140103285Sikob#define __ev_mhoumi __builtin_spe_evmhoumi
141103285Sikob#define __ev_mhessf __builtin_spe_evmhessf
142103285Sikob#define __ev_mhesmf __builtin_spe_evmhesmf
143103285Sikob#define __ev_mhesmi __builtin_spe_evmhesmi
144103285Sikob#define __ev_mheumi __builtin_spe_evmheumi
145103285Sikob#define __ev_mhossfa __builtin_spe_evmhossfa
146103285Sikob#define __ev_mhosmfa __builtin_spe_evmhosmfa
147103285Sikob#define __ev_mhosmia __builtin_spe_evmhosmia
148103285Sikob#define __ev_mhoumia __builtin_spe_evmhoumia
149103285Sikob#define __ev_mhessfa __builtin_spe_evmhessfa
150103285Sikob#define __ev_mhesmfa __builtin_spe_evmhesmfa
151103285Sikob#define __ev_mhesmia __builtin_spe_evmhesmia
152103285Sikob#define __ev_mheumia __builtin_spe_evmheumia
153103285Sikob
154103285Sikob#define __ev_mhoumf __ev_mhoumi
155103285Sikob#define __ev_mheumf __ev_mheumi
156103285Sikob#define __ev_mhoumfa __ev_mhoumia
157103285Sikob#define __ev_mheumfa __ev_mheumia
158103285Sikob
159103285Sikob#define __ev_mhossfaaw __builtin_spe_evmhossfaaw
160103285Sikob#define __ev_mhossiaaw __builtin_spe_evmhossiaaw
161103285Sikob#define __ev_mhosmfaaw __builtin_spe_evmhosmfaaw
162103285Sikob#define __ev_mhosmiaaw __builtin_spe_evmhosmiaaw
163103285Sikob#define __ev_mhousiaaw __builtin_spe_evmhousiaaw
164103285Sikob#define __ev_mhoumiaaw __builtin_spe_evmhoumiaaw
165103285Sikob#define __ev_mhessfaaw __builtin_spe_evmhessfaaw
166103285Sikob#define __ev_mhessiaaw __builtin_spe_evmhessiaaw
167103285Sikob#define __ev_mhesmfaaw __builtin_spe_evmhesmfaaw
168103285Sikob#define __ev_mhesmiaaw __builtin_spe_evmhesmiaaw
169103285Sikob#define __ev_mheusiaaw __builtin_spe_evmheusiaaw
170103285Sikob#define __ev_mheumiaaw __builtin_spe_evmheumiaaw
171103285Sikob
172103285Sikob#define __ev_mhousfaaw __ev_mhousiaaw
173103285Sikob#define __ev_mhoumfaaw __ev_mhoumiaaw
174103285Sikob#define __ev_mheusfaaw __ev_mheusiaaw
175103285Sikob#define __ev_mheumfaaw __ev_mheumiaaw
176103285Sikob
177103285Sikob#define __ev_mhossfanw __builtin_spe_evmhossfanw
178103285Sikob#define __ev_mhossianw __builtin_spe_evmhossianw
179103285Sikob#define __ev_mhosmfanw __builtin_spe_evmhosmfanw
180103285Sikob#define __ev_mhosmianw __builtin_spe_evmhosmianw
181103285Sikob#define __ev_mhousianw __builtin_spe_evmhousianw
182103285Sikob#define __ev_mhoumianw __builtin_spe_evmhoumianw
183103285Sikob#define __ev_mhessfanw __builtin_spe_evmhessfanw
184103285Sikob#define __ev_mhessianw __builtin_spe_evmhessianw
185103285Sikob#define __ev_mhesmfanw __builtin_spe_evmhesmfanw
186103285Sikob#define __ev_mhesmianw __builtin_spe_evmhesmianw
187103285Sikob#define __ev_mheusianw __builtin_spe_evmheusianw
188103285Sikob#define __ev_mheumianw __builtin_spe_evmheumianw
189103285Sikob
190103285Sikob#define __ev_mhousfanw __ev_mhousianw
191103285Sikob#define __ev_mhoumfanw __ev_mhoumianw
192103285Sikob#define __ev_mheusfanw __ev_mheusianw
193103285Sikob#define __ev_mheumfanw __ev_mheumianw
194103285Sikob
195103285Sikob#define __ev_mhogsmfaa __builtin_spe_evmhogsmfaa
196103285Sikob#define __ev_mhogsmiaa __builtin_spe_evmhogsmiaa
197103285Sikob#define __ev_mhogumiaa __builtin_spe_evmhogumiaa
198103285Sikob#define __ev_mhegsmfaa __builtin_spe_evmhegsmfaa
199103285Sikob#define __ev_mhegsmiaa __builtin_spe_evmhegsmiaa
200103285Sikob#define __ev_mhegumiaa __builtin_spe_evmhegumiaa
201103285Sikob
202103285Sikob#define __ev_mhogumfaa __ev_mhogumiaa
203103485Sikob#define __ev_mhegumfaa __ev_mhegumiaa
204103285Sikob
205103285Sikob#define __ev_mhogsmfan __builtin_spe_evmhogsmfan
206103285Sikob#define __ev_mhogsmian __builtin_spe_evmhogsmian
207103285Sikob#define __ev_mhogumian __builtin_spe_evmhogumian
208103285Sikob#define __ev_mhegsmfan __builtin_spe_evmhegsmfan
209103285Sikob#define __ev_mhegsmian __builtin_spe_evmhegsmian
210103285Sikob#define __ev_mhegumian __builtin_spe_evmhegumian
211103285Sikob
212103285Sikob#define __ev_mhogumfan __ev_mhogumian
213103285Sikob#define __ev_mhegumfan __ev_mhegumian
214103285Sikob
215103285Sikob#define __ev_mwhssf __builtin_spe_evmwhssf
216103285Sikob#define __ev_mwhsmf __builtin_spe_evmwhsmf
217103285Sikob#define __ev_mwhsmi __builtin_spe_evmwhsmi
218103285Sikob#define __ev_mwhumi __builtin_spe_evmwhumi
219103285Sikob#define __ev_mwhssfa __builtin_spe_evmwhssfa
220103285Sikob#define __ev_mwhsmfa __builtin_spe_evmwhsmfa
221103285Sikob#define __ev_mwhsmia __builtin_spe_evmwhsmia
222103285Sikob#define __ev_mwhumia __builtin_spe_evmwhumia
223103285Sikob
224103285Sikob#define __ev_mwhumf __ev_mwhumi
225103285Sikob#define __ev_mwhumfa __ev_mwhumia
226103285Sikob
227103285Sikob#define __ev_mwlumi __builtin_spe_evmwlumi
228103285Sikob#define __ev_mwlumia __builtin_spe_evmwlumia
229103285Sikob#define __ev_mwlumiaaw __builtin_spe_evmwlumiaaw
230103285Sikob
231103285Sikob#define __ev_mwlssiaaw __builtin_spe_evmwlssiaaw
232103285Sikob#define __ev_mwlsmiaaw __builtin_spe_evmwlsmiaaw
233103285Sikob#define __ev_mwlusiaaw __builtin_spe_evmwlusiaaw
234103285Sikob#define __ev_mwlusiaaw __builtin_spe_evmwlusiaaw
235103285Sikob
236103285Sikob#define __ev_mwlssianw __builtin_spe_evmwlssianw
237103285Sikob#define __ev_mwlsmianw __builtin_spe_evmwlsmianw
238103285Sikob#define __ev_mwlusianw __builtin_spe_evmwlusianw
239103285Sikob#define __ev_mwlumianw __builtin_spe_evmwlumianw
240103285Sikob
241103285Sikob#define __ev_mwssf __builtin_spe_evmwssf
242103285Sikob#define __ev_mwsmf __builtin_spe_evmwsmf
243103285Sikob#define __ev_mwsmi __builtin_spe_evmwsmi
244103285Sikob#define __ev_mwumi __builtin_spe_evmwumi
245103285Sikob#define __ev_mwssfa __builtin_spe_evmwssfa
246103285Sikob#define __ev_mwsmfa __builtin_spe_evmwsmfa
247103285Sikob#define __ev_mwsmia __builtin_spe_evmwsmia
248103285Sikob#define __ev_mwumia __builtin_spe_evmwumia
249103285Sikob
250103285Sikob#define __ev_mwumf __ev_mwumi
251103285Sikob#define __ev_mwumfa __ev_mwumia
252103285Sikob
253103285Sikob#define __ev_mwssfaa __builtin_spe_evmwssfaa
254103285Sikob#define __ev_mwsmfaa __builtin_spe_evmwsmfaa
255103285Sikob#define __ev_mwsmiaa __builtin_spe_evmwsmiaa
256103285Sikob#define __ev_mwumiaa __builtin_spe_evmwumiaa
257103285Sikob
258103285Sikob#define __ev_mwumfaa __ev_mwumiaa
259103285Sikob
260103285Sikob#define __ev_mwssfan __builtin_spe_evmwssfan
261103285Sikob#define __ev_mwsmfan __builtin_spe_evmwsmfan
262103285Sikob#define __ev_mwsmian __builtin_spe_evmwsmian
263103285Sikob#define __ev_mwumian __builtin_spe_evmwumian
264103285Sikob
265103285Sikob#define __ev_mwumfan __ev_mwumian
266103285Sikob
267103285Sikob#define __ev_addssiaaw __builtin_spe_evaddssiaaw
268103285Sikob#define __ev_addsmiaaw __builtin_spe_evaddsmiaaw
269103285Sikob#define __ev_addusiaaw __builtin_spe_evaddusiaaw
270103285Sikob#define __ev_addumiaaw __builtin_spe_evaddumiaaw
271103285Sikob
272103285Sikob#define __ev_addusfaaw __ev_addusiaaw
273103285Sikob#define __ev_addumfaaw __ev_addumiaaw
274103285Sikob#define __ev_addsmfaaw __ev_addsmiaaw
275103285Sikob#define __ev_addssfaaw __ev_addssiaaw
276103285Sikob
277103285Sikob#define __ev_subfssiaaw __builtin_spe_evsubfssiaaw
278103285Sikob#define __ev_subfsmiaaw __builtin_spe_evsubfsmiaaw
279103285Sikob#define __ev_subfusiaaw __builtin_spe_evsubfusiaaw
280103285Sikob#define __ev_subfumiaaw __builtin_spe_evsubfumiaaw
281103285Sikob
282103285Sikob#define __ev_subfusfaaw __ev_subfusiaaw
283103285Sikob#define __ev_subfumfaaw __ev_subfumiaaw
284103285Sikob#define __ev_subfsmfaaw __ev_subfsmiaaw
285103285Sikob#define __ev_subfssfaaw __ev_subfssiaaw
286103285Sikob
287103285Sikob/* Floating Point SIMD Instructions  */
288103285Sikob
289103285Sikob#define __ev_fsabs __builtin_spe_evfsabs
290103285Sikob#define __ev_fsnabs __builtin_spe_evfsnabs
291103285Sikob#define __ev_fsneg __builtin_spe_evfsneg
292103285Sikob#define __ev_fsadd __builtin_spe_evfsadd
293103285Sikob#define __ev_fssub __builtin_spe_evfssub
294103285Sikob#define __ev_fsmul __builtin_spe_evfsmul
295103285Sikob#define __ev_fsdiv __builtin_spe_evfsdiv
296103285Sikob#define __ev_fscfui __builtin_spe_evfscfui
297103285Sikob#define __ev_fscfsi __builtin_spe_evfscfsi
298103285Sikob#define __ev_fscfuf __builtin_spe_evfscfuf
299103285Sikob#define __ev_fscfsf __builtin_spe_evfscfsf
300103285Sikob#define __ev_fsctui __builtin_spe_evfsctui
301103285Sikob#define __ev_fsctsi __builtin_spe_evfsctsi
302103285Sikob#define __ev_fsctuf __builtin_spe_evfsctuf
303103285Sikob#define __ev_fsctsf __builtin_spe_evfsctsf
304103285Sikob#define __ev_fsctuiz __builtin_spe_evfsctuiz
305103285Sikob#define __ev_fsctsiz __builtin_spe_evfsctsiz
306106810Ssimokawa
307106790Ssimokawa/* NOT SUPPORTED IN FIRST e500, support via two instructions:  */
308103285Sikob
309103285Sikob#define __ev_mwhusfaaw  __ev_mwhusiaaw
310103285Sikob#define __ev_mwhumfaaw  __ev_mwhumiaaw
311103285Sikob#define __ev_mwhusfanw  __ev_mwhusianw
312103285Sikob#define __ev_mwhumfanw  __ev_mwhumianw
313103285Sikob#define __ev_mwhgumfaa  __ev_mwhgumiaa
314103285Sikob#define __ev_mwhgumfan  __ev_mwhgumian
315103285Sikob
316106810Ssimokawa#define __ev_mwhgssfaa __internal_ev_mwhgssfaa
317106810Ssimokawa#define __ev_mwhgsmfaa __internal_ev_mwhgsmfaa
318106810Ssimokawa#define __ev_mwhgsmiaa __internal_ev_mwhgsmiaa
319103285Sikob#define __ev_mwhgumiaa __internal_ev_mwhgumiaa
320106813Ssimokawa#define __ev_mwhgssfan __internal_ev_mwhgssfan
321103285Sikob#define __ev_mwhgsmfan __internal_ev_mwhgsmfan
322103285Sikob#define __ev_mwhgsmian __internal_ev_mwhgsmian
323103285Sikob#define __ev_mwhgumian __internal_ev_mwhgumian
324103285Sikob#define __ev_mwhssiaaw __internal_ev_mwhssiaaw
325103285Sikob#define __ev_mwhssfaaw __internal_ev_mwhssfaaw
326103285Sikob#define __ev_mwhsmfaaw __internal_ev_mwhsmfaaw
327103285Sikob#define __ev_mwhsmiaaw __internal_ev_mwhsmiaaw
328103285Sikob#define __ev_mwhusiaaw __internal_ev_mwhusiaaw
329103285Sikob#define __ev_mwhumiaaw __internal_ev_mwhumiaaw
330103285Sikob#define __ev_mwhssfanw __internal_ev_mwhssfanw
331103285Sikob#define __ev_mwhssianw __internal_ev_mwhssianw
332103285Sikob#define __ev_mwhsmfanw __internal_ev_mwhsmfanw
333103285Sikob#define __ev_mwhsmianw __internal_ev_mwhsmianw
334103285Sikob#define __ev_mwhusianw __internal_ev_mwhusianw
335103285Sikob#define __ev_mwhumianw __internal_ev_mwhumianw
336103285Sikob
337103285Sikobstatic inline __ev64_opaque__
338103285Sikob__internal_ev_mwhssfaaw (__ev64_opaque__ a, __ev64_opaque__ b)
339103285Sikob{
340103285Sikob  __ev64_opaque__ t;
341103285Sikob
342103285Sikob  t = __ev_mwhssf (a, b);
343103285Sikob  return __ev_addssiaaw (t);
344103285Sikob}
345103285Sikob
346103285Sikobstatic inline __ev64_opaque__
347103285Sikob__internal_ev_mwhssiaaw (__ev64_opaque__ a, __ev64_opaque__ b)
348103285Sikob{
349103285Sikob  __ev64_opaque__ t;
350103285Sikob
351103285Sikob  t = __ev_mwhsmi (a, b);
352103285Sikob  return __ev_addssiaaw (t);
353103285Sikob}
354103285Sikob
355103285Sikobstatic inline __ev64_opaque__
356103285Sikob__internal_ev_mwhsmfaaw (__ev64_opaque__ a, __ev64_opaque__ b)
357103285Sikob{
358103285Sikob  __ev64_opaque__ t;
359103285Sikob
360103285Sikob  t = __ev_mwhsmf (a, b);
361103285Sikob  return __ev_addsmiaaw (t);
362103285Sikob}
363103285Sikob
364103285Sikobstatic inline __ev64_opaque__
365103285Sikob__internal_ev_mwhsmiaaw (__ev64_opaque__ a, __ev64_opaque__ b)
366106790Ssimokawa{
367103285Sikob  __ev64_opaque__ t;
368103285Sikob
369103285Sikob  t = __ev_mwhsmi (a, b);
370103285Sikob  return __ev_addsmiaaw (t);
371103285Sikob}
372103285Sikob
373103285Sikobstatic inline __ev64_opaque__
374103285Sikob__internal_ev_mwhusiaaw (__ev64_opaque__ a, __ev64_opaque__ b)
375103285Sikob{
376103285Sikob  __ev64_opaque__ t;
377103285Sikob
378103285Sikob  t = __ev_mwhumi (a, b);
379103285Sikob  return __ev_addusiaaw (t);
380103285Sikob}
381103285Sikob
382103285Sikobstatic inline __ev64_opaque__
383103285Sikob__internal_ev_mwhumiaaw (__ev64_opaque__ a, __ev64_opaque__ b)
384103285Sikob{
385103285Sikob  __ev64_opaque__ t;
386103285Sikob
387103285Sikob  t = __ev_mwhumi (a, b);
388103285Sikob  return __ev_addumiaaw (t);
389103285Sikob}
390103285Sikob
391103285Sikobstatic inline __ev64_opaque__
392103285Sikob__internal_ev_mwhssfanw (__ev64_opaque__ a, __ev64_opaque__ b)
393103285Sikob{
394103285Sikob  __ev64_opaque__ t;
395103285Sikob
396103285Sikob  t = __ev_mwhssf (a, b);
397103285Sikob  return __ev_subfssiaaw (t);
398103285Sikob}
399103285Sikob
400103285Sikobstatic inline __ev64_opaque__
401103285Sikob__internal_ev_mwhssianw (__ev64_opaque__ a, __ev64_opaque__ b)
402103285Sikob{
403103285Sikob  __ev64_opaque__ t;
404103285Sikob
405103285Sikob  t = __ev_mwhsmi (a, b);
406103285Sikob  return __ev_subfssiaaw (t);
407106815Ssimokawa}
408103285Sikob
409103285Sikobstatic inline __ev64_opaque__
410103285Sikob__internal_ev_mwhsmfanw (__ev64_opaque__ a, __ev64_opaque__ b)
411103285Sikob{
412103285Sikob  __ev64_opaque__ t;
413103285Sikob
414103285Sikob  t = __ev_mwhsmf (a, b);
415103285Sikob  return __ev_subfsmiaaw (t);
416103285Sikob}
417103285Sikob
418103285Sikobstatic inline __ev64_opaque__
419103285Sikob__internal_ev_mwhsmianw (__ev64_opaque__ a, __ev64_opaque__ b)
420103285Sikob{
421103285Sikob  __ev64_opaque__ t;
422103285Sikob
423103285Sikob  t = __ev_mwhsmi (a, b);
424103285Sikob  return __ev_subfsmiaaw (t);
425103285Sikob}
426103285Sikob
427103285Sikobstatic inline __ev64_opaque__
428103285Sikob__internal_ev_mwhusianw (__ev64_opaque__ a, __ev64_opaque__ b)
429103285Sikob{
430103285Sikob  __ev64_opaque__ t;
431103285Sikob
432103285Sikob  t = __ev_mwhumi (a, b);
433103285Sikob  return __ev_subfusiaaw (t);
434103285Sikob}
435103285Sikob
436103285Sikobstatic inline __ev64_opaque__
437103285Sikob__internal_ev_mwhumianw (__ev64_opaque__ a, __ev64_opaque__ b)
438103285Sikob{
439103285Sikob  __ev64_opaque__ t;
440103285Sikob
441106790Ssimokawa  t = __ev_mwhumi (a, b);
442106790Ssimokawa  return __ev_subfumiaaw (t);
443106790Ssimokawa}
444103285Sikob
445103285Sikobstatic inline __ev64_opaque__
446103285Sikob__internal_ev_mwhgssfaa (__ev64_opaque__ a, __ev64_opaque__ b)
447103285Sikob{
448103285Sikob  __ev64_opaque__ t;
449103285Sikob
450103285Sikob  t = __ev_mwhssf (a, b);
451103285Sikob  return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1}));
452103285Sikob}
453103285Sikob
454103285Sikobstatic inline __ev64_opaque__
455103285Sikob__internal_ev_mwhgsmfaa (__ev64_opaque__ a, __ev64_opaque__ b)
456103285Sikob{
457103285Sikob  __ev64_opaque__ t;
458103285Sikob
459103285Sikob  t = __ev_mwhsmf (a, b);
460103285Sikob  return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1}));
461103285Sikob}
462103285Sikob
463103285Sikobstatic inline __ev64_opaque__
464103285Sikob__internal_ev_mwhgsmiaa (__ev64_opaque__ a, __ev64_opaque__ b)
465103285Sikob{
466103285Sikob  __ev64_opaque__ t;
467103285Sikob
468103285Sikob  t = __ev_mwhsmi (a, b);
469103285Sikob  return __ev_mwsmiaa (t, ((__ev64_s32__){1, 1}));
470103285Sikob}
471103285Sikob
472103285Sikobstatic inline __ev64_opaque__
473103285Sikob__internal_ev_mwhgumiaa (__ev64_opaque__ a, __ev64_opaque__ b)
474103285Sikob{
475106790Ssimokawa  __ev64_opaque__ t;
476103285Sikob
477103285Sikob  t = __ev_mwhumi (a, b);
478103285Sikob  return __ev_mwumiaa (t, ((__ev64_s32__){1, 1}));
479108281Ssimokawa}
480103285Sikob
481103285Sikobstatic inline __ev64_opaque__
482106790Ssimokawa__internal_ev_mwhgssfan (__ev64_opaque__ a, __ev64_opaque__ b)
483103285Sikob{
484103285Sikob  __ev64_opaque__ t;
485103285Sikob
486103285Sikob  t = __ev_mwhssf (a, b);
487103285Sikob  return __ev_mwsmian (t, ((__ev64_s32__){1, 1}));
488103285Sikob}
489103285Sikob
490103285Sikobstatic inline __ev64_opaque__
491103285Sikob__internal_ev_mwhgsmfan (__ev64_opaque__ a, __ev64_opaque__ b)
492103285Sikob{
493103285Sikob  __ev64_opaque__ t;
494103285Sikob
495103285Sikob  t = __ev_mwhsmf (a, b);
496103285Sikob  return __ev_mwsmian (t, ((__ev64_s32__){1, 1}));
497103285Sikob}
498103285Sikob
499103285Sikobstatic inline __ev64_opaque__
500103285Sikob__internal_ev_mwhgsmian (__ev64_opaque__ a, __ev64_opaque__ b)
501103285Sikob{
502103285Sikob  __ev64_opaque__ t;
503103285Sikob
504103285Sikob  t = __ev_mwhsmi (a, b);
505103285Sikob  return __ev_mwsmian (t, ((__ev64_s32__){1, 1}));
506108276Ssimokawa}
507103285Sikob
508103285Sikobstatic inline __ev64_opaque__
509103285Sikob__internal_ev_mwhgumian (__ev64_opaque__ a, __ev64_opaque__ b)
510103285Sikob{
511103285Sikob  __ev64_opaque__ t;
512103285Sikob
513103285Sikob  t = __ev_mwhumi (a, b);
514103285Sikob  return __ev_mwumian (t, ((__ev64_s32__){1, 1}));
515103285Sikob}
516103285Sikob
517103285Sikob/* END OF NOT SUPPORTED */
518108276Ssimokawa
519103285Sikob/* __ev_create* functions.  */
520103285Sikob
521103285Sikob#define __ev_create_ufix32_u32 __ev_create_u32
522103285Sikob#define __ev_create_sfix32_s32 __ev_create_s32
523103285Sikob
524103285Sikobstatic inline __ev64_opaque__
525103285Sikob__ev_create_s16 (int16_t a, int16_t b, int16_t c, int16_t d)
526103285Sikob{
527103285Sikob  union
528103285Sikob  {
529103285Sikob    __ev64_opaque__ v;
530103285Sikob    int16_t i[4];
531103285Sikob  } u;
532103285Sikob
533103285Sikob  u.i[0] = a;
534103285Sikob  u.i[1] = b;
535103285Sikob  u.i[2] = c;
536103285Sikob  u.i[3] = d;
537103285Sikob
538103285Sikob  return u.v;
539103285Sikob}
540103285Sikob
541103285Sikobstatic inline __ev64_opaque__
542103285Sikob__ev_create_u16 (uint16_t a, uint16_t b, uint16_t c, uint16_t d)
543103285Sikob
544103285Sikob{
545103285Sikob  union
546103285Sikob  {
547103285Sikob    __ev64_opaque__ v;
548103285Sikob    uint16_t i[4];
549103285Sikob  } u;
550103285Sikob
551103285Sikob  u.i[0] = a;
552103285Sikob  u.i[1] = b;
553103285Sikob  u.i[2] = c;
554103285Sikob  u.i[3] = d;
555103285Sikob
556103285Sikob  return u.v;
557106790Ssimokawa}
558103285Sikob
559103285Sikobstatic inline __ev64_opaque__
560103285Sikob__ev_create_s32 (int32_t a, int32_t b)
561103285Sikob{
562103285Sikob  union
563103285Sikob  {
564103285Sikob    __ev64_opaque__ v;
565103285Sikob   int32_t i[2];
566103285Sikob  } u;
567106790Ssimokawa
568103285Sikob  u.i[0] = a;
569103285Sikob  u.i[1] = b;
570103285Sikob
571103285Sikob  return u.v;
572103285Sikob}
573103285Sikob
574103285Sikobstatic inline __ev64_opaque__
575103285Sikob__ev_create_u32 (uint32_t a, uint32_t b)
576103285Sikob{
577103285Sikob  union
578103285Sikob  {
579103285Sikob    __ev64_opaque__ v;
580103285Sikob    uint32_t i[2];
581103285Sikob  } u;
582103285Sikob
583103285Sikob  u.i[0] = a;
584103285Sikob  u.i[1] = b;
585103285Sikob
586103285Sikob  return u.v;
587103285Sikob}
588103285Sikob
589103285Sikobstatic inline __ev64_opaque__
590103285Sikob__ev_create_fs (float a, float b)
591106790Ssimokawa{
592103285Sikob  union
593106790Ssimokawa  {
594103285Sikob    __ev64_opaque__ v;
595106790Ssimokawa    float f[2];
596106790Ssimokawa  } u;
597103285Sikob
598103285Sikob  u.f[0] = a;
599103285Sikob  u.f[1] = b;
600103285Sikob
601103285Sikob  return u.v;
602103285Sikob}
603103285Sikob
604103285Sikobstatic inline __ev64_opaque__
605103285Sikob__ev_create_sfix32_fs (float a, float b)
606103285Sikob{
607103285Sikob  __ev64_opaque__ ev;
608103285Sikob
609103285Sikob  ev = (__ev64_opaque__) __ev_create_fs (a, b);
610103285Sikob  return (__ev64_opaque__) __builtin_spe_evfsctsf ((__v2sf) ev);
611103285Sikob}
612103285Sikob
613103285Sikobstatic inline __ev64_opaque__
614103285Sikob__ev_create_ufix32_fs (float a, float b)
615103285Sikob{
616103285Sikob  __ev64_opaque__ ev;
617103285Sikob
618103285Sikob  ev = (__ev64_opaque__) __ev_create_fs (a, b);
619103285Sikob  return (__ev64_opaque__) __builtin_spe_evfsctuf ((__v2sf) ev);
620103285Sikob}
621103285Sikob
622103285Sikobstatic inline __ev64_opaque__
623103285Sikob__ev_create_s64 (int64_t a)
624103285Sikob{
625103285Sikob  union
626103285Sikob  {
627103285Sikob    __ev64_opaque__ v;
628103285Sikob    int64_t i;
629103285Sikob  } u;
630103285Sikob
631103285Sikob  u.i = a;
632103285Sikob  return u.v;
633103285Sikob}
634103285Sikob
635103285Sikobstatic inline __ev64_opaque__
636103285Sikob__ev_create_u64 (uint64_t a)
637103285Sikob{
638103285Sikob  union
639103285Sikob  {
640103285Sikob    __ev64_opaque__ v;
641103285Sikob    uint64_t i;
642103285Sikob  } u;
643103285Sikob
644103285Sikob  u.i = a;
645103285Sikob  return u.v;
646103285Sikob}
647103285Sikob
648103285Sikobstatic inline uint64_t
649103285Sikob__ev_convert_u64 (__ev64_opaque__ a)
650103285Sikob{
651103285Sikob  return (uint64_t) a;
652103285Sikob}
653103285Sikob
654103285Sikobstatic inline int64_t
655103285Sikob__ev_convert_s64 (__ev64_opaque__ a)
656103285Sikob{
657103285Sikob  return (int64_t) a;
658103285Sikob}
659103285Sikob
660103285Sikob/* __ev_get_* functions.  */
661103285Sikob
662103285Sikob#define __ev_get_upper_u32(a) __ev_get_u32_internal ((a), 0)
663103285Sikob#define __ev_get_lower_u32(a) __ev_get_u32_internal ((a), 1)
664103285Sikob#define __ev_get_upper_s32(a) __ev_get_s32_internal ((a), 0)
665103285Sikob#define __ev_get_lower_s32(a) __ev_get_s32_internal ((a), 1)
666103285Sikob#define __ev_get_upper_fs(a) __ev_get_fs_internal ((a), 0)
667103285Sikob#define __ev_get_lower_fs(a) __ev_get_fs_internal ((a), 1)
668103285Sikob#define __ev_get_upper_ufix32_u32 __ev_get_upper_u32
669103285Sikob#define __ev_get_lower_ufix32_u32 __ev_get_lower_u32
670103285Sikob#define __ev_get_upper_sfix32_s32 __ev_get_upper_s32
671103285Sikob#define __ev_get_lower_sfix32_s32 __ev_get_lower_s32
672103285Sikob#define __ev_get_upper_sfix32_fs(a)  __ev_get_sfix32_fs ((a), 0)
673103285Sikob#define __ev_get_lower_sfix32_fs(a)  __ev_get_sfix32_fs ((a), 1)
674103285Sikob#define __ev_get_upper_ufix32_fs(a)  __ev_get_ufix32_fs ((a), 0)
675103285Sikob#define __ev_get_lower_ufix32_fs(a)  __ev_get_ufix32_fs ((a), 1)
676103285Sikob
677103285Sikob#define __ev_get_u32 __ev_get_u32_internal
678103285Sikob#define __ev_get_s32 __ev_get_s32_internal
679103285Sikob#define __ev_get_fs __ev_get_fs_internal
680103285Sikob#define __ev_get_u16 __ev_get_u16_internal
681103285Sikob#define __ev_get_s16 __ev_get_s16_internal
682103285Sikob
683103285Sikob#define __ev_get_ufix32_u32 __ev_get_u32
684103285Sikob#define __ev_get_sfix32_s32 __ev_get_s32
685103285Sikob#define __ev_get_ufix32_fs     __ev_get_ufix32_fs_internal
686106790Ssimokawa#define __ev_get_sfix32_fs     __ev_get_sfix32_fs_internal
687103285Sikob
688106790Ssimokawastatic inline uint32_t
689103285Sikob__ev_get_u32_internal (__ev64_opaque__ a, uint32_t pos)
690103285Sikob{
691106543Ssimokawa  union
692106543Ssimokawa  {
693103285Sikob    __ev64_opaque__ v;
694103285Sikob    uint32_t i[2];
695106543Ssimokawa  } u;
696103285Sikob
697103285Sikob  u.v = a;
698103285Sikob  return u.i[pos];
699103285Sikob}
700103285Sikob
701103285Sikobstatic inline int32_t
702103285Sikob__ev_get_s32_internal (__ev64_opaque__ a, uint32_t pos)
703103285Sikob{
704103285Sikob  union
705103285Sikob  {
706103285Sikob    __ev64_opaque__ v;
707103285Sikob    int32_t i[2];
708103285Sikob  } u;
709103285Sikob
710103285Sikob  u.v = a;
711103285Sikob  return u.i[pos];
712103285Sikob}
713103285Sikob
714103285Sikobstatic inline float
715103285Sikob__ev_get_fs_internal (__ev64_opaque__ a, uint32_t pos)
716103285Sikob{
717103285Sikob  union
718103285Sikob  {
719103285Sikob    __ev64_opaque__ v;
720103285Sikob    float f[2];
721103285Sikob  } u;
722103285Sikob
723103285Sikob  u.v = a;
724103285Sikob  return u.f[pos];
725103285Sikob}
726103285Sikob
727103285Sikobstatic inline float
728103285Sikob__ev_get_sfix32_fs_internal (__ev64_opaque__ a, uint32_t pos)
729103285Sikob{
730103285Sikob  __ev64_fs__ v;
731103285Sikob
732103285Sikob  v = __builtin_spe_evfscfsf ((__v2sf) a);
733103285Sikob  return __ev_get_fs_internal ((__ev64_opaque__) v, pos);
734103285Sikob}
735103285Sikob
736103285Sikobstatic inline float
737103285Sikob__ev_get_ufix32_fs_internal (__ev64_opaque__ a, uint32_t pos)
738103285Sikob{
739103285Sikob  __ev64_fs__ v;
740103285Sikob
741103285Sikob  v = __builtin_spe_evfscfuf ((__v2sf) a);
742103285Sikob  return __ev_get_fs_internal ((__ev64_opaque__) v, pos);
743103285Sikob}
744103285Sikob
745103285Sikobstatic inline uint16_t
746103285Sikob__ev_get_u16_internal (__ev64_opaque__ a, uint32_t pos)
747103285Sikob{
748103285Sikob  union
749103285Sikob  {
750103285Sikob    __ev64_opaque__ v;
751103285Sikob    uint16_t i[4];
752103285Sikob  } u;
753103285Sikob
754103285Sikob  u.v = a;
755103285Sikob  return u.i[pos];
756103285Sikob}
757103285Sikob
758103285Sikobstatic inline int16_t
759103285Sikob__ev_get_s16_internal (__ev64_opaque__ a, uint32_t pos)
760103285Sikob{
761103285Sikob  union
762103285Sikob  {
763103285Sikob    __ev64_opaque__ v;
764103285Sikob    int16_t i[4];
765103285Sikob  } u;
766103285Sikob
767103285Sikob  u.v = a;
768103285Sikob  return u.i[pos];
769103285Sikob}
770103285Sikob
771103285Sikob/* __ev_set_* functions.  */
772103285Sikob
773103285Sikob#define __ev_set_u32 __ev_set_u32_internal
774103285Sikob#define __ev_set_s32 __ev_set_s32_internal
775103285Sikob#define __ev_set_fs __ev_set_fs_internal
776103285Sikob#define __ev_set_u16 __ev_set_u16_internal
777103285Sikob#define __ev_set_s16 __ev_set_s16_internal
778103285Sikob
779103285Sikob#define __ev_set_ufix32_u32 __ev_set_u32
780103285Sikob#define __ev_set_sfix32_s32 __ev_set_s32
781103285Sikob
782103285Sikob#define __ev_set_sfix32_fs  __ev_set_sfix32_fs_internal
783103285Sikob#define __ev_set_ufix32_fs  __ev_set_ufix32_fs_internal
784103285Sikob
785103285Sikob#define __ev_set_upper_u32(a, b) __ev_set_u32 (a, b, 0)
786103285Sikob#define __ev_set_lower_u32(a, b) __ev_set_u32 (a, b, 1)
787103285Sikob#define __ev_set_upper_s32(a, b) __ev_set_s32 (a, b, 0)
788103285Sikob#define __ev_set_lower_s32(a, b) __ev_set_s32 (a, b, 1)
789103285Sikob#define __ev_set_upper_fs(a, b) __ev_set_fs (a, b, 0)
790103285Sikob#define __ev_set_lower_fs(a, b) __ev_set_fs (a, b, 1)
791103285Sikob#define __ev_set_upper_ufix32_u32 __ev_set_upper_u32
792103285Sikob#define __ev_set_lower_ufix32_u32 __ev_set_lower_u32
793103285Sikob#define __ev_set_upper_sfix32_s32 __ev_set_upper_s32
794103285Sikob#define __ev_set_lower_sfix32_s32 __ev_set_lower_s32
795103285Sikob#define __ev_set_upper_sfix32_fs(a, b)  __ev_set_sfix32_fs (a, b, 0)
796103285Sikob#define __ev_set_lower_sfix32_fs(a, b)  __ev_set_sfix32_fs (a, b, 1)
797103285Sikob#define __ev_set_upper_ufix32_fs(a, b)  __ev_set_ufix32_fs (a, b, 0)
798106543Ssimokawa#define __ev_set_lower_ufix32_fs(a, b)  __ev_set_ufix32_fs (a, b, 1)
799103285Sikob
800103285Sikob#define __ev_set_acc_vec64 __builtin_spe_evmra
801103285Sikob
802103285Sikobstatic inline __ev64_opaque__
803103285Sikob__ev_set_acc_u64 (uint64_t a)
804103285Sikob{
805103285Sikob  __ev64_opaque__ ev32;
806103285Sikob  ev32 = __ev_create_u64 (a);
807103285Sikob  __ev_mra (ev32);
808103285Sikob  return ev32;
809103285Sikob}
810103285Sikob
811103285Sikobstatic inline __ev64_opaque__
812103285Sikob__ev_set_acc_s64 (int64_t a)
813103285Sikob{
814103285Sikob  __ev64_opaque__ ev32;
815103285Sikob  ev32 = __ev_create_s64 (a);
816106543Ssimokawa  __ev_mra (ev32);
817103285Sikob  return ev32;
818106790Ssimokawa}
819103285Sikob
820103285Sikobstatic inline __ev64_opaque__
821103285Sikob__ev_set_u32_internal (__ev64_opaque__ a, uint32_t b, uint32_t pos)
822106813Ssimokawa{
823106790Ssimokawa  union
824103285Sikob  {
825103285Sikob    __ev64_opaque__ v;
826103285Sikob    uint32_t i[2];
827103285Sikob  } u;
828103285Sikob
829103285Sikob  u.v = a;
830103285Sikob  u.i[pos] = b;
831103285Sikob  return u.v;
832103285Sikob}
833103285Sikob
834103285Sikobstatic inline __ev64_opaque__
835103285Sikob__ev_set_s32_internal (__ev64_opaque__ a, int32_t b, uint32_t pos)
836103285Sikob{
837106790Ssimokawa  union
838103285Sikob  {
839103285Sikob    __ev64_opaque__ v;
840103285Sikob    int32_t i[2];
841106790Ssimokawa  } u;
842106790Ssimokawa
843103285Sikob  u.v = a;
844103285Sikob  u.i[pos] = b;
845103285Sikob  return u.v;
846103285Sikob}
847103285Sikob
848103285Sikobstatic inline __ev64_opaque__
849103285Sikob__ev_set_fs_internal (__ev64_opaque__ a, float b, uint32_t pos)
850103285Sikob{
851103285Sikob  union
852103285Sikob  {
853103285Sikob    __ev64_opaque__ v;
854103285Sikob    float f[2];
855103285Sikob  } u;
856103285Sikob
857103285Sikob  u.v = a;
858103285Sikob  u.f[pos] = b;
859103285Sikob  return u.v;
860103285Sikob}
861103285Sikob
862103285Sikobstatic inline __ev64_opaque__
863103285Sikob__ev_set_sfix32_fs_internal (__ev64_opaque__ a, float b, uint32_t pos)
864103285Sikob{
865103285Sikob  __ev64_opaque__ v;
866103285Sikob  float other;
867103285Sikob
868103285Sikob  /* Get other half.  */
869103285Sikob  other = __ev_get_fs_internal (a, pos ^ 1);
870103285Sikob
871103285Sikob  /* Make an sfix32 with 'b'.  */
872103285Sikob  v = __ev_create_sfix32_fs (b, b);
873103285Sikob
874103285Sikob  /* Set other half to what it used to be.  */
875103285Sikob  return __ev_set_fs_internal (v, other, pos ^ 1);
876103285Sikob}
877103285Sikob
878103285Sikobstatic inline __ev64_opaque__
879103285Sikob__ev_set_ufix32_fs_internal (__ev64_opaque__ a, float b, uint32_t pos)
880103285Sikob{
881103285Sikob  __ev64_opaque__ v;
882103285Sikob  float other;
883103285Sikob
884103285Sikob  /* Get other half.  */
885103285Sikob  other = __ev_get_fs_internal (a, pos ^ 1);
886103285Sikob
887103285Sikob  /* Make an ufix32 with 'b'.  */
888103285Sikob  v = __ev_create_ufix32_fs (b, b);
889106790Ssimokawa
890106790Ssimokawa  /* Set other half to what it used to be.  */
891103285Sikob  return __ev_set_fs_internal (v, other, pos ^ 1);
892103285Sikob}
893103285Sikob
894103285Sikobstatic inline __ev64_opaque__
895103285Sikob__ev_set_u16_internal (__ev64_opaque__ a, uint16_t b, uint32_t pos)
896103285Sikob{
897103285Sikob  union
898103285Sikob  {
899103285Sikob    __ev64_opaque__ v;
900103285Sikob    uint16_t i[4];
901103285Sikob  } u;
902103285Sikob
903103285Sikob  u.v = a;
904103285Sikob  u.i[pos] = b;
905103285Sikob  return u.v;
906103285Sikob}
907106790Ssimokawa
908106790Ssimokawastatic inline __ev64_opaque__
909103285Sikob__ev_set_s16_internal (__ev64_opaque__ a, int16_t b, uint32_t pos)
910103285Sikob{
911103285Sikob  union
912103285Sikob  {
913103285Sikob    __ev64_opaque__ v;
914103285Sikob    int16_t i[4];
915103285Sikob  } u;
916103285Sikob
917103285Sikob  u.v = a;
918103285Sikob  u.i[pos] = b;
919103285Sikob  return u.v;
920103285Sikob}
921103285Sikob
922103285Sikob/* Predicates.  */
923103285Sikob
924103285Sikob#define __pred_all	0
925106790Ssimokawa#define __pred_any	1
926103285Sikob#define __pred_upper	2
927103285Sikob#define __pred_lower	3
928103285Sikob
929106790Ssimokawa#define __ev_any_gts(a, b)		__builtin_spe_evcmpgts (__pred_any, (a), (b))
930106790Ssimokawa#define __ev_all_gts(a, b)		__builtin_spe_evcmpgts (__pred_all, (a), (b))
931103285Sikob#define __ev_upper_gts(a, b)		__builtin_spe_evcmpgts (__pred_upper, (a), (b))
932103285Sikob#define __ev_lower_gts(a, b)		__builtin_spe_evcmpgts (__pred_lower, (a), (b))
933103285Sikob#define __ev_select_gts			__builtin_spe_evsel_gts
934103285Sikob
935103285Sikob#define __ev_any_gtu(a, b)		__builtin_spe_evcmpgtu (__pred_any, (a), (b))
936103285Sikob#define __ev_all_gtu(a, b)		__builtin_spe_evcmpgtu (__pred_all, (a), (b))
937103285Sikob#define __ev_upper_gtu(a, b)		__builtin_spe_evcmpgtu (__pred_upper, (a), (b))
938103285Sikob#define __ev_lower_gtu(a, b)		__builtin_spe_evcmpgtu (__pred_lower, (a), (b))
939103285Sikob#define __ev_select_gtu			__builtin_spe_evsel_gtu
940103285Sikob
941103285Sikob#define __ev_any_lts(a, b)		__builtin_spe_evcmplts (__pred_any, (a), (b))
942103285Sikob#define __ev_all_lts(a, b)		__builtin_spe_evcmplts (__pred_all, (a), (b))
943103285Sikob#define __ev_upper_lts(a, b)		__builtin_spe_evcmplts (__pred_upper, (a), (b))
944103285Sikob#define __ev_lower_lts(a, b)		__builtin_spe_evcmplts (__pred_lower, (a), (b))
945103285Sikob#define __ev_select_lts(a, b, c, d) 	((__v2si) __builtin_spe_evsel_lts ((a), (b), (c), (d)))
946103285Sikob
947106790Ssimokawa#define __ev_any_ltu(a, b)		__builtin_spe_evcmpltu (__pred_any, (a), (b))
948103285Sikob#define __ev_all_ltu(a, b)		__builtin_spe_evcmpltu (__pred_all, (a), (b))
949103285Sikob#define __ev_upper_ltu(a, b)		__builtin_spe_evcmpltu (__pred_upper, (a), (b))
950103285Sikob#define __ev_lower_ltu(a, b)		__builtin_spe_evcmpltu (__pred_lower, (a), (b))
951106790Ssimokawa#define __ev_select_ltu 		__builtin_spe_evsel_ltu
952106790Ssimokawa#define __ev_any_eq(a, b)		__builtin_spe_evcmpeq (__pred_any, (a), (b))
953103285Sikob#define __ev_all_eq(a, b)		__builtin_spe_evcmpeq (__pred_all, (a), (b))
954103285Sikob#define __ev_upper_eq(a, b)		__builtin_spe_evcmpeq (__pred_upper, (a), (b))
955106790Ssimokawa#define __ev_lower_eq(a, b)		__builtin_spe_evcmpeq (__pred_lower, (a), (b))
956103285Sikob#define __ev_select_eq			__builtin_spe_evsel_eq
957106790Ssimokawa
958106790Ssimokawa#define __ev_any_fs_gt(a, b)		__builtin_spe_evfscmpgt (__pred_any, (a), (b))
959106790Ssimokawa#define __ev_all_fs_gt(a, b)		__builtin_spe_evfscmpgt (__pred_all, (a), (b))
960103285Sikob#define __ev_upper_fs_gt(a, b)		__builtin_spe_evfscmpgt (__pred_upper, (a), (b))
961103285Sikob#define __ev_lower_fs_gt(a, b)		__builtin_spe_evfscmpgt (__pred_lower, (a), (b))
962106790Ssimokawa#define __ev_select_fs_gt		__builtin_spe_evsel_fsgt
963103285Sikob
964103285Sikob#define __ev_any_fs_lt(a, b)		__builtin_spe_evfscmplt (__pred_any, (a), (b))
965106790Ssimokawa#define __ev_all_fs_lt(a, b)		__builtin_spe_evfscmplt (__pred_all, (a), (b))
966103285Sikob#define __ev_upper_fs_lt(a, b)		__builtin_spe_evfscmplt (__pred_upper, (a), (b))
967103285Sikob#define __ev_lower_fs_lt(a, b)		__builtin_spe_evfscmplt (__pred_lower, (a), (b))
968103285Sikob#define __ev_select_fs_lt		__builtin_spe_evsel_fslt
969103285Sikob
970103285Sikob#define __ev_any_fs_eq(a, b)		__builtin_spe_evfscmpeq (__pred_any, (a), (b))
971103285Sikob#define __ev_all_fs_eq(a, b)		__builtin_spe_evfscmpeq (__pred_all, (a), (b))
972103285Sikob#define __ev_upper_fs_eq(a, b)		__builtin_spe_evfscmpeq (__pred_upper, (a), (b))
973103285Sikob#define __ev_lower_fs_eq(a, b)		__builtin_spe_evfscmpeq (__pred_lower, (a), (b))
974103285Sikob#define __ev_select_fs_eq		__builtin_spe_evsel_fseq
975103285Sikob
976103285Sikob#define __ev_any_fs_tst_gt(a, b)	__builtin_spe_evfststgt (__pred_any, (a), (b))
977103285Sikob#define __ev_all_fs_tst_gt(a, b)	__builtin_spe_evfststgt (__pred_all, (a), (b))
978103285Sikob#define __ev_upper_fs_tst_gt(a, b)	__builtin_spe_evfststgt (__pred_upper, (a), (b))
979103285Sikob#define __ev_lower_fs_tst_gt(a, b)	__builtin_spe_evfststgt (__pred_lower, (a), (b))
980103285Sikob#define __ev_select_fs_tst_gt           __builtin_spe_evsel_fststgt
981103285Sikob
982103285Sikob#define __ev_any_fs_tst_lt(a, b)	__builtin_spe_evfststlt (__pred_any, (a), (b))
983103285Sikob#define __ev_all_fs_tst_lt(a, b)	__builtin_spe_evfststlt (__pred_all, (a), (b))
984103285Sikob#define __ev_upper_fs_tst_lt(a, b)	__builtin_spe_evfststlt (__pred_upper, (a), (b))
985103285Sikob#define __ev_lower_fs_tst_lt(a, b)	__builtin_spe_evfststlt (__pred_lower, (a), (b))
986103285Sikob#define __ev_select_fs_tst_lt		__builtin_spe_evsel_fststlt
987103285Sikob
988103285Sikob#define __ev_any_fs_tst_eq(a, b)	__builtin_spe_evfststeq (__pred_any, (a), (b))
989103285Sikob#define __ev_all_fs_tst_eq(a, b)	__builtin_spe_evfststeq (__pred_all, (a), (b))
990103285Sikob#define __ev_upper_fs_tst_eq(a, b)	__builtin_spe_evfststeq (__pred_upper, (a), (b))
991103285Sikob#define __ev_lower_fs_tst_eq(a, b)	__builtin_spe_evfststeq (__pred_lower, (a), (b))
992103285Sikob#define __ev_select_fs_tst_eq		__builtin_spe_evsel_fststeq
993106790Ssimokawa
994106790Ssimokawa/* SPEFSCR accessor functions.  */
995103285Sikob
996103285Sikob#define __SPEFSCR_SOVH		0x80000000
997103285Sikob#define __SPEFSCR_OVH		0x40000000
998103285Sikob#define __SPEFSCR_FGH		0x20000000
999103285Sikob#define __SPEFSCR_FXH		0x10000000
1000103285Sikob#define __SPEFSCR_FINVH		0x08000000
1001103285Sikob#define __SPEFSCR_FDBZH		0x04000000
1002103285Sikob#define __SPEFSCR_FUNFH		0x02000000
1003103285Sikob#define __SPEFSCR_FOVFH		0x01000000
1004103285Sikob/* 2 unused bits.  */
1005103285Sikob#define __SPEFSCR_FINXS		0x00200000
1006103285Sikob#define __SPEFSCR_FINVS		0x00100000
1007103285Sikob#define __SPEFSCR_FDBZS		0x00080000
1008103285Sikob#define __SPEFSCR_FUNFS		0x00040000
1009103285Sikob#define __SPEFSCR_FOVFS		0x00020000
1010103285Sikob#define __SPEFSCR_MODE		0x00010000
1011103285Sikob#define __SPEFSCR_SOV		0x00008000
1012103285Sikob#define __SPEFSCR_OV		0x00004000
1013103285Sikob#define __SPEFSCR_FG		0x00002000
1014103285Sikob#define __SPEFSCR_FX		0x00001000
1015103285Sikob#define __SPEFSCR_FINV		0x00000800
1016103285Sikob#define __SPEFSCR_FDBZ		0x00000400
1017103285Sikob#define __SPEFSCR_FUNF		0x00000200
1018103285Sikob#define __SPEFSCR_FOVF		0x00000100
1019103285Sikob/* 1 unused bit.  */
1020103285Sikob#define __SPEFSCR_FINXE		0x00000040
1021103285Sikob#define __SPEFSCR_FINVE		0x00000020
1022103285Sikob#define __SPEFSCR_FDBZE		0x00000010
1023103285Sikob#define __SPEFSCR_FUNFE		0x00000008
1024103285Sikob#define __SPEFSCR_FOVFE		0x00000004
1025103285Sikob#define __SPEFSCR_FRMC		0x00000003
1026103285Sikob
1027103285Sikob#define __ev_get_spefscr_sovh() (__builtin_spe_mfspefscr () & __SPEFSCR_SOVH)
1028103285Sikob#define __ev_get_spefscr_ovh() (__builtin_spe_mfspefscr () & __SPEFSCR_OVH)
1029103285Sikob#define __ev_get_spefscr_fgh() (__builtin_spe_mfspefscr () & __SPEFSCR_FGH)
1030103285Sikob#define __ev_get_spefscr_fxh() (__builtin_spe_mfspefscr () & __SPEFSCR_FXH)
1031103285Sikob#define __ev_get_spefscr_finvh() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVH)
1032103285Sikob#define __ev_get_spefscr_fdbzh() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZH)
1033103285Sikob#define __ev_get_spefscr_funfh() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFH)
1034103285Sikob#define __ev_get_spefscr_fovfh() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFH)
1035103285Sikob#define __ev_get_spefscr_finxs() (__builtin_spe_mfspefscr () & __SPEFSCR_FINXS)
1036103285Sikob#define __ev_get_spefscr_finvs() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVS)
1037103285Sikob#define __ev_get_spefscr_fdbzs() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZS)
1038103285Sikob#define __ev_get_spefscr_funfs() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFS)
1039103285Sikob#define __ev_get_spefscr_fovfs() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFS)
1040103285Sikob#define __ev_get_spefscr_mode() (__builtin_spe_mfspefscr () & __SPEFSCR_MODE)
1041103285Sikob#define __ev_get_spefscr_sov() (__builtin_spe_mfspefscr () & __SPEFSCR_SOV)
1042103285Sikob#define __ev_get_spefscr_ov() (__builtin_spe_mfspefscr () & __SPEFSCR_OV)
1043103285Sikob#define __ev_get_spefscr_fg() (__builtin_spe_mfspefscr () & __SPEFSCR_FG)
1044103285Sikob#define __ev_get_spefscr_fx() (__builtin_spe_mfspefscr () & __SPEFSCR_FX)
1045103285Sikob#define __ev_get_spefscr_finv() (__builtin_spe_mfspefscr () & __SPEFSCR_FINV)
1046103285Sikob#define __ev_get_spefscr_fdbz() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZ)
1047103285Sikob#define __ev_get_spefscr_funf() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNF)
1048103285Sikob#define __ev_get_spefscr_fovf() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVF)
1049103285Sikob#define __ev_get_spefscr_finxe() (__builtin_spe_mfspefscr () & __SPEFSCR_FINXE)
1050103285Sikob#define __ev_get_spefscr_finve() (__builtin_spe_mfspefscr () & __SPEFSCR_FINVE)
1051103285Sikob#define __ev_get_spefscr_fdbze() (__builtin_spe_mfspefscr () & __SPEFSCR_FDBZE)
1052103285Sikob#define __ev_get_spefscr_funfe() (__builtin_spe_mfspefscr () & __SPEFSCR_FUNFE)
1053103285Sikob#define __ev_get_spefscr_fovfe() (__builtin_spe_mfspefscr () & __SPEFSCR_FOVFE)
1054103285Sikob#define __ev_get_spefscr_frmc() (__builtin_spe_mfspefscr () & __SPEFSCR_FRMC)
1055103285Sikob
1056103285Sikobstatic inline void
1057103285Sikob__ev_clr_spefscr_field (int mask)
1058103285Sikob{
1059103285Sikob  int i;
1060103285Sikob
1061103285Sikob  i = __builtin_spe_mfspefscr ();
1062103285Sikob  i &= ~mask;
1063103285Sikob  __builtin_spe_mtspefscr (i);
1064103285Sikob}
1065103285Sikob
1066103285Sikob#define __ev_clr_spefscr_sovh() __ev_clr_spefscr_field (__SPEFSCR_SOVH)
1067103285Sikob#define __ev_clr_spefscr_sov() __ev_clr_spefscr_field (__SPEFSCR_SOV)
1068103285Sikob#define __ev_clr_spefscr_finxs() __ev_clr_spefscr_field (__SPEFSCR_FINXS)
1069103285Sikob#define __ev_clr_spefscr_finvs() __ev_clr_spefscr_field (__SPEFSCR_FINVS)
1070103285Sikob#define __ev_clr_spefscr_fdbzs() __ev_clr_spefscr_field (__SPEFSCR_FDBZS)
1071103285Sikob#define __ev_clr_spefscr_funfs() __ev_clr_spefscr_field (__SPEFSCR_FUNFS)
1072103285Sikob#define __ev_clr_spefscr_fovfs() __ev_clr_spefscr_field (__SPEFSCR_FOVFS)
1073107653Ssimokawa
1074107653Ssimokawa/* Set rounding mode:
1075103285Sikob     rnd = 0 (nearest)
1076103285Sikob     rnd = 1 (zero)
1077103285Sikob     rnd = 2 (+inf)
1078103285Sikob     rnd = 3 (-inf).  */
1079103285Sikob
1080103285Sikobstatic inline void
1081103285Sikob__ev_set_spefscr_frmc (int rnd)
1082103285Sikob{
1083103285Sikob  int i;
1084103285Sikob
1085103285Sikob  i = __builtin_spe_mfspefscr ();
1086103285Sikob  i &= ~__SPEFSCR_FRMC;
1087103285Sikob  i |= rnd;
1088103285Sikob  __builtin_spe_mtspefscr (i);
1089103285Sikob}
1090103285Sikob
1091103285Sikob#endif /* _SPE_H */
1092103285Sikob