From patchwork Tue Sep 19 13:00:05 2017 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Szabolcs Nagy X-Patchwork-Id: 22945 Received: (qmail 32415 invoked by alias); 19 Sep 2017 13:00:33 -0000 Mailing-List: contact libc-alpha-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: libc-alpha-owner@sourceware.org Delivered-To: mailing list libc-alpha@sourceware.org Received: (qmail 29663 invoked by uid 89); 19 Sep 2017 13:00:27 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-23.9 required=5.0 tests=AWL, BAYES_00, GIT_PATCH_0, GIT_PATCH_1, GIT_PATCH_2, GIT_PATCH_3, KAM_ASCII_DIVIDERS, RCVD_IN_DNSWL_NONE, SPF_HELO_PASS, SPF_PASS autolearn=ham version=3.3.2 spammy= X-HELO: EUR01-DB5-obe.outbound.protection.outlook.com Authentication-Results: spf=none (sender IP is ) smtp.mailfrom=Szabolcs.Nagy@arm.com; Message-ID: <59C114D5.5090009@arm.com> Date: Tue, 19 Sep 2017 14:00:05 +0100 From: Szabolcs Nagy User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:31.0) Gecko/20100101 Thunderbird/31.8.0 MIME-Version: 1.0 To: GNU C Library CC: nd@arm.com Subject: [PATCH 5/9] New generic log2f References: <59C1123F.9080003@arm.com> In-Reply-To: <59C1123F.9080003@arm.com> X-ClientProxiedBy: DB6P189CA0022.EURP189.PROD.OUTLOOK.COM (2603:10a6:6:2e::35) To VI1PR0802MB2495.eurprd08.prod.outlook.com (2603:10a6:800:b6::23) X-MS-PublicTrafficType: Email X-MS-Office365-Filtering-Correlation-Id: 0a04a308-ecd7-4858-24fd-08d4ff5e5b68 X-MS-Office365-Filtering-HT: Tenant X-Microsoft-Antispam: UriScan:; BCL:0; PCL:0; RULEID:(300000500095)(300135000095)(300000501095)(300135300095)(22001)(300000502095)(300135100095)(2017030254152)(48565401081)(300000503095)(300135400095)(49563074)(201703131423075)(201703031133081)(201702281549075)(300000504095)(300135200095)(300000505095)(300135600095)(300000506095)(300135500095); SRVR:VI1PR0802MB2495; X-Microsoft-Exchange-Diagnostics: 1; VI1PR0802MB2495; 3:2AMBoEqLgrK9W2H0hI4ieVtgv/iudyPUDb+KDLipOO4AQ3hgOdIv3zt7fH+YVUK/Od27tBGlOHfqNBXFvmAH1jLutjTXuItghzKJbrqMcllD7knK/2guA/wV83C53YISRM/su9cneteqIeRd6aja2TcxG68RXQUcsnDUhsHZZtjmDOYkLfO1OJ3njtyU3qL0/NwFoPFcX5V/Ur8r8rY5mMoZ6mUS1lQyftIV+v9EiTTwGfKt9kc77a1KKjtS8SA3; 25:4kna9W+fvAtgMxBdHYSBpqI/IIPWpvM7o22osZVzyHkOEDTmZ5NGbwOqyFzJGqXWLIOn8P/jD3volNq7R4s3vcgtl74aW6519UfsC7RwfSfnRRv46ihjbh3HVLHxDRCta0iB/FfoKEWHInwWe2HzNKr6ucpgpekW4SOHNiecT5vUEa45U4FLmhkAKkUma5jtqkudur7Fd5lcmNTsMymtU/D/zRWl/w9SvxKKpSepjhVeGuqrbhPFjNbSgk3VI4h2q4fjogBbbBROWHiW2sEqqzei2gYKnCg7DuvsOXdvtbq1Y5Om6HeCsbdEg+waW7Q5MzOAeDXyYqI/z4gTeLsmiQ==; 31:aupgmoc37eJ4jNga3HzB/iBQDtJVDGpP1Xt8NigX7uvwzKjsGvGt4vOWlUbTO8u4omSe7nIkP3GHGfYG+H0fOz+WN4B8Y8f4x4+zJxhafwBJ1DIB9eJkxmthOTXVU9uUXr2KXNzJ161m3cfEFrJxqaRq/V6IXmi5Qvw0Z9IbbL1iqkz2lpY6JXrcjMLt0rlDmkHzPSNPDdFdQO3WghvblIbBLr6uJ9EHdU7zS4vVX78= X-MS-TrafficTypeDiagnostic: VI1PR0802MB2495: NoDisclaimer: True X-Microsoft-Exchange-Diagnostics: 1; VI1PR0802MB2495; 20:tHLPcmK/dsJOVKTTQp2gHiAbQEXADToBF6gAhs322ait3qigf3tqZ5HcRft/r3sCWHX/22eMKDzhBDxr6ESeUEmAG1o/DvWM+XrITrdtEpvTX1arJ52cUA0Ou5UqnIDUy4DenzBp3zYX6rB3AVoxgKarhYs+gesDrG393fbGjoA=; 4:s7G2coaIBlVw1z5oGwHy0dn5jmdrapvLXFDsvXakvs0kNUDGUTtsD2ccAFl++s9n6n72qcNdCvNzAL7eLeEXBNXFci7di2iWYAHahn9uLuCD8o4VBEfpB95B30CbOorJMX3pFeRXxOzqroVCkIE1mm5IKw/aIciUkcbpciFtpxHcyihyevawmyzI0dLKvUz9OowVDSaQG/eKjUk9d79aXItoTYgfTdr7GpLINBEoD7xwPJ0h22X0iut0E9S4gnmp7/szOsnPUXvWM8iUFXnokNBj/fwWzRzybYtWmR3wnTY= X-Exchange-Antispam-Report-Test: UriScan:(180628864354917); X-Microsoft-Antispam-PRVS: X-Exchange-Antispam-Report-CFA-Test: BCL:0; PCL:0; RULEID:(100000700101)(100105000095)(100000701101)(100105300095)(100000702101)(100105100095)(102415395)(6040450)(2401047)(5005006)(8121501046)(93006095)(93001095)(10201501046)(3002001)(100000703101)(100105400095)(6055026)(6041248)(20161123555025)(20161123562025)(20161123564025)(20161123560025)(201703131423075)(201702281528075)(201703061421075)(201703061406153)(20161123558100)(6072148)(201708071742011)(100000704101)(100105200095)(100000705101)(100105500095); SRVR:VI1PR0802MB2495; BCL:0; PCL:0; RULEID:(100000800101)(100110000095)(100000801101)(100110300095)(100000802101)(100110100095)(100000803101)(100110400095)(100000804101)(100110200095)(100000805101)(100110500095); SRVR:VI1PR0802MB2495; X-Forefront-PRVS: 04359FAD81 X-Forefront-Antispam-Report: SFV:NSPM; SFS:(10009020)(7370300001)(4630300001)(6009001)(6049001)(39860400002)(346002)(376002)(199003)(377424004)(189002)(84326002)(2906002)(58126008)(6666003)(25786009)(68736007)(59896002)(4610100001)(5660300001)(77096006)(83506001)(4326008)(72206003)(106356001)(86362001)(80316001)(5890100001)(21490400003)(6486002)(2950100002)(76176999)(53936002)(7736002)(50986999)(54356999)(16586007)(65816999)(6916009)(270700001)(305945005)(105586002)(64126003)(478600001)(66066001)(189998001)(65806001)(65956001)(33656002)(8676002)(16526017)(101416001)(2476003)(36756003)(16576012)(81156014)(97736004)(81166006)(3846002)(316002)(568964002)(6116002)(7350300001)(87266999)(5000100001)(41533002); DIR:OUT; SFP:1101; SCL:1; SRVR:VI1PR0802MB2495; H:[10.2.206.69]; FPR:; SPF:None; PTR:InfoNoRecords; A:1; MX:1; LANG:en; Received-SPF: None (protection.outlook.com: arm.com does not designate permitted sender hosts) X-Microsoft-Exchange-Diagnostics: =?us-ascii?Q?1; VI1PR0802MB2495; 23:0o0ruk0W8jyoq0dlPufwEaDHEV8a5RJqyZwXmdx?= =?us-ascii?Q?ObgarfRoqT+s27MyIcdDNF+bm7BqcRSqyVViliZgQT5PiPgLgjOBkfjWBB3H?= =?us-ascii?Q?sIObR8866pdcKoq5lVtni8fCu5KLrC2MPAedS12+6zqCQyD0LLqT9xRlG/Z2?= =?us-ascii?Q?1+eXGHPuE1zHaOikxylUGyycE7SYG5g7Nk7Cf0u5qZyA9+JmhhIasn+dRWXw?= =?us-ascii?Q?Uz2r32PyMx9XsqU5tVPubLtb4v3k++QODzY1XNxw3MT1tqdKdYTaWiykx0TU?= =?us-ascii?Q?6oUUc6WOFkXfr6joCaq6/m1bN5ND0YKADy0KrMgJsP/DCpZJLpb0EXOiyE40?= =?us-ascii?Q?Wj+fUdKIKggtpUcb2lf2ADBN7YT9YMERfoC76k+9ZWYvwF9jcJlZ3RVypzuY?= =?us-ascii?Q?Q0TaOg70+apG7M1zrX6T2/3GuNzg1xWRp+elXAY+wL9svyV2aje7SzZ6PE+D?= =?us-ascii?Q?xb1qUXWbZl9J8skmLykqZk1hRFMtTtdJvKEUFeiJ9pp5HB22WTJ6TBxCWBLl?= =?us-ascii?Q?xCrAyPemsy15dnjM7AAxfurGedQ7vagXFYSG9zebWFa2BawgIMYs4Zq6Wnrb?= =?us-ascii?Q?orVBwb8B0E626fFlCoGm7X32kOf/QqryLKz+BK4qQEcP3JVtAd3ByMjOwzXI?= =?us-ascii?Q?pR9Bs6tRBb/ucebP00phdPMhTOK6wLXpKpBNhICfP/qkIYGpqd2IWyZGjvPR?= =?us-ascii?Q?mZCvy3KUXYB5sKnTMVzrbGLpv23gQKS8a2VYtCOtZIUO3s+aPZV7fVQJOv8X?= =?us-ascii?Q?e9bvzlOUJO21CFM2hh9RQMuvPrqTIGvejxU48GEDedeQrlREd790LuzvC0Kx?= =?us-ascii?Q?u7BYVOsodeAWzAo6GLH6CXuDqLJWGERT1fdBjzrJoD0C1zhAstQma/iY5yzW?= =?us-ascii?Q?AmQvYNMxS4eu1G7LlLo//pZD2AVoDC6Js5hS0ZNXxZimh9TkK9aT9LJgECfB?= =?us-ascii?Q?r98ghWBZ0oOrW8ynYL+f8uwrfpRqefoOzY/rticGDN/+jZBh2HtG4I5xY389?= =?us-ascii?Q?rS+QZeMVkUl3BS9BFktdmjsvg52QIlDlXoTHJcT+gXOj/enEX4c3kW1ifFJK?= =?us-ascii?Q?j9UOE1fmDvV3ykOAP5viXGND8eLNgCXDHZUEByRFbx+bFP25sUiPuN2q7UB8?= =?us-ascii?Q?/cJ3nnSQoMlT3TJ2PoDlZ7VjHujFlM9byL8xbyHZRLOS8561A1mOqAHi51FI?= =?us-ascii?Q?HJ0i1L9jr/8F03Q8ZRCpVB96dYCNk3mKO06FC+VkeOgP3rkQmnDY75gaMVww?= =?us-ascii?Q?M6cEj77adiQ8teJgBlk6ZpFYkfDVbGBWt5+Kq585GdNpQFGEA24uGlO4iCpl?= =?us-ascii?Q?+DDqp+dGiZXpkXmNpaV0VPiT3mhK9Ogd0U++82z6Jaql/gRB0vQ+z6uUmET5?= =?us-ascii?Q?dh+JAf+KsmK7md/FtUnpClxKM9amoaBtnuLJm5vACec/3SPPzY2s9tNE1TrW?= =?us-ascii?Q?wlsG6hqYGr6hCJGUT0xkE17O1dut3TU9UeAAIHqv2D0ZV+mRNTt+V0gLb0PK?= =?us-ascii?Q?ONeGCsWMcByvSUz8yaV92i7Q8hwIDBMmatB/OZQdCUlj4yD+6A8IRTgVU?= X-Microsoft-Exchange-Diagnostics: 1; VI1PR0802MB2495; 6:7F4in4Nd2WLqoDlGzxiZ/M4tR7ypxXXZNJPb0580+9JFJsOXI9AVnfqhkLHKRgAMvSc53+2i/UDJjta3ZRHvpkNZ1ifXusgej+VUfSk//clzamPyYG5g4hG1l+BwyYYEFv96O3Tg1h02t2a4CZ5ClhwnVF8IJ1q2QL67Mut1dfsgluC+MdKqAKYyjxzlv2tzbxKnT+tnTfnI2D3OS7AaY2ypqVeV7mVpQe1bXDeUa5BuPvzG/iisZhIaLpNgaR4FsH6MKyvoH5kWT0pyNmarmgkSSmA9E/kiGibUrBXuk9B647P2w40x1vAxvyzPX9nnG4khSt/9FZJliWKvRrIirQ==; 5:y7P3f+KK3ezK4k9sF3UNdJwdFY1TJQ+IXoyYrvGe4zw5WbxI0Yb25ABDRHp0iQQVi6Mb8RvAa0IcGRuGFAfd51CmHlsN6AtNxOQWOc86zxCWZOb6bknWgKjXUcGzWEDUTd9NmT8EIL31Qx//8D8P/w==; 24:HjP//1xm3kqdCLzz/+xFsjRAGWEGupcpGm32Zu61c37uuAtRjQ6HtdRkZ97/2nAr8bK0DKxYd4ebXrRjR02cmoy/nIJ3KP0MI/Y7FjJYndA=; 7:vFGQStFZZJ/co4bxedANbhd+7Fr/Vqq64Hso7/DmKkxV7sAalBilyZH8LD2H+eSOyFjdqDl9cm390ERQCZikoojCSBc9LZBoLxKZAjV03w5EsF23Okb9DXM/S7TK8eD61QCDcyg82NT5o5XRBtC+zUqbYKw3BJP4BUlK9+KMk6pdWuMnZp0Z8ccs885LCMfQq6a6zk/mQ6RoAWxpAcmBK9ShDu4erKrXo3DbF+VJVhM= SpamDiagnosticOutput: 1:99 SpamDiagnosticMetadata: NSPM X-OriginatorOrg: arm.com X-MS-Exchange-CrossTenant-OriginalArrivalTime: 19 Sep 2017 13:00:08.8361 (UTC) X-MS-Exchange-CrossTenant-FromEntityHeader: Hosted X-MS-Exchange-Transport-CrossTenantHeadersStamped: VI1PR0802MB2495 Similar to the new logf: double precision arithmetics and a small lookup table is used. The argument reduction step is the same as for the new logf. with naive ubenchmark (on aarch64): reciprocal-throughput: 2.7x faster latency: 2x faster old worst case error: 1.72 ulp new worst case error: 0.75 ulp aarch64 .text size: -252 bytes aarch64 .rodata size: +244 bytes 2017-09-19 Szabolcs Nagy * math/Makefile (type-float-routines): Add e_log2f_data. * sysdeps/ieee754/flt-32/e_log2f.c: New implementation. * sysdeps/ieee754/flt-32/e_log2f_data.c: New file. * sysdeps/ieee754/flt-32/math_config.h (__log2f_data): Define. (LOG2F_TABLE_BITS, LOG2F_POLY_ORDER): Define. * sysdeps/i386/fpu/e_log2f_data.c: New file. * sysdeps/ia64/fpu/e_log2f_data.c: New file. * sysdeps/m68k/m680x0/fpu/e_log2f_data.c: New file. diff --git a/math/Makefile b/math/Makefile index 919fec13ef..b4b3101592 100644 --- a/math/Makefile +++ b/math/Makefile @@ -115,7 +115,8 @@ type-double-routines := branred doasin dosincos halfulp mpa mpatan2 \ # float support type-float-suffix := f -type-float-routines := k_rem_pio2f math_errf e_exp2f_data e_logf_data +type-float-routines := k_rem_pio2f math_errf e_exp2f_data e_logf_data \ + e_log2f_data # _Float128 support type-float128-suffix := f128 diff --git a/sysdeps/i386/fpu/e_log2f_data.c b/sysdeps/i386/fpu/e_log2f_data.c new file mode 100644 index 0000000000..1cc8931700 --- /dev/null +++ b/sysdeps/i386/fpu/e_log2f_data.c @@ -0,0 +1 @@ +/* Not needed. */ diff --git a/sysdeps/ia64/fpu/e_log2f_data.c b/sysdeps/ia64/fpu/e_log2f_data.c new file mode 100644 index 0000000000..1cc8931700 --- /dev/null +++ b/sysdeps/ia64/fpu/e_log2f_data.c @@ -0,0 +1 @@ +/* Not needed. */ diff --git a/sysdeps/ieee754/flt-32/e_log2f.c b/sysdeps/ieee754/flt-32/e_log2f.c index 782d901094..6c42f27843 100644 --- a/sysdeps/ieee754/flt-32/e_log2f.c +++ b/sysdeps/ieee754/flt-32/e_log2f.c @@ -1,86 +1,88 @@ -/* e_logf.c -- float version of e_log.c. - * Conversion to float by Ian Lance Taylor, Cygnus Support, ian@cygnus.com. - * adapted for log2 by Ulrich Drepper - */ +/* Single-precision log2 function. + Copyright (C) 2017 Free Software Foundation, Inc. + This file is part of the GNU C Library. -/* - * ==================================================== - * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. - * - * Developed at SunPro, a Sun Microsystems, Inc. business. - * Permission to use, copy, modify, and distribute this - * software is freely granted, provided that this notice - * is preserved. - * ==================================================== - */ + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library 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 + Lesser General Public License for more details. + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, see + . */ #include -#include -#include +#include +#include "math_config.h" + +/* +LOG2F_TABLE_BITS = 4 +LOG2F_POLY_ORDER = 4 -static const float -ln2 = 0.69314718055994530942, -two25 = 3.355443200e+07, /* 0x4c000000 */ -Lg1 = 6.6666668653e-01, /* 3F2AAAAB */ -Lg2 = 4.0000000596e-01, /* 3ECCCCCD */ -Lg3 = 2.8571429849e-01, /* 3E924925 */ -Lg4 = 2.2222198546e-01, /* 3E638E29 */ -Lg5 = 1.8183572590e-01, /* 3E3A3325 */ -Lg6 = 1.5313838422e-01, /* 3E1CD04F */ -Lg7 = 1.4798198640e-01; /* 3E178897 */ +ULP error: 0.752 (nearest rounding.) +Relative error: 1.9 * 2^-26 (before rounding.) +*/ -static const float zero = 0.0; +#define N (1 << LOG2F_TABLE_BITS) +#define T __log2f_data.tab +#define A __log2f_data.poly +#define OFF 0x3f330000 float -__ieee754_log2f(float x) +__ieee754_log2f (float x) { - float hfsq,f,s,z,R,w,t1,t2,dk; - int32_t k,ix,i,j; + /* double_t for better performance on targets with FLT_EVAL_METHOD==2. */ + double_t z, r, r2, p, y, y0, invc, logc; + uint32_t ix, iz, top, tmp; + int k, i; + + ix = asuint (x); +#if WANT_ROUNDING + /* Fix sign of zero with downward rounding when x==1. */ + if (__glibc_unlikely (ix == 0x3f800000)) + return 0; +#endif + if (__glibc_unlikely (ix - 0x00800000 >= 0x7f800000 - 0x00800000)) + { + /* x < 0x1p-126 or inf or nan. */ + if (ix * 2 == 0) + return __math_divzerof (1); + if (ix == 0x7f800000) /* log2(inf) == inf. */ + return x; + if ((ix & 0x80000000) || ix * 2 >= 0xff000000) + return __math_invalidf (x); + /* x is subnormal, normalize it. */ + ix = asuint (x * 0x1p23f); + ix -= 23 << 23; + } + + /* x = 2^k z; where z is in range [OFF,2*OFF] and exact. + The range is split into N subintervals. + The ith subinterval contains z and c is near its center. */ + tmp = ix - OFF; + i = (tmp >> (23 - LOG2F_TABLE_BITS)) % N; + top = tmp & 0xff800000; + iz = ix - top; + k = (int32_t) tmp >> 23; /* arithmetic shift */ + invc = T[i].invc; + logc = T[i].logc; + z = (double_t) asfloat (iz); - GET_FLOAT_WORD(ix,x); + /* log2(x) = log1p(z/c-1)/ln2 + log2(c) + k */ + r = z * invc - 1; + y0 = logc + (double_t) k; - k=0; - if (ix < 0x00800000) { /* x < 2**-126 */ - if (__builtin_expect((ix&0x7fffffff)==0, 0)) - return -two25/__fabsf (x); /* log(+-0)=-inf */ - if (__builtin_expect(ix<0, 0)) - return (x-x)/(x-x); /* log(-#) = NaN */ - k -= 25; x *= two25; /* subnormal number, scale up x */ - GET_FLOAT_WORD(ix,x); - } - if (__builtin_expect(ix >= 0x7f800000, 0)) return x+x; - k += (ix>>23)-127; - ix &= 0x007fffff; - i = (ix+(0x95f64<<3))&0x800000; - SET_FLOAT_WORD(x,ix|(i^0x3f800000)); /* normalize x or x/2 */ - k += (i>>23); - dk = (float)k; - f = x-(float)1.0; - if((0x007fffff&(15+ix))<16) { /* |f| < 2**-20 */ - if(f==zero) - { - if (FIX_INT_FP_CONVERT_ZERO && dk == 0.0f) - dk = 0.0f; - return dk; - } - R = f*f*((float)0.5-(float)0.33333333333333333*f); - return dk-(R-f)/ln2; - } - s = f/((float)2.0+f); - z = s*s; - i = ix-(0x6147a<<3); - w = z*z; - j = (0x6b851<<3)-ix; - t1= w*(Lg2+w*(Lg4+w*Lg6)); - t2= z*(Lg1+w*(Lg3+w*(Lg5+w*Lg7))); - i |= j; - R = t2+t1; - if(i>0) { - hfsq=(float)0.5*f*f; - return dk-((hfsq-(s*(hfsq+R)))-f)/ln2; - } else { - return dk-((s*(f-R))-f)/ln2; - } + /* Pipelined polynomial evaluation to approximate log1p(r)/ln2. */ + r2 = r * r; + y = A[1] * r + A[2]; + y = A[0] * r2 + y; + p = A[3] * r + y0; + y = y * r2 + p; + return (float) y; } strong_alias (__ieee754_log2f, __log2f_finite) diff --git a/sysdeps/ieee754/flt-32/e_log2f_data.c b/sysdeps/ieee754/flt-32/e_log2f_data.c new file mode 100644 index 0000000000..e39de3ba56 --- /dev/null +++ b/sysdeps/ieee754/flt-32/e_log2f_data.c @@ -0,0 +1,44 @@ +/* Data definition for log2f. + Copyright (C) 2017 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, see + . */ + +#include "math_config.h" + +const struct log2f_data __log2f_data = { + .tab = { + { 0x1.661ec79f8f3bep+0, -0x1.efec65b963019p-2 }, + { 0x1.571ed4aaf883dp+0, -0x1.b0b6832d4fca4p-2 }, + { 0x1.49539f0f010bp+0, -0x1.7418b0a1fb77bp-2 }, + { 0x1.3c995b0b80385p+0, -0x1.39de91a6dcf7bp-2 }, + { 0x1.30d190c8864a5p+0, -0x1.01d9bf3f2b631p-2 }, + { 0x1.25e227b0b8eap+0, -0x1.97c1d1b3b7afp-3 }, + { 0x1.1bb4a4a1a343fp+0, -0x1.2f9e393af3c9fp-3 }, + { 0x1.12358f08ae5bap+0, -0x1.960cbbf788d5cp-4 }, + { 0x1.0953f419900a7p+0, -0x1.a6f9db6475fcep-5 }, + { 0x1p+0, 0x0p+0 }, + { 0x1.e608cfd9a47acp-1, 0x1.338ca9f24f53dp-4 }, + { 0x1.ca4b31f026aap-1, 0x1.476a9543891bap-3 }, + { 0x1.b2036576afce6p-1, 0x1.e840b4ac4e4d2p-3 }, + { 0x1.9c2d163a1aa2dp-1, 0x1.40645f0c6651cp-2 }, + { 0x1.886e6037841edp-1, 0x1.88e9c2c1b9ff8p-2 }, + { 0x1.767dcf5534862p-1, 0x1.ce0a44eb17bccp-2 }, + }, + .poly = { + -0x1.712b6f70a7e4dp-2, 0x1.ecabf496832ep-2, -0x1.715479ffae3dep-1, + 0x1.715475f35c8b8p0, + } +}; diff --git a/sysdeps/ieee754/flt-32/math_config.h b/sysdeps/ieee754/flt-32/math_config.h index e1feafccfe..4e27b99bf4 100644 --- a/sysdeps/ieee754/flt-32/math_config.h +++ b/sysdeps/ieee754/flt-32/math_config.h @@ -123,4 +123,15 @@ extern const struct logf_data double poly[LOGF_POLY_ORDER]; } __logf_data; +#define LOG2F_TABLE_BITS 4 +#define LOG2F_POLY_ORDER 4 +extern const struct log2f_data +{ + struct + { + double invc, logc; + } tab[1 << LOG2F_TABLE_BITS]; + double poly[LOG2F_POLY_ORDER]; +} __log2f_data; + #endif diff --git a/sysdeps/m68k/m680x0/fpu/e_log2f_data.c b/sysdeps/m68k/m680x0/fpu/e_log2f_data.c new file mode 100644 index 0000000000..1cc8931700 --- /dev/null +++ b/sysdeps/m68k/m680x0/fpu/e_log2f_data.c @@ -0,0 +1 @@ +/* Not needed. */