1 /* Header file for dfp-bit.c.
2 Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 2, or (at your option) any later
11 In addition to the permissions in the GNU General Public License, the
12 Free Software Foundation gives you unlimited permission to link the
13 compiled version of this file into combinations with other programs,
14 and to distribute those combinations without any restriction coming
15 from the use of this file. (The General Public License restrictions
16 do apply in other respects; for example, they cover modification of
17 the file, and distribution when not linked into a combine
20 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
21 WARRANTY; without even the implied warranty of MERCHANTABILITY or
22 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
25 You should have received a copy of the GNU General Public License
26 along with GCC; see the file COPYING. If not, write to the Free
27 Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
35 #include <decExcept.h>
37 #include "coretypes.h"
40 #ifndef LIBGCC2_WORDS_BIG_ENDIAN
41 #define LIBGCC2_WORDS_BIG_ENDIAN WORDS_BIG_ENDIAN
44 #ifndef LIBGCC2_FLOAT_WORDS_BIG_ENDIAN
45 #define LIBGCC2_FLOAT_WORDS_BIG_ENDIAN LIBGCC2_WORDS_BIG_ENDIAN
48 #ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE
49 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE
52 #ifndef LIBGCC2_HAS_XF_MODE
53 #define LIBGCC2_HAS_XF_MODE \
54 (BITS_PER_UNIT == 8 && LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 80)
57 /* Depending on WIDTH, define a number of macros:
59 DFP_C_TYPE: type of the arguments to the libgcc functions;
62 IEEE_TYPE: the corresponding (encoded) IEEE754R type;
65 TO_INTERNAL: the name of the decNumber function to convert an
66 encoded value into the decNumber internal representation;
68 TO_ENCODED: the name of the decNumber function to convert an
69 internally represented decNumber into the encoded
72 FROM_STRING: the name of the decNumber function to read an
73 encoded value from a string.
75 TO_STRING: the name of the decNumber function to write an
76 encoded value to a string. */
79 #define DFP_C_TYPE _Decimal32
80 #define IEEE_TYPE decimal32
81 #define HOST_TO_IEEE __host_to_ieee_32
82 #define IEEE_TO_HOST __ieee_to_host_32
83 #define TO_INTERNAL __decimal32ToNumber
84 #define TO_ENCODED __decimal32FromNumber
85 #define FROM_STRING __decimal32FromString
86 #define TO_STRING __decimal32ToString
88 #define DFP_C_TYPE _Decimal64
89 #define IEEE_TYPE decimal64
90 #define HOST_TO_IEEE __host_to_ieee_64
91 #define IEEE_TO_HOST __ieee_to_host_64
92 #define TO_INTERNAL __decimal64ToNumber
93 #define TO_ENCODED __decimal64FromNumber
94 #define FROM_STRING __decimal64FromString
95 #define TO_STRING __decimal64ToString
97 #define DFP_C_TYPE _Decimal128
98 #define IEEE_TYPE decimal128
99 #define HOST_TO_IEEE __host_to_ieee_128
100 #define IEEE_TO_HOST __ieee_to_host_128
101 #define TO_INTERNAL __decimal128ToNumber
102 #define TO_ENCODED __decimal128FromNumber
103 #define FROM_STRING __decimal128FromString
104 #define TO_STRING __decimal128ToString
106 #error invalid decimal float word width
109 /* We define __DEC_EVAL_METHOD__ to 2, saying that we evaluate all
110 operations and constants to the range and precision of the _Decimal128
113 #define CONTEXT_INIT DEC_INIT_DECIMAL32
115 #define CONTEXT_INIT DEC_INIT_DECIMAL64
117 #define CONTEXT_INIT DEC_INIT_DECIMAL128
120 #ifndef DFP_INIT_ROUNDMODE
121 #define DFP_INIT_ROUNDMODE(A) A = DEC_ROUND_HALF_EVEN
124 #ifdef DFP_EXCEPTIONS_ENABLED
125 /* Return IEEE exception flags based on decNumber status flags. */
126 #define DFP_IEEE_FLAGS(DEC_FLAGS) __extension__ \
127 ({int _fe_flags = 0; \
128 if ((dec_flags & DEC_IEEE_854_Division_by_zero) != 0) \
129 _fe_flags |= FE_DIVBYZERO; \
130 if ((dec_flags & DEC_IEEE_854_Inexact) != 0) \
131 _fe_flags |= FE_INEXACT; \
132 if ((dec_flags & DEC_IEEE_854_Invalid_operation) != 0) \
133 _fe_flags |= FE_INVALID; \
134 if ((dec_flags & DEC_IEEE_854_Overflow) != 0) \
135 _fe_flags |= FE_OVERFLOW; \
136 if ((dec_flags & DEC_IEEE_854_Underflow) != 0) \
137 _fe_flags |= FE_UNDERFLOW; \
140 #define DFP_EXCEPTIONS_ENABLED 0
141 #define DFP_IEEE_FLAGS(A) 0
142 #define DFP_HANDLE_EXCEPTIONS(A) do {} while (0)
145 /* Conversions between different decimal float types use WIDTH_TO to
146 determine additional macros to define. */
148 #if defined (L_dd_to_sd) || defined (L_td_to_sd)
150 #elif defined (L_sd_to_dd) || defined (L_td_to_dd)
152 #elif defined (L_sd_to_td) || defined (L_dd_to_td)
156 /* If WIDTH_TO is defined, define additional macros:
158 DFP_C_TYPE_TO: type of the result of dfp to dfp conversion.
160 IEEE_TYPE_TO: the corresponding (encoded) IEEE754R type.
162 TO_ENCODED_TO: the name of the decNumber function to convert an
163 internally represented decNumber into the encoded representation
164 for the destination. */
167 #define DFP_C_TYPE_TO _Decimal32
168 #define IEEE_TYPE_TO decimal32
169 #define TO_ENCODED_TO __decimal32FromNumber
170 #define IEEE_TO_HOST_TO __ieee_to_host_32
172 #define DFP_C_TYPE_TO _Decimal64
173 #define IEEE_TYPE_TO decimal64
174 #define TO_ENCODED_TO __decimal64FromNumber
175 #define IEEE_TO_HOST_TO __ieee_to_host_64
176 #elif WIDTH_TO == 128
177 #define DFP_C_TYPE_TO _Decimal128
178 #define IEEE_TYPE_TO decimal128
179 #define TO_ENCODED_TO __decimal128FromNumber
180 #define IEEE_TO_HOST_TO __ieee_to_host_128
183 /* Conversions between decimal float types and integral types use INT_KIND
184 to determine the data type and C functions to use. */
186 #if defined (L_sd_to_si) || defined (L_dd_to_si) || defined (L_td_to_si) \
187 || defined (L_si_to_sd) || defined (L_si_to_dd) || defined (L_si_to_td)
189 #elif defined (L_sd_to_di) || defined (L_dd_to_di) || defined (L_td_to_di) \
190 || defined (L_di_to_sd) || defined (L_di_to_dd) || defined (L_di_to_td)
192 #elif defined (L_sd_to_usi) || defined (L_dd_to_usi) || defined (L_td_to_usi) \
193 || defined (L_usi_to_sd) || defined (L_usi_to_dd) || defined (L_usi_to_td)
195 #elif defined (L_sd_to_udi) || defined (L_dd_to_udi) || defined (L_td_to_udi) \
196 || defined (L_udi_to_sd) || defined (L_udi_to_dd) || defined (L_udi_to_td)
200 /* If INT_KIND is defined, define additional macros:
202 INT_TYPE: The integer data type.
204 INT_FMT: The format string for writing the integer to a string.
206 CAST_FOR_FMT: Cast variable of INT_KIND to C type for sprintf.
207 This works for ILP32 and LP64, won't for other type size systems.
209 STR_TO_INT: The function to read the integer from a string. */
212 #define INT_TYPE SItype
214 #define CAST_FOR_FMT(A) (int)A
215 #define STR_TO_INT strtol
217 #define INT_TYPE DItype
218 #define INT_FMT "%lld"
219 #define CAST_FOR_FMT(A) (long long)A
220 #define STR_TO_INT strtoll
222 #define INT_TYPE USItype
224 #define CAST_FOR_FMT(A) (unsigned int)A
225 #define STR_TO_INT strtoul
227 #define INT_TYPE UDItype
228 #define INT_FMT "%llu"
229 #define CAST_FOR_FMT(A) (unsigned long long)A
230 #define STR_TO_INT strtoull
233 /* Conversions between decimal float types and binary float types use
234 BFP_KIND to determine the data type and C functions to use. */
236 #if defined (L_sd_to_sf) || defined (L_dd_to_sf) || defined (L_td_to_sf) \
237 || defined (L_sf_to_sd) || defined (L_sf_to_dd) || defined (L_sf_to_td)
239 #elif defined (L_sd_to_df) || defined (L_dd_to_df ) || defined (L_td_to_df) \
240 || defined (L_df_to_sd) || defined (L_df_to_dd) || defined (L_df_to_td)
242 #elif defined (L_sd_to_xf) || defined (L_dd_to_xf ) || defined (L_td_to_xf) \
243 || defined (L_xf_to_sd) || defined (L_xf_to_dd) || defined (L_xf_to_td)
247 /* If BFP_KIND is defined, define additional macros:
249 BFP_TYPE: The binary floating point data type.
251 BFP_FMT: The format string for writing the value to a string.
253 STR_TO_BFP: The function to read the value from a string. */
256 /* strtof is declared in <stdlib.h> only for C99. */
257 extern float strtof (const char *, char **);
258 #define BFP_TYPE SFtype
260 #define STR_TO_BFP strtof
263 #define BFP_TYPE DFtype
265 #define STR_TO_BFP strtod
268 #if LIBGCC2_HAS_XF_MODE
269 /* These aren't used if XF mode is not supported. */
270 #define BFP_TYPE XFtype
272 #define BFP_VIA_TYPE double
273 #define STR_TO_BFP strtod
276 #endif /* BFP_KIND */
278 #if WIDTH == 128 || WIDTH_TO == 128
279 #include "decimal128.h"
281 #if WIDTH == 64 || WIDTH_TO == 64
282 #include "decimal64.h"
284 #if WIDTH == 32 || WIDTH_TO == 32
285 #include "decimal32.h"
287 #include "decNumber.h"
289 /* Names of arithmetic functions. */
291 #if ENABLE_DECIMAL_BID_FORMAT
292 #define DPD_BID_NAME(DPD,BID) BID
294 #define DPD_BID_NAME(DPD,BID) DPD
298 #define DFP_ADD DPD_BID_NAME(__dpd_addsd3,__bid_addsd3)
299 #define DFP_SUB DPD_BID_NAME(__dpd_subsd3,__bid_subsd3)
300 #define DFP_MULTIPLY DPD_BID_NAME(__dpd_mulsd3,__bid_mulsd3)
301 #define DFP_DIVIDE DPD_BID_NAME(__dpd_divsd3,__bid_divsd3)
302 #define DFP_EQ DPD_BID_NAME(__dpd_eqsd2,__bid_eqsd2)
303 #define DFP_NE DPD_BID_NAME(__dpd_nesd2,__bid_nesd2)
304 #define DFP_LT DPD_BID_NAME(__dpd_ltsd2,__bid_ltsd2)
305 #define DFP_GT DPD_BID_NAME(__dpd_gtsd2,__bid_gtsd2)
306 #define DFP_LE DPD_BID_NAME(__dpd_lesd2,__bid_lesd2)
307 #define DFP_GE DPD_BID_NAME(__dpd_gesd2,__bid_gesd2)
308 #define DFP_UNORD DPD_BID_NAME(__dpd_unordsd2,__bid_unordsd2)
310 #define DFP_ADD DPD_BID_NAME(__dpd_adddd3,__bid_adddd3)
311 #define DFP_SUB DPD_BID_NAME(__dpd_subdd3,__bid_subdd3)
312 #define DFP_MULTIPLY DPD_BID_NAME(__dpd_muldd3,__bid_muldd3)
313 #define DFP_DIVIDE DPD_BID_NAME(__dpd_divdd3,__bid_divdd3)
314 #define DFP_EQ DPD_BID_NAME(__dpd_eqdd2,__bid_eqdd2)
315 #define DFP_NE DPD_BID_NAME(__dpd_nedd2,__bid_nedd2)
316 #define DFP_LT DPD_BID_NAME(__dpd_ltdd2,__bid_ltdd2)
317 #define DFP_GT DPD_BID_NAME(__dpd_gtdd2,__bid_gtdd2)
318 #define DFP_LE DPD_BID_NAME(__dpd_ledd2,__bid_ledd2)
319 #define DFP_GE DPD_BID_NAME(__dpd_gedd2,__bid_gedd2)
320 #define DFP_UNORD DPD_BID_NAME(__dpd_unorddd2,__bid_unorddd2)
322 #define DFP_ADD DPD_BID_NAME(__dpd_addtd3,__bid_addtd3)
323 #define DFP_SUB DPD_BID_NAME(__dpd_subtd3,__bid_subtd3)
324 #define DFP_MULTIPLY DPD_BID_NAME(__dpd_multd3,__bid_multd3)
325 #define DFP_DIVIDE DPD_BID_NAME(__dpd_divtd3,__bid_divtd3)
326 #define DFP_EQ DPD_BID_NAME(__dpd_eqtd2,__bid_eqtd2)
327 #define DFP_NE DPD_BID_NAME(__dpd_netd2,__bid_netd2)
328 #define DFP_LT DPD_BID_NAME(__dpd_lttd2,__bid_lttd2)
329 #define DFP_GT DPD_BID_NAME(__dpd_gttd2,__bid_gttd2)
330 #define DFP_LE DPD_BID_NAME(__dpd_letd2,__bid_letd2)
331 #define DFP_GE DPD_BID_NAME(__dpd_getd2,__bid_getd2)
332 #define DFP_UNORD DPD_BID_NAME(__dpd_unordtd2,__bid_unordtd2)
335 /* Names of functions to convert between different decimal float types. */
339 #define DFP_TO_DFP DPD_BID_NAME(__dpd_extendsddd2,__bid_extendsddd2)
340 #elif WIDTH_TO == 128
341 #define DFP_TO_DFP DPD_BID_NAME(__dpd_extendsdtd2,__bid_extendsdtd2)
345 #define DFP_TO_DFP DPD_BID_NAME(__dpd_truncddsd2,__bid_truncddsd2)
346 #elif WIDTH_TO == 128
347 #define DFP_TO_DFP DPD_BID_NAME(__dpd_extendddtd2,__bid_extendddtd2)
351 #define DFP_TO_DFP DPD_BID_NAME(__dpd_trunctdsd2,__bid_trunctdsd2)
353 #define DFP_TO_DFP DPD_BID_NAME(__dpd_trunctddd2,__bid_trunctddd2)
357 /* Names of functions to convert between decimal float and integers. */
361 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatsisd,__bid_floatsisd)
362 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixsdsi,__bid_fixsdsi)
364 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatdisd,__bid_floatdisd)
365 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixsddi,__bid_fixsddi)
367 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunssisd,__bid_floatunssisd)
368 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunssdsi,__bid_fixunssdsi)
370 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunsdisd,__bid_floatunsdisd)
371 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunssddi,__bid_fixunssddi)
375 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatsidd,__bid_floatsidd)
376 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixddsi,__bid_fixddsi)
378 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatdidd,__bid_floatdidd)
379 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixdddi,__bid_fixdddi)
381 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunssidd,__bid_floatunssidd)
382 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunsddsi,__bid_fixunsddsi)
384 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunsdidd,__bid_floatunsdidd)
385 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunsdddi,__bid_fixunsdddi)
389 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatsitd,__bid_floatsitd)
390 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixtdsi,__bid_fixtdsi)
392 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatditd,__bid_floatditd)
393 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixtddi,__bid_fixtddi)
395 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunssitd,__bid_floatunssitd)
396 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunstdsi,__bid_fixunstdsi)
398 #define INT_TO_DFP DPD_BID_NAME(__dpd_floatunsditd,__bid_floatunsditd)
399 #define DFP_TO_INT DPD_BID_NAME(__dpd_fixunstddi,__bid_fixunstddi)
403 /* Names of functions to convert between decimal float and binary float. */
407 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extendsfsd,__bid_extendsfsd)
408 #define DFP_TO_BFP DPD_BID_NAME(__dpd_truncsdsf,__bid_truncsdsf)
410 #define BFP_TO_DFP DPD_BID_NAME(__dpd_truncdfsd,__bid_truncdfsd)
411 #define DFP_TO_BFP DPD_BID_NAME(__dpd_extendsddf,__bid_extendsddf)
413 #define BFP_TO_DFP DPD_BID_NAME(__dpd_truncxfsd,__bid_truncxfsd)
414 #define DFP_TO_BFP DPD_BID_NAME(__dpd_extendsdxf,__bid_extendsdxf)
415 #endif /* BFP_KIND */
419 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extendsfdd,__bid_extendsfdd)
420 #define DFP_TO_BFP DPD_BID_NAME(__dpd_truncddsf,__bid_truncddsf)
422 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extenddfdd,__bid_extenddfdd)
423 #define DFP_TO_BFP DPD_BID_NAME(__dpd_truncdddf,__bid_truncdddf)
425 #define BFP_TO_DFP DPD_BID_NAME(__dpd_truncxfdd,__bid_truncxfdd)
426 #define DFP_TO_BFP DPD_BID_NAME(__dpd_extendddxf,__bid_extendddxf)
427 #endif /* BFP_KIND */
431 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extendsftd,__bid_extendsftd)
432 #define DFP_TO_BFP DPD_BID_NAME(__dpd_trunctdsf,__bid_trunctdsf)
434 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extenddftd,__bid_extenddftd)
435 #define DFP_TO_BFP DPD_BID_NAME(__dpd_trunctddf,__bid_trunctddf)
437 #define BFP_TO_DFP DPD_BID_NAME(__dpd_extendxftd,__bid_extendxftd)
438 #define DFP_TO_BFP DPD_BID_NAME(__dpd_trunctdxf,__bid_trunctdxf)
439 #endif /* BFP_KIND */
443 /* Some handy typedefs. */
445 typedef float SFtype
__attribute__ ((mode (SF
)));
446 typedef float DFtype
__attribute__ ((mode (DF
)));
447 #if LIBGCC2_HAS_XF_MODE
448 typedef float XFtype
__attribute__ ((mode (XF
)));
449 #endif /* LIBGCC2_HAS_XF_MODE */
451 typedef int SItype
__attribute__ ((mode (SI
)));
452 typedef int DItype
__attribute__ ((mode (DI
)));
453 typedef unsigned int USItype
__attribute__ ((mode (SI
)));
454 typedef unsigned int UDItype
__attribute__ ((mode (DI
)));
456 /* The type of the result of a decimal float comparison. This must
457 match `word_mode' in GCC for the target. */
459 typedef int CMPtype
__attribute__ ((mode (word
)));
463 #if defined (L_mul_sd) || defined (L_mul_dd) || defined (L_mul_td)
464 extern DFP_C_TYPE
DFP_MULTIPLY (DFP_C_TYPE
, DFP_C_TYPE
);
467 #if defined (L_div_sd) || defined (L_div_dd) || defined (L_div_td)
468 extern DFP_C_TYPE
DFP_DIVIDE (DFP_C_TYPE
, DFP_C_TYPE
);
471 #if defined (L_addsub_sd) || defined (L_addsub_dd) || defined (L_addsub_td)
472 extern DFP_C_TYPE
DFP_ADD (DFP_C_TYPE
, DFP_C_TYPE
);
473 extern DFP_C_TYPE
DFP_SUB (DFP_C_TYPE
, DFP_C_TYPE
);
476 #if defined (L_eq_sd) || defined (L_eq_dd) || defined (L_eq_td)
477 extern CMPtype
DFP_EQ (DFP_C_TYPE
, DFP_C_TYPE
);
480 #if defined (L_ne_sd) || defined (L_ne_dd) || defined (L_ne_td)
481 extern CMPtype
DFP_NE (DFP_C_TYPE
, DFP_C_TYPE
);
484 #if defined (L_lt_sd) || defined (L_lt_dd) || defined (L_lt_td)
485 extern CMPtype
DFP_LT (DFP_C_TYPE
, DFP_C_TYPE
);
488 #if defined (L_gt_sd) || defined (L_gt_dd) || defined (L_gt_td)
489 extern CMPtype
DFP_GT (DFP_C_TYPE
, DFP_C_TYPE
);
492 #if defined (L_le_sd) || defined (L_le_dd) || defined (L_le_td)
493 extern CMPtype
DFP_LE (DFP_C_TYPE
, DFP_C_TYPE
);
496 #if defined (L_ge_sd) || defined (L_ge_dd) || defined (L_ge_td)
497 extern CMPtype
DFP_GE (DFP_C_TYPE
, DFP_C_TYPE
);
500 #if defined (L_unord_sd) || defined (L_unord_dd) || defined (L_unord_td)
501 extern CMPtype
DFP_UNORD (DFP_C_TYPE
, DFP_C_TYPE
);
504 #if defined (L_sd_to_dd) || defined (L_sd_to_td) || defined (L_dd_to_sd) \
505 || defined (L_dd_to_td) || defined (L_td_to_sd) || defined (L_td_to_dd)
506 extern DFP_C_TYPE_TO
DFP_TO_DFP (DFP_C_TYPE
);
509 #if defined (L_sd_to_si) || defined (L_dd_to_si) || defined (L_td_to_si) \
510 || defined (L_sd_to_di) || defined (L_dd_to_di) || defined (L_td_to_di) \
511 || defined (L_sd_to_usi) || defined (L_dd_to_usi) || defined (L_td_to_usi) \
512 || defined (L_sd_to_udi) || defined (L_dd_to_udi) || defined (L_td_to_udi)
513 extern INT_TYPE
DFP_TO_INT (DFP_C_TYPE
);
516 #if defined (L_si_to_sd) || defined (L_si_to_dd) || defined (L_si_to_td) \
517 || defined (L_di_to_sd) || defined (L_di_to_dd) || defined (L_di_to_td) \
518 || defined (L_usi_to_sd) || defined (L_usi_to_dd) || defined (L_usi_to_td) \
519 || defined (L_udi_to_sd) || defined (L_udi_to_dd) || defined (L_udi_to_td)
520 extern DFP_C_TYPE
INT_TO_DFP (INT_TYPE
);
523 #if defined (L_sd_to_sf) || defined (L_dd_to_sf) || defined (L_td_to_sf) \
524 || defined (L_sd_to_df) || defined (L_dd_to_df) || defined (L_td_to_df) \
525 || ((defined (L_sd_to_xf) || defined (L_dd_to_xf) || defined (L_td_to_xf)) \
526 && LIBGCC2_HAS_XF_MODE)
527 extern BFP_TYPE
DFP_TO_BFP (DFP_C_TYPE
);
530 #if defined (L_sf_to_sd) || defined (L_sf_to_dd) || defined (L_sf_to_td) \
531 || defined (L_df_to_sd) || defined (L_df_to_dd) || defined (L_df_to_td) \
532 || ((defined (L_xf_to_sd) || defined (L_xf_to_dd) || defined (L_xf_to_td)) \
533 && LIBGCC2_HAS_XF_MODE)
534 extern DFP_C_TYPE
BFP_TO_DFP (BFP_TYPE
);
537 #endif /* _DFPBIT_H */