Files

65 lines
2.4 KiB
C

/*
* Copyright (C) 2022 Ulrich Müller <ulm@gentoo.org>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, see: <http://www.gnu.org/licenses/>.
*
*
* Alternatively, at your option, you can distribute this file under
* the terms of the 2-clause BSD license.
*/
#include "config.h"
#include "test_assert.h"
#include <math.h>
#include <stdlib.h>
#include "ieee80.h"
int
main(int argc, char **argv)
{
(void)argc; (void)argv; /* unused */
/* Define only constants that can be exactly represented both in
decimal and in binary, in order to avoid rounding errors */
unsigned char in[][10] = {
{ 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* 0 */
{ 0x3f,0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* 1 */
{ 0xbf,0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* -1 */
{ 0x40,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* 2 */
{ 0x3f,0xfe,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* 0.5 */
{ 0x3f,0xf7,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* 0.005859375 */
{ 0x40,0x22,0x98,0x76,0x54,0x32,0x10,0x00,0x00,0x00 }, /* 40926266145 */
{ 0x7f,0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* inf */
{ 0xff,0xff,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00 }, /* -inf */
{ 0x7f,0xff,0xc0,0x00,0x00,0x00,0x00,0x00,0x00,0x00 } /* nan */
};
TEST_ASSERT(ieee_extended_to_double(in[0]) == 0.);
TEST_ASSERT(ieee_extended_to_double(in[1]) == 1.);
TEST_ASSERT(ieee_extended_to_double(in[2]) == -1.);
TEST_ASSERT(ieee_extended_to_double(in[3]) == 2.);
TEST_ASSERT(ieee_extended_to_double(in[4]) == 0.5);
TEST_ASSERT(ieee_extended_to_double(in[5]) == 0.005859375);
TEST_ASSERT(ieee_extended_to_double(in[6]) == 40926266145.);
#ifdef INFINITY
TEST_ASSERT(ieee_extended_to_double(in[7]) == INFINITY);
TEST_ASSERT(ieee_extended_to_double(in[8]) == -INFINITY);
#endif
#ifdef NAN
TEST_ASSERT(isnan(ieee_extended_to_double(in[9])));
#endif
return EXIT_SUCCESS;
}