]> git.ipfire.org Git - thirdparty/gcc.git/blame - libgcc/fixed-bit.h
projects / thirdparty / gcc.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Reset PHI base0 flag if it's clear in any argument [PR101977, ...]
[thirdparty/gcc.git] / libgcc / fixed-bit.h
CommitLineData
154e4a0a 1/* This is a software fixed-point library.
99dee823 2 Copyright (C) 2007-2021 Free Software Foundation, Inc.
154e4a0a
CF		 3
4This file is part of GCC.
5
6GCC is free software; you can redistribute it and/or modify it under
7the terms of the GNU General Public License as published by the Free
748086b7 8Software Foundation; either version 3, or (at your option) any later
154e4a0a
CF		 9version.
10
154e4a0a
CF		 11GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12WARRANTY; without even the implied warranty of MERCHANTABILITY or
13FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14for more details.
15
748086b7
JJ		 16Under Section 7 of GPL version 3, you are granted additional
17permissions described in the GCC Runtime Library Exception, version
183.1, as published by the Free Software Foundation.
19
20You should have received a copy of the GNU General Public License and
21a copy of the GCC Runtime Library Exception along with this program;
22see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
23<http://www.gnu.org/licenses/>. */
154e4a0a
CF		 24
25#ifndef _FIXED_BIT_H
26#define _FIXED_BIT_H
27
247eb06f
JB		 28#ifdef LIBGCC2_GNU_PREFIX
29#define LIBGCC2_FIXEDBIT_GNU_PREFIX
30#endif
31
154e4a0a
CF		 32/* To use this file we need to define one of the following:
33 QQ_MODE, UQQ_MODE, HQ_MODE, UHQ_MODE, SQ_MODE, USQ_MODE, DQ_MODE, UDQ_MODE,
34 TQ_MODE, UTQ_MODE, HA_MODE, UHA_MODE, SA_MODE, USA_MODE, DA_MODE, UDA_MODE,
35 TA_MODE, UTA_MODE.
36 Then, all operators for this machine mode will be created.
37
38 Or, we need to define FROM_* TO_* for conversions from one mode to another
39 mode. The mode could be one of the following:
40 Fract: QQ, UQQ, HQ, UHQ, SQ, USQ, DQ, UDQ, TQ, UTQ
41 Accum: HA, UHA, SA, USA, DA, UDA, TA, UTA
42 Signed integer: QI, HI, SI, DI, TI
43 Unsigned integer: UQI, UHI, USI, UDI, UTI
44 Floating-point: SF, DF
45 Ex: If we define FROM_QQ and TO_SI, the conversion from QQ to SI is
46 generated. */
47
8cc4b7a2
JM		 48#ifdef __LIBGCC_HAS_SF_MODE__
49#define LIBGCC2_HAS_SF_MODE 1
50#else
51#define LIBGCC2_HAS_SF_MODE 0
154e4a0a
CF		 52#endif
53
8cc4b7a2
JM		 54#ifdef __LIBGCC_HAS_DF_MODE__
55#define LIBGCC2_HAS_DF_MODE 1
56#else
57#define LIBGCC2_HAS_DF_MODE 0
154e4a0a
CF		 58#endif
59
60typedef int QItype __attribute__ ((mode (QI)));
61typedef unsigned int UQItype __attribute__ ((mode (QI)));
62typedef int HItype __attribute__ ((mode (HI)));
63typedef unsigned int UHItype __attribute__ ((mode (HI)));
64typedef _Fract QQtype __attribute__ ((mode (QQ)));
65typedef unsigned _Fract UQQtype __attribute__ ((mode (UQQ)));
66typedef _Fract HQtype __attribute__ ((mode (HQ)));
67typedef unsigned _Fract UHQtype __attribute__ ((mode (UHQ)));
68typedef _Fract HAtype __attribute__ ((mode (HA)));
69typedef unsigned _Fract UHAtype __attribute__ ((mode (UHA)));
70#define HAVE_QQ 1
71#define HAVE_UQQ 1
72#define HAVE_HQ 1
73#define HAVE_UHQ 1
74#define HAVE_HA 1
75#define HAVE_UHA 1
76#define HAVE_QI 1
77#define HAVE_UQI 1
78#define HAVE_HI 1
79#define HAVE_UHI 1
80#if MIN_UNITS_PER_WORD > 1
81/* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1. */
82typedef int SItype __attribute__ ((mode (SI)));
83typedef unsigned int USItype __attribute__ ((mode (SI)));
84typedef _Fract SQtype __attribute__ ((mode (SQ)));
85typedef unsigned _Fract USQtype __attribute__ ((mode (USQ)));
86typedef _Fract SAtype __attribute__ ((mode (SA)));
87typedef unsigned _Fract USAtype __attribute__ ((mode (USA)));
88#define HAVE_SQ 1
89#define HAVE_USQ 1
90#define HAVE_SA 1
91#define HAVE_USA 1
92#define HAVE_SI 1
93#define HAVE_USI 1
94#if LONG_LONG_TYPE_SIZE > 32
95/* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2. */
96typedef int DItype __attribute__ ((mode (DI)));
97typedef unsigned int UDItype __attribute__ ((mode (DI)));
98typedef _Fract DQtype __attribute__ ((mode (DQ)));
99typedef unsigned _Fract UDQtype __attribute__ ((mode (UDQ)));
100typedef _Fract DAtype __attribute__ ((mode (DA)));
101typedef unsigned _Fract UDAtype __attribute__ ((mode (UDA)));
102#define HAVE_DQ 1
103#define HAVE_UDQ 1
104#define HAVE_DA 1
105#define HAVE_UDA 1
106#define HAVE_DI 1
107#define HAVE_UDI 1
108#if MIN_UNITS_PER_WORD > 4
109/* These typedefs are usually forbidden on archs with UNITS_PER_WORD 4. */
110typedef int TItype __attribute__ ((mode (TI)));
111typedef unsigned int UTItype __attribute__ ((mode (TI)));
112typedef _Fract TQtype __attribute__ ((mode (TQ)));
113typedef unsigned _Fract UTQtype __attribute__ ((mode (UTQ)));
114typedef _Fract TAtype __attribute__ ((mode (TA)));
115typedef unsigned _Fract UTAtype __attribute__ ((mode (UTA)));
116#define HAVE_TQ 1
117#define HAVE_UTQ 1
118#define HAVE_TA 1
119#define HAVE_UTA 1
120#define HAVE_TI 1
121#define HAVE_UTI 1
122#endif
123#endif
124#endif
125
126#if LIBGCC2_HAS_SF_MODE
127typedef float SFtype __attribute__ ((mode (SF)));
128#define HAVE_SF 1
129#endif
130#if LIBGCC2_HAS_DF_MODE
131typedef float DFtype __attribute__ ((mode (DF)));
132#define HAVE_DF 1
133#endif
134
135typedef int word_type __attribute__ ((mode (__word__)));
136
137/* Based on modes, we create many defines. */
138
139#if defined (QQ_MODE) && (HAVE_QQ == 1)
140#define FIXED_SIZE 1 /* in bytes. */
141#define INT_C_TYPE QItype
142#define UINT_C_TYPE UQItype
143#define DINT_C_TYPE HItype
144#define DUINT_C_TYPE UHItype
145#define MODE_NAME QQ
146#define MODE_NAME_S qq
147#define MODE_UNSIGNED 0
148#endif
149
150#if defined (UQQ_MODE) && (HAVE_UQQ == 1)
151#define FIXED_SIZE 1 /* in bytes. */
152#define INT_C_TYPE UQItype
153#define UINT_C_TYPE UQItype
154#define DINT_C_TYPE UHItype
155#define DUINT_C_TYPE UHItype
156#define MODE_NAME UQQ
157#define MODE_NAME_S uqq
158#define MODE_UNSIGNED 1
159#endif
160
161#if defined (HQ_MODE) && (HAVE_HQ == 1)
162#define FIXED_SIZE 2 /* in bytes. */
163#define INT_C_TYPE HItype
164#define UINT_C_TYPE UHItype
165
166#if HAVE_SI == 1
167#define DINT_C_TYPE SItype
168#define DUINT_C_TYPE USItype
169#else
170#define HINT_C_TYPE QItype
171#define HUINT_C_TYPE UQItype
172#endif
173
174#define MODE_NAME HQ
175#define MODE_NAME_S hq
176#define MODE_UNSIGNED 0
177#endif
178
179#if defined (UHQ_MODE) && (HAVE_UHQ == 1)
180#define FIXED_SIZE 2 /* in bytes. */
181#define INT_C_TYPE UHItype
182#define UINT_C_TYPE UHItype
183
184#if HAVE_SI == 1
185#define DINT_C_TYPE USItype
186#define DUINT_C_TYPE USItype
187#else
188#define HINT_C_TYPE UQItype
189#define HUINT_C_TYPE UQItype
190#endif
191
192#define MODE_NAME UHQ
193#define MODE_NAME_S uhq
194#define MODE_UNSIGNED 1
195#endif
196
197#if defined (SQ_MODE) && (HAVE_SQ == 1)
198#define FIXED_SIZE 4 /* in bytes. */
199#define INT_C_TYPE SItype
200#define UINT_C_TYPE USItype
201
202#if HAVE_DI == 1
203#define DINT_C_TYPE DItype
204#define DUINT_C_TYPE UDItype
205#else
206#define HINT_C_TYPE HItype
207#define HUINT_C_TYPE UHItype
208#endif
209
210#define MODE_NAME SQ
211#define MODE_NAME_S sq
212#define MODE_UNSIGNED 0
213#endif
214
215#if defined (USQ_MODE) && (HAVE_USQ == 1)
216#define FIXED_SIZE 4 /* in bytes. */
217#define INT_C_TYPE USItype
218#define UINT_C_TYPE USItype
219
220#if HAVE_DI == 1
221#define DINT_C_TYPE UDItype
222#define DUINT_C_TYPE UDItype
223#else
224#define HINT_C_TYPE UHItype
225#define HUINT_C_TYPE UHItype
226#endif
227
228#define MODE_NAME USQ
229#define MODE_NAME_S usq
230#define MODE_UNSIGNED 1
231#endif
232
233#if defined (DQ_MODE) && (HAVE_DQ == 1)
234#define FIXED_SIZE 8 /* in bytes. */
235#define INT_C_TYPE DItype
236#define UINT_C_TYPE UDItype
237
238#if HAVE_TI == 1
239#define DINT_C_TYPE TItype
240#define DUINT_C_TYPE UTItype
241#else
242#define HINT_C_TYPE SItype
243#define HUINT_C_TYPE USItype
244#endif
245
246#define MODE_NAME DQ
247#define MODE_NAME_S dq
248#define MODE_UNSIGNED 0
249#endif
250
251#if defined (UDQ_MODE) && (HAVE_UDQ == 1)
252#define FIXED_SIZE 8 /* in bytes. */
253#define INT_C_TYPE UDItype
254#define UINT_C_TYPE UDItype
255
256#if HAVE_TI == 1
257#define DINT_C_TYPE UTItype
258#define DUINT_C_TYPE UTItype
259#else
260#define HINT_C_TYPE USItype
261#define HUINT_C_TYPE USItype
262#endif
263
264#define MODE_NAME UDQ
265#define MODE_NAME_S udq
266#define MODE_UNSIGNED 1
267#endif
268
269#if defined (TQ_MODE) && (HAVE_TQ == 1)
270#define FIXED_SIZE 16 /* in bytes. */
271#define INT_C_TYPE TItype
272#define UINT_C_TYPE UTItype
273#define HINT_C_TYPE DItype
274#define HUINT_C_TYPE UDItype
275#define MODE_NAME TQ
276#define MODE_NAME_S tq
277#define MODE_UNSIGNED 0
278#endif
279
280#if defined (UTQ_MODE) && (HAVE_UTQ == 1)
281#define FIXED_SIZE 16 /* in bytes. */
282#define INT_C_TYPE UTItype
283#define UINT_C_TYPE UTItype
284#define HINT_C_TYPE UDItype
285#define HUINT_C_TYPE UDItype
286#define MODE_NAME UTQ
287#define MODE_NAME_S utq
288#define MODE_UNSIGNED 1
289#endif
290
291#if defined (HA_MODE) && (HAVE_HA == 1)
292#define FIXED_SIZE 2 /* in bytes. */
293#define INT_C_TYPE HItype
294#define UINT_C_TYPE UHItype
295
296#if HAVE_SI == 1
297#define DINT_C_TYPE SItype
298#define DUINT_C_TYPE USItype
299#else
300#define HINT_C_TYPE QItype
301#define HUINT_C_TYPE UQItype
302#endif
303
304#define MODE_NAME HA
305#define MODE_NAME_S ha
306#define MODE_UNSIGNED 0
307#endif
308
309#if defined (UHA_MODE) && (HAVE_UHA == 1)
310#define FIXED_SIZE 2 /* in bytes. */
311#define INT_C_TYPE UHItype
312#define UINT_C_TYPE UHItype
313
314#if HAVE_SI == 1
315#define DINT_C_TYPE USItype
316#define DUINT_C_TYPE USItype
317#else
318#define HINT_C_TYPE UQItype
319#define HUINT_C_TYPE UQItype
320#endif
321
322#define MODE_NAME UHA
323#define MODE_NAME_S uha
324#define MODE_UNSIGNED 1
325#endif
326
327#if defined (SA_MODE) && (HAVE_SA == 1)
328#define FIXED_SIZE 4 /* in bytes. */
329#define INT_C_TYPE SItype
330#define UINT_C_TYPE USItype
331
332#if HAVE_DI == 1
333#define DINT_C_TYPE DItype
334#define DUINT_C_TYPE UDItype
335#else
336#define HINT_C_TYPE HItype
337#define HUINT_C_TYPE UHItype
338#endif
339
340#define MODE_NAME SA
341#define MODE_NAME_S sa
342#define MODE_UNSIGNED 0
343#endif
344
345#if defined (USA_MODE) && (HAVE_USA == 1)
346#define FIXED_SIZE 4 /* in bytes. */
347#define INT_C_TYPE USItype
348#define UINT_C_TYPE USItype
349
350#if HAVE_DI == 1
351#define DINT_C_TYPE UDItype
352#define DUINT_C_TYPE UDItype
353#else
354#define HINT_C_TYPE UHItype
355#define HUINT_C_TYPE UHItype
356#endif
357
358#define MODE_NAME USA
359#define MODE_NAME_S usa
360#define MODE_UNSIGNED 1
361#endif
362
363#if defined (DA_MODE) && (HAVE_DA == 1)
364#define FIXED_SIZE 8 /* in bytes. */
365#define INT_C_TYPE DItype
366#define UINT_C_TYPE UDItype
367
368#if HAVE_TI == 1
369#define DINT_C_TYPE TItype
370#define DUINT_C_TYPE UTItype
371#else
372#define HINT_C_TYPE SItype
373#define HUINT_C_TYPE USItype
374#endif
375
376#define MODE_NAME DA
377#define MODE_NAME_S da
378#define MODE_UNSIGNED 0
379#endif
380
381#if defined (UDA_MODE) && (HAVE_UDA == 1)
382#define FIXED_SIZE 8 /* in bytes. */
383#define INT_C_TYPE UDItype
384#define UINT_C_TYPE UDItype
385
386#if HAVE_TI == 1
387#define DINT_C_TYPE UTItype
388#define DUINT_C_TYPE UTItype
389#else
390#define HINT_C_TYPE USItype
391#define HUINT_C_TYPE USItype
392#endif
393
394#define MODE_NAME UDA
395#define MODE_NAME_S uda
396#define MODE_UNSIGNED 1
397#endif
398
399#if defined (TA_MODE) && (HAVE_TA == 1)
400#define FIXED_SIZE 16 /* in bytes. */
401#define INT_C_TYPE TItype
402#define UINT_C_TYPE UTItype
403#define HINT_C_TYPE DItype
404#define HUINT_C_TYPE UDItype
405#define MODE_NAME TA
406#define MODE_NAME_S ta
407#define MODE_UNSIGNED 0
408#endif
409
410#if defined (UTA_MODE) && (HAVE_UTA == 1)
411#define FIXED_SIZE 16 /* in bytes. */
412#define INT_C_TYPE UTItype
413#define UINT_C_TYPE UTItype
414#define HINT_C_TYPE UDItype
415#define HUINT_C_TYPE UDItype
416#define MODE_NAME UTA
417#define MODE_NAME_S uta
418#define MODE_UNSIGNED 1
419#endif
420
421/* The following defines are based on the previous defines. */
422
423#if defined (HINT_C_TYPE)
18ed6ee4 424#if __BYTE_ORDER__ != __ORDER_LITTLE_ENDIAN__
154e4a0a
CF		 425 struct INTstruct {HINT_C_TYPE high, low;};
426#else
427 struct INTstruct {HINT_C_TYPE low, high;};
428#endif
429
430typedef union
431{
432 struct INTstruct s;
433 INT_C_TYPE ll;
434} INTunion;
435#endif
436
a153644f 437#define FIXED_WIDTH (FIXED_SIZE * __CHAR_BIT__) /* in bits. */
154e4a0a
CF		 438#define FIXED_C_TYPE1(NAME) NAME ## type
439#define FIXED_C_TYPE2(NAME) FIXED_C_TYPE1(NAME)
440#define FIXED_C_TYPE FIXED_C_TYPE2(MODE_NAME)
441#define FBITS1(NAME) __ ## NAME ## _FBIT__
442#define FBITS2(NAME) FBITS1(NAME)
443#define FBITS FBITS2(MODE_NAME)
444#define IBITS1(NAME) __ ## NAME ## _IBIT__
445#define IBITS2(NAME) IBITS1(NAME)
446#define IBITS IBITS2(MODE_NAME)
447#define I_F_BITS (FBITS + IBITS)
448
247eb06f 449#ifdef LIBGCC2_FIXEDBIT_GNU_PREFIX
cdbf4541
BS		 450#define FIXED_OP(OP,MODE,NUM) __gnu_ ## OP ## MODE ## NUM
451#else
452#define FIXED_OP(OP,MODE,NUM) __ ## OP ## MODE ## NUM
453#endif
454
455#define FIXED_SATURATE1_TEMP(NAME) FIXED_OP(saturate1,NAME,)
456#define FIXED_SATURATE2_TEMP(NAME) FIXED_OP(saturate2,NAME,)
457#define FIXED_MULHELPER_TEMP(NAME) FIXED_OP(mulhelper,NAME,)
458#define FIXED_DIVHELPER_TEMP(NAME) FIXED_OP(divhelper,NAME,)
459#define FIXED_ASHLHELPER_TEMP(NAME) FIXED_OP(ashlhelper,NAME,)
460#define FIXED_ADD_TEMP(NAME) FIXED_OP(add,NAME,3)
461#define FIXED_SSADD_TEMP(NAME) FIXED_OP(ssadd,NAME,3)
462#define FIXED_USADD_TEMP(NAME) FIXED_OP(usadd,NAME,3)
463#define FIXED_SUB_TEMP(NAME) FIXED_OP(sub,NAME,3)
464#define FIXED_SSSUB_TEMP(NAME) FIXED_OP(sssub,NAME,3)
465#define FIXED_USSUB_TEMP(NAME) FIXED_OP(ussub,NAME,3)
466#define FIXED_MUL_TEMP(NAME) FIXED_OP(mul,NAME,3)
467#define FIXED_SSMUL_TEMP(NAME) FIXED_OP(ssmul,NAME,3)
468#define FIXED_USMUL_TEMP(NAME) FIXED_OP(usmul,NAME,3)
469#define FIXED_DIV_TEMP(NAME) FIXED_OP(div,NAME,3)
470#define FIXED_UDIV_TEMP(NAME) FIXED_OP(udiv,NAME,3)
471#define FIXED_SSDIV_TEMP(NAME) FIXED_OP(ssdiv,NAME,3)
472#define FIXED_USDIV_TEMP(NAME) FIXED_OP(usdiv,NAME,3)
473#define FIXED_NEG_TEMP(NAME) FIXED_OP(neg,NAME,2)
474#define FIXED_SSNEG_TEMP(NAME) FIXED_OP(ssneg,NAME,2)
475#define FIXED_USNEG_TEMP(NAME) FIXED_OP(usneg,NAME,2)
476#define FIXED_ASHL_TEMP(NAME) FIXED_OP(ashl,NAME,3)
477#define FIXED_ASHR_TEMP(NAME) FIXED_OP(ashr,NAME,3)
478#define FIXED_LSHR_TEMP(NAME) FIXED_OP(lshr,NAME,3)
479#define FIXED_SSASHL_TEMP(NAME) FIXED_OP(ssashl,NAME,3)
480#define FIXED_USASHL_TEMP(NAME) FIXED_OP(usashl,NAME,3)
481#define FIXED_CMP_TEMP(NAME) FIXED_OP(cmp,NAME,2)
154e4a0a
CF		 482
483#if defined (MODE_NAME)
484#if defined (DINT_C_TYPE)
485#define FIXED_SATURATE1 FIXED_SATURATE1_TEMP(MODE_NAME_S)
486#else
487#define FIXED_SATURATE2 FIXED_SATURATE2_TEMP(MODE_NAME_S)
488#endif
489#define FIXED_MULHELPER FIXED_MULHELPER_TEMP(MODE_NAME_S)
490#define FIXED_DIVHELPER FIXED_DIVHELPER_TEMP(MODE_NAME_S)
491#define FIXED_ASHLHELPER FIXED_ASHLHELPER_TEMP(MODE_NAME_S)
492#define FIXED_ADD FIXED_ADD_TEMP(MODE_NAME_S)
493#define FIXED_SUB FIXED_SUB_TEMP(MODE_NAME_S)
494#define FIXED_MUL FIXED_MUL_TEMP(MODE_NAME_S)
495#define FIXED_NEG FIXED_NEG_TEMP(MODE_NAME_S)
496#define FIXED_ASHL FIXED_ASHL_TEMP(MODE_NAME_S)
497#define FIXED_CMP FIXED_CMP_TEMP(MODE_NAME_S)
498
499/* The following functions are for all fixed-point modes. */
500#if defined (DINT_C_TYPE)
501extern void FIXED_SATURATE1 (DINT_C_TYPE *);
502#else
503extern void FIXED_SATURATE2 (INT_C_TYPE *, INT_C_TYPE *);
504#endif
505extern FIXED_C_TYPE FIXED_MULHELPER (FIXED_C_TYPE, FIXED_C_TYPE, word_type);
506extern FIXED_C_TYPE FIXED_DIVHELPER (FIXED_C_TYPE, FIXED_C_TYPE, word_type);
507extern FIXED_C_TYPE FIXED_ASHLHELPER (FIXED_C_TYPE, word_type, word_type);
508extern FIXED_C_TYPE FIXED_ADD (FIXED_C_TYPE, FIXED_C_TYPE);
509extern FIXED_C_TYPE FIXED_SUB (FIXED_C_TYPE, FIXED_C_TYPE);
510extern FIXED_C_TYPE FIXED_MUL (FIXED_C_TYPE, FIXED_C_TYPE);
511extern FIXED_C_TYPE FIXED_NEG (FIXED_C_TYPE);
512extern FIXED_C_TYPE FIXED_ASHL (FIXED_C_TYPE, word_type);
513extern word_type FIXED_CMP (FIXED_C_TYPE, FIXED_C_TYPE);
514#endif
515
516#if MODE_UNSIGNED == 0 /* Signed types. */
517#define PADDING_BITS (FIXED_WIDTH - 1 - I_F_BITS)
518#define NONPADDING_BITS (1 + I_F_BITS)
519
520#if defined (MODE_NAME)
521#define FIXED_DIV FIXED_DIV_TEMP(MODE_NAME_S)
522#define FIXED_ASHR FIXED_ASHR_TEMP(MODE_NAME_S)
523#define FIXED_SSADD FIXED_SSADD_TEMP(MODE_NAME_S)
524#define FIXED_SSSUB FIXED_SSSUB_TEMP(MODE_NAME_S)
525#define FIXED_SSMUL FIXED_SSMUL_TEMP(MODE_NAME_S)
526#define FIXED_SSDIV FIXED_SSDIV_TEMP(MODE_NAME_S)
527#define FIXED_SSNEG FIXED_SSNEG_TEMP(MODE_NAME_S)
528#define FIXED_SSASHL FIXED_SSASHL_TEMP(MODE_NAME_S)
529
530/* The following functions are for signed fixed-point modes. */
531extern FIXED_C_TYPE FIXED_DIV (FIXED_C_TYPE, FIXED_C_TYPE);
532extern FIXED_C_TYPE FIXED_ASHR (FIXED_C_TYPE, word_type);
533extern FIXED_C_TYPE FIXED_SSADD (FIXED_C_TYPE, FIXED_C_TYPE);
534extern FIXED_C_TYPE FIXED_SSSUB (FIXED_C_TYPE, FIXED_C_TYPE);
535extern FIXED_C_TYPE FIXED_SSMUL (FIXED_C_TYPE, FIXED_C_TYPE);
536extern FIXED_C_TYPE FIXED_SSDIV (FIXED_C_TYPE, FIXED_C_TYPE);
537extern FIXED_C_TYPE FIXED_SSNEG (FIXED_C_TYPE);
538extern FIXED_C_TYPE FIXED_SSASHL (FIXED_C_TYPE, word_type);
539#endif
540
541#else /* Unsigned types. */
542#define PADDING_BITS (FIXED_WIDTH - I_F_BITS)
543#define NONPADDING_BITS (I_F_BITS)
544
545#if defined (MODE_NAME)
546#define FIXED_UDIV FIXED_UDIV_TEMP(MODE_NAME_S)
547#define FIXED_LSHR FIXED_LSHR_TEMP(MODE_NAME_S)
548#define FIXED_USDIV FIXED_USDIV_TEMP(MODE_NAME_S)
549#define FIXED_USADD FIXED_USADD_TEMP(MODE_NAME_S)
550#define FIXED_USSUB FIXED_USSUB_TEMP(MODE_NAME_S)
551#define FIXED_USMUL FIXED_USMUL_TEMP(MODE_NAME_S)
552#define FIXED_USNEG FIXED_USNEG_TEMP(MODE_NAME_S)
553#define FIXED_USASHL FIXED_USASHL_TEMP(MODE_NAME_S)
554
555/* The following functions are for unsigned fixed-point modes. */
556extern FIXED_C_TYPE FIXED_UDIV (FIXED_C_TYPE, FIXED_C_TYPE);
557extern FIXED_C_TYPE FIXED_LSHR (FIXED_C_TYPE, word_type);
558extern FIXED_C_TYPE FIXED_USADD (FIXED_C_TYPE, FIXED_C_TYPE);
559extern FIXED_C_TYPE FIXED_USSUB (FIXED_C_TYPE, FIXED_C_TYPE);
560extern FIXED_C_TYPE FIXED_USMUL (FIXED_C_TYPE, FIXED_C_TYPE);
561extern FIXED_C_TYPE FIXED_USDIV (FIXED_C_TYPE, FIXED_C_TYPE);
562extern FIXED_C_TYPE FIXED_USNEG (FIXED_C_TYPE);
563extern FIXED_C_TYPE FIXED_USASHL (FIXED_C_TYPE, word_type);
564#endif
565
566#endif /* End of testing MODE_UNSIGNED. */
567
568/* This define is to check if this mode have any padding bits. */
569#define HAVE_PADDING_BITS (PADDING_BITS > 0)
570
571/* ------------------------------------------------------------------------ */
572/* The following defines are for conversions. */
573
574#if defined (FROM_QI) && HAVE_QI == 1
575#define FROM_TYPE 1 /* Signed integer. */
576#define FROM_INT_C_TYPE QItype
577#define FROM_SINT_C_TYPE QItype
578#define FROM_UINT_C_TYPE UQItype
579#define FROM_MODE_NAME_S qi
580#define FROM_INT_SIZE 1 /* in bytes. */
581
582#elif defined (FROM_HI) && HAVE_HI == 1
583#define FROM_TYPE 1 /* Signed integer. */
584#define FROM_INT_C_TYPE HItype
585#define FROM_SINT_C_TYPE HItype
586#define FROM_UINT_C_TYPE UHItype
587#define FROM_MODE_NAME_S hi
588#define FROM_INT_SIZE 2 /* in bytes. */
589
590#elif defined (FROM_SI) && HAVE_SI == 1
591#define FROM_TYPE 1 /* Signed integer. */
592#define FROM_INT_C_TYPE SItype
593#define FROM_SINT_C_TYPE SItype
594#define FROM_UINT_C_TYPE USItype
595#define FROM_MODE_NAME_S si
596#define FROM_INT_SIZE 4 /* in bytes. */
597
598#elif defined (FROM_DI) && HAVE_DI == 1
599#define FROM_TYPE 1 /* Signed integer. */
600#define FROM_INT_C_TYPE DItype
601#define FROM_SINT_C_TYPE DItype
602#define FROM_UINT_C_TYPE UDItype
603#define FROM_MODE_NAME_S di
604#define FROM_INT_SIZE 8 /* in bytes. */
605
606#elif defined (FROM_TI) && HAVE_TI == 1
607#define FROM_TYPE 1 /* Signed integer. */
608#define FROM_INT_C_TYPE TItype
609#define FROM_SINT_C_TYPE TItype
610#define FROM_UINT_C_TYPE UTItype
611#define FROM_MODE_NAME_S ti
612#define FROM_INT_SIZE 16 /* in bytes. */
613
614#elif defined (FROM_UQI) && HAVE_UQI == 1
615#define FROM_TYPE 2 /* Unsigned integer. */
616#define FROM_INT_C_TYPE QItype
617#define FROM_SINT_C_TYPE QItype
618#define FROM_UINT_C_TYPE UQItype
619#define FROM_MODE_NAME_S qi
620#define FROM_INT_SIZE 1 /* in bytes. */
621
622#elif defined (FROM_UHI) && HAVE_UHI == 1
623#define FROM_TYPE 2 /* Unsigned integer. */
624#define FROM_INT_C_TYPE UHItype
625#define FROM_SINT_C_TYPE HItype
626#define FROM_UINT_C_TYPE UHItype
627#define FROM_MODE_NAME_S hi
628#define FROM_INT_SIZE 2 /* in bytes. */
629
630#elif defined (FROM_USI) && HAVE_USI == 1
631#define FROM_TYPE 2 /* Unsigned integer. */
632#define FROM_INT_C_TYPE USItype
633#define FROM_SINT_C_TYPE SItype
634#define FROM_UINT_C_TYPE USItype
635#define FROM_MODE_NAME_S si
636#define FROM_INT_SIZE 4 /* in bytes. */
637
638#elif defined (FROM_UDI) && HAVE_UDI == 1
639#define FROM_TYPE 2 /* Unsigned integer. */
640#define FROM_INT_C_TYPE UDItype
641#define FROM_SINT_C_TYPE DItype
642#define FROM_UINT_C_TYPE UDItype
643#define FROM_MODE_NAME_S di
644#define FROM_INT_SIZE 8 /* in bytes. */
645
646#elif defined (FROM_UTI) && HAVE_UTI == 1
647#define FROM_TYPE 2 /* Unsigned integer. */
648#define FROM_INT_C_TYPE UTItype
649#define FROM_SINT_C_TYPE TItype
650#define FROM_UINT_C_TYPE UTItype
651#define FROM_MODE_NAME_S ti
652#define FROM_INT_SIZE 16 /* in bytes. */
653
654#elif defined (FROM_SF) && HAVE_SF == 1
655#define FROM_TYPE 3 /* Floating-point. */
656#define FROM_FLOAT_C_TYPE SFtype
657#define FROM_MODE_NAME_S sf
658
659#elif defined (FROM_DF) && HAVE_DF == 1
660#define FROM_TYPE 3 /* Floating-point. */
661#define FROM_FLOAT_C_TYPE DFtype
662#define FROM_MODE_NAME_S df
663
664#elif defined (FROM_QQ) && HAVE_QQ == 1
665#define FROM_TYPE 4 /* Fixed-point. */
666#define FROM_MODE_NAME QQ
667#define FROM_MODE_NAME_S qq
668#define FROM_INT_C_TYPE QItype
669#define FROM_SINT_C_TYPE QItype
670#define FROM_UINT_C_TYPE UQItype
671#define FROM_MODE_UNSIGNED 0
672#define FROM_FIXED_SIZE 1 /* in bytes. */
673
674#elif defined (FROM_HQ) && HAVE_HQ == 1
675#define FROM_TYPE 4 /* Fixed-point. */
676#define FROM_MODE_NAME HQ
677#define FROM_MODE_NAME_S hq
678#define FROM_INT_C_TYPE HItype
679#define FROM_SINT_C_TYPE HItype
680#define FROM_UINT_C_TYPE UHItype
681#define FROM_MODE_UNSIGNED 0
682#define FROM_FIXED_SIZE 2 /* in bytes. */
683
684#elif defined (FROM_SQ) && HAVE_SQ == 1
685#define FROM_TYPE 4 /* Fixed-point. */
686#define FROM_MODE_NAME SQ
687#define FROM_MODE_NAME_S sq
688#define FROM_INT_C_TYPE SItype
689#define FROM_SINT_C_TYPE SItype
690#define FROM_UINT_C_TYPE USItype
691#define FROM_MODE_UNSIGNED 0
692#define FROM_FIXED_SIZE 4 /* in bytes. */
693
694#elif defined (FROM_DQ) && HAVE_DQ == 1
695#define FROM_TYPE 4 /* Fixed-point. */
696#define FROM_MODE_NAME DQ
697#define FROM_MODE_NAME_S dq
698#define FROM_INT_C_TYPE DItype
699#define FROM_SINT_C_TYPE DItype
700#define FROM_UINT_C_TYPE UDItype
701#define FROM_MODE_UNSIGNED 0
702#define FROM_FIXED_SIZE 8 /* in bytes. */
703
704#elif defined (FROM_TQ) && HAVE_TQ == 1
705#define FROM_TYPE 4 /* Fixed-point. */
706#define FROM_MODE_NAME TQ
707#define FROM_MODE_NAME_S tq
708#define FROM_INT_C_TYPE TItype
709#define FROM_SINT_C_TYPE TItype
710#define FROM_UINT_C_TYPE UTItype
711#define FROM_MODE_UNSIGNED 0
712#define FROM_FIXED_SIZE 16 /* in bytes. */
713
714#elif defined (FROM_UQQ) && HAVE_UQQ == 1
715#define FROM_TYPE 4 /* Fixed-point. */
716#define FROM_MODE_NAME UQQ
717#define FROM_MODE_NAME_S uqq
718#define FROM_INT_C_TYPE UQItype
719#define FROM_SINT_C_TYPE QItype
720#define FROM_UINT_C_TYPE UQItype
721#define FROM_MODE_UNSIGNED 1
722#define FROM_FIXED_SIZE 1 /* in bytes. */
723
724#elif defined (FROM_UHQ) && HAVE_UHQ == 1
725#define FROM_TYPE 4 /* Fixed-point. */
726#define FROM_MODE_NAME UHQ
727#define FROM_MODE_NAME_S uhq
728#define FROM_INT_C_TYPE UHItype
729#define FROM_SINT_C_TYPE HItype
730#define FROM_UINT_C_TYPE UHItype
731#define FROM_MODE_UNSIGNED 1
732#define FROM_FIXED_SIZE 2 /* in bytes. */
733
734#elif defined (FROM_USQ) && HAVE_USQ == 1
735#define FROM_TYPE 4 /* Fixed-point. */
736#define FROM_MODE_NAME USQ
737#define FROM_MODE_NAME_S usq
738#define FROM_INT_C_TYPE USItype
739#define FROM_SINT_C_TYPE SItype
740#define FROM_UINT_C_TYPE USItype
741#define FROM_MODE_UNSIGNED 1
742#define FROM_FIXED_SIZE 4 /* in bytes. */
743
744#elif defined (FROM_UDQ) && HAVE_UDQ == 1
745#define FROM_TYPE 4 /* Fixed-point. */
746#define FROM_MODE_NAME UDQ
747#define FROM_MODE_NAME_S udq
748#define FROM_INT_C_TYPE UDItype
749#define FROM_SINT_C_TYPE DItype
750#define FROM_UINT_C_TYPE UDItype
751#define FROM_MODE_UNSIGNED 1
752#define FROM_FIXED_SIZE 8 /* in bytes. */
753
754#elif defined (FROM_UTQ) && HAVE_UTQ == 1
755#define FROM_TYPE 4 /* Fixed-point. */
756#define FROM_MODE_NAME UTQ
757#define FROM_MODE_NAME_S utq
758#define FROM_INT_C_TYPE UTItype
759#define FROM_SINT_C_TYPE TItype
760#define FROM_UINT_C_TYPE UTItype
761#define FROM_MODE_UNSIGNED 1
762#define FROM_FIXED_SIZE 16 /* in bytes. */
763
764#elif defined (FROM_HA) && HAVE_HA == 1
765#define FROM_TYPE 4 /* Fixed-point. */
766#define FROM_MODE_NAME HA
767#define FROM_MODE_NAME_S ha
768#define FROM_INT_C_TYPE HItype
769#define FROM_SINT_C_TYPE HItype
770#define FROM_UINT_C_TYPE UHItype
771#define FROM_MODE_UNSIGNED 0
772#define FROM_FIXED_SIZE 2 /* in bytes. */
773
774#elif defined (FROM_SA) && HAVE_SA == 1
775#define FROM_TYPE 4 /* Fixed-point. */
776#define FROM_MODE_NAME SA
777#define FROM_MODE_NAME_S sa
778#define FROM_INT_C_TYPE SItype
779#define FROM_SINT_C_TYPE SItype
780#define FROM_UINT_C_TYPE USItype
781#define FROM_MODE_UNSIGNED 0
782#define FROM_FIXED_SIZE 4 /* in bytes. */
783
784#elif defined (FROM_DA) && HAVE_DA == 1
785#define FROM_TYPE 4 /* Fixed-point. */
786#define FROM_MODE_NAME DA
787#define FROM_MODE_NAME_S da
788#define FROM_INT_C_TYPE DItype
789#define FROM_SINT_C_TYPE DItype
790#define FROM_UINT_C_TYPE UDItype
791#define FROM_MODE_UNSIGNED 0
792#define FROM_FIXED_SIZE 8 /* in bytes. */
793
794#elif defined (FROM_TA) && HAVE_TA == 1
795#define FROM_TYPE 4 /* Fixed-point. */
796#define FROM_MODE_NAME TA
797#define FROM_MODE_NAME_S ta
798#define FROM_INT_C_TYPE TItype
799#define FROM_SINT_C_TYPE TItype
800#define FROM_UINT_C_TYPE UTItype
801#define FROM_MODE_UNSIGNED 0
802#define FROM_FIXED_SIZE 16 /* in bytes. */
803
804#elif defined (FROM_UHA) && HAVE_UHA == 1
805#define FROM_TYPE 4 /* Fixed-point. */
806#define FROM_MODE_NAME UHA
807#define FROM_MODE_NAME_S uha
808#define FROM_INT_C_TYPE UHItype
809#define FROM_SINT_C_TYPE HItype
810#define FROM_UINT_C_TYPE UHItype
811#define FROM_MODE_UNSIGNED 1
812#define FROM_FIXED_SIZE 2 /* in bytes. */
813
814#elif defined (FROM_USA) && HAVE_USA == 1
815#define FROM_TYPE 4 /* Fixed-point. */
816#define FROM_MODE_NAME USA
817#define FROM_MODE_NAME_S usa
818#define FROM_INT_C_TYPE USItype
819#define FROM_SINT_C_TYPE SItype
820#define FROM_UINT_C_TYPE USItype
821#define FROM_MODE_UNSIGNED 1
822#define FROM_FIXED_SIZE 4 /* in bytes. */
823
824#elif defined (FROM_UDA) && HAVE_UDA == 1
825#define FROM_TYPE 4 /* Fixed-point. */
826#define FROM_MODE_NAME UDA
827#define FROM_MODE_NAME_S uda
828#define FROM_INT_C_TYPE UDItype
829#define FROM_SINT_C_TYPE DItype
830#define FROM_UINT_C_TYPE UDItype
831#define FROM_MODE_UNSIGNED 1
832#define FROM_FIXED_SIZE 8 /* in bytes. */
833
834#elif defined (FROM_UTA) && HAVE_UTA == 1
835#define FROM_TYPE 4 /* Fixed-point. */
836#define FROM_MODE_NAME UTA
837#define FROM_MODE_NAME_S uta
838#define FROM_INT_C_TYPE UTItype
839#define FROM_SINT_C_TYPE TItype
840#define FROM_UINT_C_TYPE UTItype
841#define FROM_MODE_UNSIGNED 1
842#define FROM_FIXED_SIZE 16 /* in bytes. */
843
844#endif
845
846#if defined (TO_QI) && HAVE_QI == 1 && !defined (FROM_QI)
847#define TO_TYPE 1 /* Signed integer. */
848#define TO_INT_C_TYPE QItype
849#define TO_SINT_C_TYPE QItype
850#define TO_UINT_C_TYPE UQItype
851#define TO_MODE_NAME_S qi
852
853#elif defined (TO_HI) && HAVE_HI == 1 && !defined (FROM_HI)
854#define TO_TYPE 1 /* Signed integer. */
855#define TO_INT_C_TYPE HItype
856#define TO_SINT_C_TYPE HItype
857#define TO_UINT_C_TYPE UHItype
858#define TO_MODE_NAME_S hi
859
860#elif defined (TO_SI) && HAVE_SI == 1 && !defined (FROM_SI)
861#define TO_TYPE 1 /* Signed integer. */
862#define TO_INT_C_TYPE SItype
863#define TO_SINT_C_TYPE SItype
864#define TO_UINT_C_TYPE USItype
865#define TO_MODE_NAME_S si
866
867#elif defined (TO_DI) && HAVE_DI == 1 && !defined (FROM_DI)
868#define TO_TYPE 1 /* Signed integer. */
869#define TO_INT_C_TYPE DItype
870#define TO_SINT_C_TYPE DItype
871#define TO_UINT_C_TYPE UDItype
872#define TO_MODE_NAME_S di
873
874#elif defined (TO_TI) && HAVE_TI == 1 && !defined (FROM_TI)
875#define TO_TYPE 1 /* Signed integer. */
876#define TO_INT_C_TYPE TItype
877#define TO_SINT_C_TYPE TItype
878#define TO_UINT_C_TYPE UTItype
879#define TO_MODE_NAME_S ti
880
881#elif defined (TO_UQI) && HAVE_UQI == 1 && !defined (FROM_UQI)
882#define TO_TYPE 2 /* Unsigned integer. */
883#define TO_INT_C_TYPE UQItype
884#define TO_SINT_C_TYPE QItype
885#define TO_UINT_C_TYPE UQItype
886#define TO_MODE_NAME_S qi
887
888#elif defined (TO_UHI) && HAVE_UHI == 1 && !defined (FROM_UHI)
889#define TO_TYPE 2 /* Unsigned integer. */
890#define TO_INT_C_TYPE UHItype
891#define TO_SINT_C_TYPE HItype
892#define TO_UINT_C_TYPE UHItype
893#define TO_MODE_NAME_S hi
894
895#elif defined (TO_USI) && HAVE_USI == 1 && !defined (FROM_USI)
896#define TO_TYPE 2 /* Unsigned integer. */
897#define TO_INT_C_TYPE USItype
898#define TO_SINT_C_TYPE SItype
899#define TO_UINT_C_TYPE USItype
900#define TO_MODE_NAME_S si
901
902#elif defined (TO_UDI) && HAVE_UDI == 1 && !defined (FROM_UDI)
903#define TO_TYPE 2 /* Unsigned integer. */
904#define TO_INT_C_TYPE UDItype
905#define TO_SINT_C_TYPE DItype
906#define TO_UINT_C_TYPE UDItype
907#define TO_MODE_NAME_S di
908
909#elif defined (TO_UTI) && HAVE_UTI == 1 && !defined (FROM_UTI)
910#define TO_TYPE 2 /* Unsigned integer. */
911#define TO_INT_C_TYPE UTItype
912#define TO_SINT_C_TYPE TItype
913#define TO_UINT_C_TYPE UTItype
914#define TO_MODE_NAME_S ti
915
916#elif defined (TO_SF) && HAVE_SF == 1 && !defined (FROM_SF)
917#define TO_TYPE 3 /* Floating-point. */
918#define TO_FLOAT_C_TYPE SFtype
919#define TO_MODE_NAME_S sf
920
921#elif defined (TO_DF) && HAVE_DF == 1 && !defined (FROM_DF)
922#define TO_TYPE 3 /* Floating-point. */
923#define TO_FLOAT_C_TYPE DFtype
924#define TO_MODE_NAME_S df
925
926#elif defined (TO_QQ) && HAVE_QQ == 1 && !defined (FROM_QQ)
927#define TO_TYPE 4 /* Fixed-point. */
928#define TO_MODE_NAME QQ
929#define TO_MODE_NAME_S qq
930#define TO_INT_C_TYPE QItype
931#define TO_SINT_C_TYPE QItype
932#define TO_UINT_C_TYPE UQItype
933#define TO_MODE_UNSIGNED 0
934#define TO_FIXED_SIZE 1 /* in bytes. */
935
936#elif defined (TO_HQ) && HAVE_HQ == 1 && !defined (FROM_HQ)
937#define TO_TYPE 4 /* Fixed-point. */
938#define TO_MODE_NAME HQ
939#define TO_MODE_NAME_S hq
940#define TO_INT_C_TYPE HItype
941#define TO_SINT_C_TYPE HItype
942#define TO_UINT_C_TYPE UHItype
943#define TO_MODE_UNSIGNED 0
944#define TO_FIXED_SIZE 2 /* in bytes. */
945
946#elif defined (TO_SQ) && HAVE_SQ == 1 && !defined (FROM_SQ)
947#define TO_TYPE 4 /* Fixed-point. */
948#define TO_MODE_NAME SQ
949#define TO_MODE_NAME_S sq
950#define TO_INT_C_TYPE SItype
951#define TO_SINT_C_TYPE SItype
952#define TO_UINT_C_TYPE USItype
953#define TO_MODE_UNSIGNED 0
954#define TO_FIXED_SIZE 4 /* in bytes. */
955
956#elif defined (TO_DQ) && HAVE_DQ == 1 && !defined (FROM_DQ)
957#define TO_TYPE 4 /* Fixed-point. */
958#define TO_MODE_NAME DQ
959#define TO_MODE_NAME_S dq
960#define TO_INT_C_TYPE DItype
961#define TO_SINT_C_TYPE DItype
962#define TO_UINT_C_TYPE UDItype
963#define TO_MODE_UNSIGNED 0
964#define TO_FIXED_SIZE 8 /* in bytes. */
965
966#elif defined (TO_TQ) && HAVE_TQ == 1 && !defined (FROM_TQ)
967#define TO_TYPE 4 /* Fixed-point. */
968#define TO_MODE_NAME TQ
969#define TO_MODE_NAME_S tq
970#define TO_INT_C_TYPE TItype
971#define TO_SINT_C_TYPE TItype
972#define TO_UINT_C_TYPE UTItype
973#define TO_MODE_UNSIGNED 0
974#define TO_FIXED_SIZE 16 /* in bytes. */
975
976#elif defined (TO_UQQ) && HAVE_UQQ == 1 && !defined (FROM_UQQ)
977#define TO_TYPE 4 /* Fixed-point. */
978#define TO_MODE_NAME UQQ
979#define TO_MODE_NAME_S uqq
980#define TO_INT_C_TYPE UQItype
981#define TO_SINT_C_TYPE QItype
982#define TO_UINT_C_TYPE UQItype
983#define TO_MODE_UNSIGNED 1
984#define TO_FIXED_SIZE 1 /* in bytes. */
985
986#elif defined (TO_UHQ) && HAVE_UHQ == 1 && !defined (FROM_UHQ)
987#define TO_TYPE 4 /* Fixed-point. */
988#define TO_MODE_NAME UHQ
989#define TO_MODE_NAME_S uhq
990#define TO_INT_C_TYPE UHItype
991#define TO_SINT_C_TYPE HItype
992#define TO_UINT_C_TYPE UHItype
993#define TO_MODE_UNSIGNED 1
994#define TO_FIXED_SIZE 2 /* in bytes. */
995
996#elif defined (TO_USQ) && HAVE_USQ == 1 && !defined (FROM_USQ)
997#define TO_TYPE 4 /* Fixed-point. */
998#define TO_MODE_NAME USQ
999#define TO_MODE_NAME_S usq
1000#define TO_INT_C_TYPE USItype
1001#define TO_SINT_C_TYPE SItype
1002#define TO_UINT_C_TYPE USItype
1003#define TO_MODE_UNSIGNED 1
1004#define TO_FIXED_SIZE 4 /* in bytes. */
1005
1006#elif defined (TO_UDQ) && HAVE_UDQ == 1 && !defined (FROM_UDQ)
1007#define TO_TYPE 4 /* Fixed-point. */
1008#define TO_MODE_NAME UDQ
1009#define TO_MODE_NAME_S udq
1010#define TO_INT_C_TYPE UDItype
1011#define TO_SINT_C_TYPE DItype
1012#define TO_UINT_C_TYPE UDItype
1013#define TO_MODE_UNSIGNED 1
1014#define TO_FIXED_SIZE 8 /* in bytes. */
1015
1016#elif defined (TO_UTQ) && HAVE_UTQ == 1 && !defined (FROM_UTQ)
1017#define TO_TYPE 4 /* Fixed-point. */
1018#define TO_MODE_NAME UTQ
1019#define TO_MODE_NAME_S utq
1020#define TO_INT_C_TYPE UTItype
1021#define TO_SINT_C_TYPE TItype
1022#define TO_UINT_C_TYPE UTItype
1023#define TO_MODE_UNSIGNED 1
1024#define TO_FIXED_SIZE 16 /* in bytes. */
1025
1026#elif defined (TO_HA) && HAVE_HA == 1 && !defined (FROM_HA)
1027#define TO_TYPE 4 /* Fixed-point. */
1028#define TO_MODE_NAME HA
1029#define TO_MODE_NAME_S ha
1030#define TO_INT_C_TYPE HItype
1031#define TO_SINT_C_TYPE HItype
1032#define TO_UINT_C_TYPE UHItype
1033#define TO_MODE_UNSIGNED 0
1034#define TO_FIXED_SIZE 2 /* in bytes. */
1035
1036#elif defined (TO_SA) && HAVE_SA == 1 && !defined (FROM_SA)
1037#define TO_TYPE 4 /* Fixed-point. */
1038#define TO_MODE_NAME SA
1039#define TO_MODE_NAME_S sa
1040#define TO_INT_C_TYPE SItype
1041#define TO_SINT_C_TYPE SItype
1042#define TO_UINT_C_TYPE USItype
1043#define TO_MODE_UNSIGNED 0
1044#define TO_FIXED_SIZE 4 /* in bytes. */
1045
1046#elif defined (TO_DA) && HAVE_DA == 1 && !defined (FROM_DA)
1047#define TO_TYPE 4 /* Fixed-point. */
1048#define TO_MODE_NAME DA
1049#define TO_MODE_NAME_S da
1050#define TO_INT_C_TYPE DItype
1051#define TO_SINT_C_TYPE DItype
1052#define TO_UINT_C_TYPE UDItype
1053#define TO_MODE_UNSIGNED 0
1054#define TO_FIXED_SIZE 8 /* in bytes. */
1055
1056#elif defined (TO_TA) && HAVE_TA == 1 && !defined (FROM_TA)
1057#define TO_TYPE 4 /* Fixed-point. */
1058#define TO_MODE_NAME TA
1059#define TO_MODE_NAME_S ta
1060#define TO_INT_C_TYPE TItype
1061#define TO_SINT_C_TYPE TItype
1062#define TO_UINT_C_TYPE UTItype
1063#define TO_MODE_UNSIGNED 0
1064#define TO_FIXED_SIZE 16 /* in bytes. */
1065
1066#elif defined (TO_UHA) && HAVE_UHA == 1 && !defined (FROM_UHA)
1067#define TO_TYPE 4 /* Fixed-point. */
1068#define TO_MODE_NAME UHA
1069#define TO_MODE_NAME_S uha
1070#define TO_INT_C_TYPE UHItype
1071#define TO_SINT_C_TYPE HItype
1072#define TO_UINT_C_TYPE UHItype
1073#define TO_MODE_UNSIGNED 1
1074#define TO_FIXED_SIZE 2 /* in bytes. */
1075
1076#elif defined (TO_USA) && HAVE_USA == 1 && !defined (FROM_USA)
1077#define TO_TYPE 4 /* Fixed-point. */
1078#define TO_MODE_NAME USA
1079#define TO_MODE_NAME_S usa
1080#define TO_INT_C_TYPE USItype
1081#define TO_SINT_C_TYPE SItype
1082#define TO_UINT_C_TYPE USItype
1083#define TO_MODE_UNSIGNED 1
1084#define TO_FIXED_SIZE 4 /* in bytes. */
1085
1086#elif defined (TO_UDA) && HAVE_UDA == 1 && !defined (FROM_UDA)
1087#define TO_TYPE 4 /* Fixed-point. */
1088#define TO_MODE_NAME UDA
1089#define TO_MODE_NAME_S uda
1090#define TO_INT_C_TYPE UDItype
1091#define TO_SINT_C_TYPE DItype
1092#define TO_UINT_C_TYPE UDItype
1093#define TO_MODE_UNSIGNED 1
1094#define TO_FIXED_SIZE 8 /* in bytes. */
1095
1096#elif defined (TO_UTA) && HAVE_UTA == 1 && !defined (FROM_UTA)
1097#define TO_TYPE 4 /* Fixed-point. */
1098#define TO_MODE_NAME UTA
1099#define TO_MODE_NAME_S uta
1100#define TO_INT_C_TYPE UTItype
1101#define TO_SINT_C_TYPE TItype
1102#define TO_UINT_C_TYPE UTItype
1103#define TO_MODE_UNSIGNED 1
1104#define TO_FIXED_SIZE 16 /* in bytes. */
1105
1106#endif
1107
1108#if defined (FROM_MODE_NAME_S) && defined (TO_MODE_NAME_S)
1109
1110#if FROM_TYPE == 1 /* Signed integer. */
a153644f 1111#define FROM_INT_WIDTH (FROM_INT_SIZE * __CHAR_BIT__)
154e4a0a
CF		 1112#endif
1113
1114#if FROM_TYPE == 2 /* Unsigned integer. */
a153644f 1115#define FROM_INT_WIDTH (FROM_INT_SIZE * __CHAR_BIT__)
154e4a0a
CF		 1116#endif
1117
1118#if FROM_TYPE == 4 /* Fixed-point. */
1119#define FROM_FIXED_C_TYPE FIXED_C_TYPE2(FROM_MODE_NAME)
1120#define FROM_FBITS FBITS2(FROM_MODE_NAME)
a153644f 1121#define FROM_FIXED_WIDTH (FROM_FIXED_SIZE * __CHAR_BIT__)
154e4a0a
CF		 1122#define FROM_FBITS FBITS2(FROM_MODE_NAME)
1123#define FROM_IBITS IBITS2(FROM_MODE_NAME)
1124#define FROM_I_F_BITS (FROM_FBITS + FROM_IBITS)
1125
1126#if FROM_MODE_UNSIGNED == 0 /* Signed types. */
1127#define FROM_PADDING_BITS (FROM_FIXED_WIDTH - 1 - FROM_I_F_BITS)
1128#define FROM_NONPADDING_BITS (1 + FROM_I_F_BITS)
1129#else /* Unsigned types. */
1130#define FROM_PADDING_BITS (FROM_FIXED_WIDTH - FROM_I_F_BITS)
1131#define FROM_NONPADDING_BITS (FROM_I_F_BITS)
1132#endif
1133#define FROM_HAVE_PADDING_BITS (FROM_PADDING_BITS > 0)
1134#endif /* FROM_TYPE == 4 */
1135
1136#if TO_TYPE == 4 /* Fixed-point. */
1137#define TO_FIXED_C_TYPE FIXED_C_TYPE2(TO_MODE_NAME)
1138#define TO_FBITS FBITS2(TO_MODE_NAME)
a153644f 1139#define TO_FIXED_WIDTH (TO_FIXED_SIZE * __CHAR_BIT__)
154e4a0a
CF		 1140#define TO_FBITS FBITS2(TO_MODE_NAME)
1141#define TO_IBITS IBITS2(TO_MODE_NAME)
1142#define TO_I_F_BITS (TO_FBITS + TO_IBITS)
1143
1144#if TO_MODE_UNSIGNED == 0 /* Signed types. */
1145#define TO_PADDING_BITS (TO_FIXED_WIDTH - 1 - TO_I_F_BITS)
1146#define TO_NONPADDING_BITS (1 + TO_I_F_BITS)
1147#else /* Unsigned types. */
1148#define TO_PADDING_BITS (TO_FIXED_WIDTH - TO_I_F_BITS)
1149#define TO_NONPADDING_BITS (TO_I_F_BITS)
1150#endif
1151#define TO_HAVE_PADDING_BITS (TO_PADDING_BITS > 0)
1152#endif /* TO_TYPE == 4 */
1153
247eb06f 1154#ifdef LIBGCC2_FIXEDBIT_GNU_PREFIX
cdbf4541
BS		 1155#define FIXED_CONVERT_OP(OP,FROM,TO) __gnu_ ## OP ## FROM ## TO
1156#define FIXED_CONVERT_OP2(OP,FROM,TO) __gnu_ ## OP ## FROM ## TO ## 2
1157#else
1158#define FIXED_CONVERT_OP(OP,FROM,TO) __ ## OP ## FROM ## TO
1159#define FIXED_CONVERT_OP2(OP,FROM,TO) __ ## OP ## FROM ## TO ## 2
1160#endif
1161#define FRACT_TEMP(N1,N2) FIXED_CONVERT_OP(fract,N1,N2)
1162#define FRACT2_TEMP(N1,N2) FIXED_CONVERT_OP2(fract,N1,N2)
1163#define SATFRACT_TEMP(N1,N2) FIXED_CONVERT_OP(satfract,N1,N2)
1164#define SATFRACT2_TEMP(N1,N2) FIXED_CONVERT_OP2(satfract,N1,N2)
1165#define FRACTUNS_TEMP(N1,N2) FIXED_CONVERT_OP(fractuns,N1,N2)
1166#define SATFRACTUNS_TEMP(N1,N2) FIXED_CONVERT_OP(satfractuns,N1,N2)
154e4a0a
CF		 1167
1168/* Define conversions from fixed-point to fixed-point. */
1169#if FROM_TYPE == 4 && TO_TYPE == 4
1170
1171#if FROM_FIXED_SIZE > TO_FIXED_SIZE
1172#define BIG_SINT_C_TYPE FROM_SINT_C_TYPE
1173#define BIG_UINT_C_TYPE FROM_UINT_C_TYPE
1174#define BIG_WIDTH FROM_FIXED_WIDTH
1175#else
1176#define BIG_SINT_C_TYPE TO_SINT_C_TYPE
1177#define BIG_UINT_C_TYPE TO_UINT_C_TYPE
1178#define BIG_WIDTH TO_FIXED_WIDTH
1179#endif
1180
1181/* Check if FROM* and TO* are in the same machine class. */
1182#if ((FROM_MODE_UNSIGNED == TO_MODE_UNSIGNED) \
1183 && ((FROM_IBITS == 0) == (TO_IBITS == 0)))
1184/* Same modes: append '2' to conversion function names */
1185#define FRACT FRACT2_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1186#define SATFRACT SATFRACT2_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1187#else
1188/* Different modes: don't append '2' to conversion function names */
1189#define FRACT FRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1190#define SATFRACT SATFRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1191#endif
1192
1193extern TO_FIXED_C_TYPE FRACT (FROM_FIXED_C_TYPE);
1194extern TO_FIXED_C_TYPE SATFRACT (FROM_FIXED_C_TYPE);
1195#endif /* FROM_TYPE == 4 && TO_TYPE == 4 */
1196
1197/* Define conversions from fixed-point to signed integer. */
1198#if FROM_TYPE == 4 && TO_TYPE == 1
1199#define FRACT FRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1200extern TO_INT_C_TYPE FRACT (FROM_FIXED_C_TYPE);
1201#endif /* FROM_TYPE == 4 && TO_TYPE == 1 */
1202
1203/* Define conversions from fixed-point to unsigned integer. */
1204#if FROM_TYPE == 4 && TO_TYPE == 2
1205#define FRACTUNS FRACTUNS_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1206extern TO_INT_C_TYPE FRACTUNS (FROM_FIXED_C_TYPE);
1207#endif /* FROM_TYPE == 4 && TO_TYPE == 2 */
1208
1209/* Define conversions from fixed-point to floating-point. */
1210#if FROM_TYPE == 4 && TO_TYPE == 3
1211#define BASE1(NUM) 0x1.0p ## NUM
1212#define BASE2(NUM) BASE1(NUM)
1213#define BASE BASE2(FROM_FBITS)
1214#define FRACT FRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1215extern TO_FLOAT_C_TYPE FRACT (FROM_FIXED_C_TYPE);
1216#endif /* FROM_TYPE == 4 && TO_TYPE == 3 */
1217
1218/* Define conversions from signed integer to fixed-point. */
1219#if FROM_TYPE == 1 && TO_TYPE == 4
1220
1221#if FROM_INT_SIZE > TO_FIXED_SIZE
1222#define BIG_SINT_C_TYPE FROM_SINT_C_TYPE
1223#define BIG_UINT_C_TYPE FROM_UINT_C_TYPE
1224#define BIG_WIDTH FROM_INT_WIDTH
1225#else
1226#define BIG_SINT_C_TYPE TO_SINT_C_TYPE
1227#define BIG_UINT_C_TYPE TO_UINT_C_TYPE
1228#define BIG_WIDTH TO_FIXED_WIDTH
1229#endif
1230
1231#define FRACT FRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1232#define SATFRACT SATFRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1233extern TO_FIXED_C_TYPE FRACT (FROM_INT_C_TYPE);
1234extern TO_FIXED_C_TYPE SATFRACT (FROM_INT_C_TYPE);
1235#endif /* FROM_TYPE == 1 && TO_TYPE == 4 */
1236
1237/* Define conversions from unsigned integer to fixed-point. */
1238#if FROM_TYPE == 2 && TO_TYPE == 4
1239
1240#if FROM_INT_SIZE > TO_FIXED_SIZE
1241#define BIG_SINT_C_TYPE FROM_SINT_C_TYPE
1242#define BIG_UINT_C_TYPE FROM_UINT_C_TYPE
1243#define BIG_WIDTH FROM_INT_WIDTH
1244#else
1245#define BIG_SINT_C_TYPE TO_SINT_C_TYPE
1246#define BIG_UINT_C_TYPE TO_UINT_C_TYPE
1247#define BIG_WIDTH TO_FIXED_WIDTH
1248#endif
1249
1250#define FRACTUNS FRACTUNS_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1251#define SATFRACTUNS SATFRACTUNS_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1252extern TO_FIXED_C_TYPE FRACTUNS (FROM_INT_C_TYPE);
1253extern TO_FIXED_C_TYPE SATFRACTUNS (FROM_INT_C_TYPE);
1254#endif /* FROM_TYPE == 2 && TO_TYPE == 4 */
1255
1256/* Define conversions from floating-point to fixed-point. */
1257#if FROM_TYPE == 3 && TO_TYPE == 4
1258
1259#define BASE1(NUM) (0x1.0p ## NUM)
1260#define BASE2(NUM) BASE1(NUM)
1261#define BASE BASE2(TO_FBITS)
1262
1263#define FIXED_MAX1(NUM1,NUM2) (0x1.0p ## NUM1 - 0x1.0p- ## NUM2)
1264#define FIXED_MAX2(NUM1,NUM2) FIXED_MAX1(NUM1,NUM2)
1265#define FIXED_MAX FIXED_MAX2(TO_IBITS,TO_FBITS)
1266
1267#define FIXED_MIN1(NUM) (-0x1.0p ## NUM)
1268#define FIXED_MIN2(NUM) FIXED_MIN1(NUM)
1269#if TO_MODE_UNSIGNED == 0
1270#define FIXED_MIN FIXED_MIN2(TO_IBITS)
1271#else
1272#define FIXED_MIN 0.0
1273#endif
1274
1275#define FRACT FRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1276#define SATFRACT SATFRACT_TEMP(FROM_MODE_NAME_S,TO_MODE_NAME_S)
1277extern TO_FIXED_C_TYPE FRACT (FROM_FLOAT_C_TYPE);
1278extern TO_FIXED_C_TYPE SATFRACT (FROM_FLOAT_C_TYPE);
1279#endif /* FROM_TYPE == 3 && TO_TYPE == 4 */
1280
1281#endif /* defined (FROM_MODE_NAME_S) && defined (TO_MODE_NAME_S) */
1282
1283#endif /* _FIXED_BIT_H */
Mirror of https://gcc.gnu.org/git/gcc.git