]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - libdecnumber/bid/host-ieee128.c
This commit was manufactured by cvs2svn to create branch 'gdb_7_0-branch'.
[thirdparty/binutils-gdb.git] / libdecnumber / bid / host-ieee128.c
CommitLineData
f5bc1778 1/* This is a software decimal floating point library.
168a2f77 2 Copyright (C) 2007, 2009 Free Software Foundation, Inc.
f5bc1778
DJ
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
168a2f77 8Software Foundation; either version 3, or (at your option) any later
f5bc1778
DJ
9version.
10
f5bc1778
DJ
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
168a2f77
DD
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/>. */
f5bc1778
DJ
24
25#include <string.h>
26
5f5dfcbe 27#include "dconfig.h"
f5bc1778
DJ
28#include "bid-dpd.h"
29#include "decimal128.h"
30
31void __host_to_ieee_128 (_Decimal128 in, decimal128 *out);
32void __ieee_to_host_128 (decimal128 in, _Decimal128 *out);
33
5f5dfcbe
DD
34/* The code for converting 128-bit values between DPD and BID presumes
35 that the 64-bit halves of the 128-bit value are in little-endian
36 order, so they need swapping on big-endian hosts. */
37
f5bc1778
DJ
38void
39__host_to_ieee_128 (_Decimal128 in, decimal128 *out)
40{
5f5dfcbe
DD
41#if WORDS_BIGENDIAN
42 memcpy ((char *) out, (char *) &in + 8, 8);
43 memcpy ((char *) out + 8, (char *) &in, 8);
44#else
f5bc1778 45 memcpy ((char *) out, (char *) &in, 16);
5f5dfcbe 46#endif
f5bc1778
DJ
47}
48
49void
50__ieee_to_host_128 (decimal128 in, _Decimal128 *out)
51{
5f5dfcbe
DD
52#if WORDS_BIGENDIAN
53 memcpy ((char *) out, (char *) &in + 8, 8);
54 memcpy ((char *) out + 8, (char *) &in, 8);
55#else
f5bc1778 56 memcpy ((char *) out, (char *) &in, 16);
5f5dfcbe 57#endif
f5bc1778 58}