mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-23 13:30:06 +00:00
Remove trailing whitespace.
This commit is contained in:
Joseph Myers
parent
5556231db2
commit
9c84384cc1
194
ChangeLog
194
ChangeLog
@ -1,3 +1,197 @@
|
|||||||
|
2013-06-05 Joseph Myers <joseph@codesourcery.com>
|
||||||
|
|
||||||
|
* crypt/speeds.c: Remove trailing whitespace.
|
||||||
|
* dlfcn/default.c: Likewise.
|
||||||
|
* elf/ifuncdep2.c: Likewise.
|
||||||
|
* elf/ifuncmain1.c: Likewise.
|
||||||
|
* elf/ifuncmain1vis.c: Likewise.
|
||||||
|
* elf/testobj.h: Likewise.
|
||||||
|
* elf/tst-stackguard1.c: Likewise.
|
||||||
|
* gmon/sys/gmon.h: Likewise.
|
||||||
|
* hurd/hurdmsg.c: Likewise.
|
||||||
|
* hurd/new-fd.c: Likewise.
|
||||||
|
* hurd/ports-get.c: Likewise.
|
||||||
|
* iconvdata/ibm1008_420.c: Likewise.
|
||||||
|
* inet/tst-getni1.c: Likewise.
|
||||||
|
* inet/tst-getni2.c: Likewise.
|
||||||
|
* libio/ioungetc.c: Likewise.
|
||||||
|
* libio/wfiledoalloc.c: Likewise.
|
||||||
|
* manual/libm-err-tab.pl: Likewise.
|
||||||
|
* math/w_dremf.c: Likewise.
|
||||||
|
* misc/ftruncate.c: Likewise.
|
||||||
|
* posix/bug-glob2.c: Likewise.
|
||||||
|
* posix/tst-pcre.c: Likewise.
|
||||||
|
* posix/wait4.c: Likewise.
|
||||||
|
* resolv/README: Likewise.
|
||||||
|
* resolv/res_debug.h: Likewise.
|
||||||
|
* resolv/tst-inet_ntop.c: Likewise.
|
||||||
|
* setjmp/bug269-setjmp.c: Likewise.
|
||||||
|
* soft-fp/extended.h: Likewise.
|
||||||
|
* soft-fp/op-1.h: Likewise.
|
||||||
|
* soft-fp/op-2.h: Likewise.
|
||||||
|
* soft-fp/op-4.h: Likewise.
|
||||||
|
* soft-fp/op-8.h: Likewise.
|
||||||
|
* soft-fp/testit.c: Likewise.
|
||||||
|
* stdio-common/bug16.c: Likewise.
|
||||||
|
* stdlib/random.c: Likewise.
|
||||||
|
* sunrpc/rpcsvc/rquota.x: Likewise.
|
||||||
|
* sysdeps/ieee754/dbl-64/powtwo.tbl: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/k_cosf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/k_rem_pio2f.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/k_sinf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/k_tanf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_atanf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_copysignf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_erff.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_fabsf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_frexpf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/flt-32/s_logbf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/e_rem_pio2l.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/k_tanl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_atanl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_erfl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_expm1l.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_log1pl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_nexttowardf.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_remquol.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_scalblnl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_scalbnl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/s_tanl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128/t_sincosl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128ibm/k_cosl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128ibm/k_sincosl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128ibm/k_sinl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128ibm/math_ldbl.h: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-128ibm/s_nextafterl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/ldbl-96/s_erfl.c: Likewise.
|
||||||
|
* sysdeps/ieee754/s_lib_version.c: Likewise.
|
||||||
|
* sysdeps/mach/hurd/check_fds.c: Likewise.
|
||||||
|
* sysdeps/mach/hurd/getsockname.c: Likewise.
|
||||||
|
* sysdeps/mach/hurd/net/if_ppp.h: Likewise.
|
||||||
|
* sysdeps/mach/hurd/recvfrom.c: Likewise.
|
||||||
|
* sysdeps/powerpc/bits/link.h: Likewise.
|
||||||
|
* sysdeps/powerpc/dl-procinfo.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/feholdexcpt.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/fenv_const.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/fesetenv.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/feupdateenv.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/s_rintf.c: Likewise.
|
||||||
|
* sysdeps/powerpc/fpu/t_sqrt.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/bits/atomic.h: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_floor.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_floorf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_isnan.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_lround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_round.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_roundf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_trunc.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/fpu/s_truncf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/fpu/s_llrint.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/fpu/s_llrintf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/fpu/w_sqrt.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/fpu/w_sqrtf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/hp-timing.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/memcmp.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/memset.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power4/wordcopy.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power5+/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power5+/fpu/s_lround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power5/fpu/w_sqrt.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power5/fpu/w_sqrtf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6/fpu/s_llrint.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6/fpu/s_llrintf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6/memcpy.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6/wordcopy.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc32/power6x/fpu/s_lround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_ceill.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_floor.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_floorf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_isnan.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_llrint.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_llrintf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_llroundf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_round.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_roundf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_roundl.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_trunc.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_truncf.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/fpu/s_truncl.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/hp-timing.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power4/fpu/w_sqrt.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power4/fpu/w_sqrtf.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power4/memcmp.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power4/memcpy.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power5+/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power5/fpu/s_isnan.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6/fpu/s_isnan.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6/memcpy.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6/wordcopy.c: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6x/fpu/s_isnan.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6x/fpu/s_llrint.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/power6x/fpu/s_llround.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/strlen.S: Likewise.
|
||||||
|
* sysdeps/powerpc/powerpc64/strncmp.S: Likewise.
|
||||||
|
* sysdeps/powerpc/sysdep.h: Likewise.
|
||||||
|
* sysdeps/s390/s390-64/s390x-mcount.S: Likewise.
|
||||||
|
* sysdeps/s390/s390-64/sub_n.S: Likewise.
|
||||||
|
* sysdeps/sh/dl-trampoline.S: Likewise.
|
||||||
|
* sysdeps/sh/memset.S: Likewise.
|
||||||
|
* sysdeps/sh/sh4/fpu/fclrexcpt.c: Likewise.
|
||||||
|
* sysdeps/sh/strlen.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/dl-trampoline.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/dotmul.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/memcpy.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/rem.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/sdiv.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/soft-fp/q_neg.c: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/strchr.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/udiv.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc32/urem.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/add_n.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/memcpy.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/rawmemchr.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/soft-fp/s_frexpl.c: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/soft-fp/sfp-machine.h: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/stpncpy.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/strncmp.S: Likewise.
|
||||||
|
* sysdeps/sparc/sparc64/strncpy.S: Likewise.
|
||||||
|
* sysdeps/unix/bsd/times.c: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/a.out.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/net/if_ppp.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/powerpc/powerpc32/setcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/powerpc/powerpc32/swapcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/powerpc/powerpc64/Versions: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/powerpc/sys/procfs.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/powerpc/sys/ucontext.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-32/clone.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-32/getcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-32/posix_fadvise64.c: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-32/setcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-32/swapcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/mmap.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/register-dump.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/setcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/socket.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/swapcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/s390/s390-64/syscall.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/scsi/scsi_ioctl.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/brk.c: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/clone.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/sh3/getcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/sh3/register-dump.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/sh3/setcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/sh3/swapcontext.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sh/vfork.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sparc/a.out.h: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sparc/sparc64/brk.S: Likewise.
|
||||||
|
* sysdeps/unix/sysv/linux/sys/personality.h: Likewise.
|
||||||
|
* sysdeps/x86_64/fpu/s_ceill.S: Likewise.
|
||||||
|
* sysdeps/x86_64/fpu/s_llrintl.S: Likewise.
|
||||||
|
* sysdeps/x86_64/strcspn.S: Likewise.
|
||||||
|
|
||||||
2013-06-05 Ryan S. Arnold <rsa@linux.vnet.ibm.com>
|
2013-06-05 Ryan S. Arnold <rsa@linux.vnet.ibm.com>
|
||||||
|
|
||||||
* locale/C-translit.h: Revert #include <stdint.h> because this is a
|
* locale/C-translit.h: Revert #include <stdint.h> because this is a
|
||||||
|
|||||||
@ -12,13 +12,13 @@
|
|||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
|
|
||||||
#ifndef SIGVTALRM
|
#ifndef SIGVTALRM
|
||||||
/*
|
/*
|
||||||
* patch from chip@chinacat.unicom.com (Chip Rosenthal):
|
* patch from chip@chinacat.unicom.com (Chip Rosenthal):
|
||||||
* you may enable it if your system does not include
|
* you may enable it if your system does not include
|
||||||
* a setitimer() function. You'll have to ensure the
|
* a setitimer() function. You'll have to ensure the
|
||||||
* existence a environment variable: HZ giving how many
|
* existence a environment variable: HZ giving how many
|
||||||
* ticks goes per second.
|
* ticks goes per second.
|
||||||
* If not existing in your default environment 50, 60
|
* If not existing in your default environment 50, 60
|
||||||
* or even 100 may be the right value. Perhaps you should
|
* or even 100 may be the right value. Perhaps you should
|
||||||
* then use 'time ./ufc 10000' instead of guessing.
|
* then use 'time ./ufc 10000' instead of guessing.
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -14,7 +14,7 @@ main (int argc, char *argv[])
|
|||||||
void *p;
|
void *p;
|
||||||
int result = 0;
|
int result = 0;
|
||||||
Dl_info info;
|
Dl_info info;
|
||||||
|
|
||||||
dladdr(main, &info);
|
dladdr(main, &info);
|
||||||
if (info.dli_fname == NULL)
|
if (info.dli_fname == NULL)
|
||||||
{
|
{
|
||||||
@ -28,7 +28,7 @@ main (int argc, char *argv[])
|
|||||||
}
|
}
|
||||||
else
|
else
|
||||||
printf ("%s: dladdr returned correct dli_fname\n", __FILE__);
|
printf ("%s: dladdr returned correct dli_fname\n", __FILE__);
|
||||||
|
|
||||||
/* Find function `main'. */
|
/* Find function `main'. */
|
||||||
p = dlsym (RTLD_DEFAULT, "main");
|
p = dlsym (RTLD_DEFAULT, "main");
|
||||||
if (p == NULL)
|
if (p == NULL)
|
||||||
|
|||||||
@ -17,7 +17,7 @@ minus_one (void)
|
|||||||
}
|
}
|
||||||
|
|
||||||
static int
|
static int
|
||||||
zero (void)
|
zero (void)
|
||||||
{
|
{
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
@ -25,7 +25,7 @@ zero (void)
|
|||||||
void * foo1_ifunc (void) __asm__ ("foo1");
|
void * foo1_ifunc (void) __asm__ ("foo1");
|
||||||
__asm__(".type foo1, %gnu_indirect_function");
|
__asm__(".type foo1, %gnu_indirect_function");
|
||||||
|
|
||||||
void *
|
void *
|
||||||
foo1_ifunc (void)
|
foo1_ifunc (void)
|
||||||
{
|
{
|
||||||
return ifunc_sel (one, minus_one, zero);
|
return ifunc_sel (one, minus_one, zero);
|
||||||
@ -34,7 +34,7 @@ foo1_ifunc (void)
|
|||||||
void * foo2_ifunc (void) __asm__ ("foo2");
|
void * foo2_ifunc (void) __asm__ ("foo2");
|
||||||
__asm__(".type foo2, %gnu_indirect_function");
|
__asm__(".type foo2, %gnu_indirect_function");
|
||||||
|
|
||||||
void *
|
void *
|
||||||
foo2_ifunc (void)
|
foo2_ifunc (void)
|
||||||
{
|
{
|
||||||
return ifunc_sel (minus_one, one, zero);
|
return ifunc_sel (minus_one, one, zero);
|
||||||
@ -43,7 +43,7 @@ foo2_ifunc (void)
|
|||||||
void * foo3_ifunc (void) __asm__ ("foo3");
|
void * foo3_ifunc (void) __asm__ ("foo3");
|
||||||
__asm__(".type foo3, %gnu_indirect_function");
|
__asm__(".type foo3, %gnu_indirect_function");
|
||||||
|
|
||||||
void *
|
void *
|
||||||
foo3_ifunc (void)
|
foo3_ifunc (void)
|
||||||
{
|
{
|
||||||
return ifunc_sel (one, zero, minus_one);
|
return ifunc_sel (one, zero, minus_one);
|
||||||
|
|||||||
@ -29,7 +29,7 @@ int
|
|||||||
main (void)
|
main (void)
|
||||||
{
|
{
|
||||||
foo_p p;
|
foo_p p;
|
||||||
|
|
||||||
if (foo_ptr != foo)
|
if (foo_ptr != foo)
|
||||||
abort ();
|
abort ();
|
||||||
if (foo () != -1)
|
if (foo () != -1)
|
||||||
|
|||||||
@ -50,7 +50,7 @@ int
|
|||||||
main (void)
|
main (void)
|
||||||
{
|
{
|
||||||
foo_p p;
|
foo_p p;
|
||||||
|
|
||||||
if (foo_ptr != foo)
|
if (foo_ptr != foo)
|
||||||
abort ();
|
abort ();
|
||||||
if ((*foo_ptr) () != -30)
|
if ((*foo_ptr) () != -30)
|
||||||
|
|||||||
@ -15,14 +15,14 @@ extern int obj3func1 (int);
|
|||||||
extern int obj3func2 (int);
|
extern int obj3func2 (int);
|
||||||
|
|
||||||
extern int obj4func1 (int);
|
extern int obj4func1 (int);
|
||||||
|
|
||||||
extern int obj4func2 (int);
|
extern int obj4func2 (int);
|
||||||
|
|
||||||
extern int obj5func1 (int);
|
extern int obj5func1 (int);
|
||||||
|
|
||||||
extern int obj5func2 (int);
|
extern int obj5func2 (int);
|
||||||
|
|
||||||
extern int obj6func1 (int);
|
extern int obj6func1 (int);
|
||||||
|
|
||||||
extern int obj6func2 (int);
|
extern int obj6func2 (int);
|
||||||
|
|
||||||
|
|||||||
@ -160,7 +160,7 @@ do_test (void)
|
|||||||
the 16 runs, something is very wrong. */
|
the 16 runs, something is very wrong. */
|
||||||
int ndifferences = 0;
|
int ndifferences = 0;
|
||||||
int ndefaults = 0;
|
int ndefaults = 0;
|
||||||
for (i = 0; i < N; ++i)
|
for (i = 0; i < N; ++i)
|
||||||
{
|
{
|
||||||
if (child_stack_chk_guards[i] != child_stack_chk_guards[i+1])
|
if (child_stack_chk_guards[i] != child_stack_chk_guards[i+1])
|
||||||
ndifferences++;
|
ndifferences++;
|
||||||
|
|||||||
@ -119,10 +119,10 @@ extern struct __bb *__bb_head;
|
|||||||
*/
|
*/
|
||||||
#define ARCINDEX u_long
|
#define ARCINDEX u_long
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Maximum number of arcs we want to allow.
|
* Maximum number of arcs we want to allow.
|
||||||
* Used to be max representable value of ARCINDEX minus 2, but now
|
* Used to be max representable value of ARCINDEX minus 2, but now
|
||||||
* that ARCINDEX is a long, that's too large; we don't really want
|
* that ARCINDEX is a long, that's too large; we don't really want
|
||||||
* to allow a 48 gigabyte table.
|
* to allow a 48 gigabyte table.
|
||||||
* The old value of 1<<16 wasn't high enough in practice for large C++
|
* The old value of 1<<16 wasn't high enough in practice for large C++
|
||||||
* programs; will 1<<20 be adequate for long? FIXME
|
* programs; will 1<<20 be adequate for long? FIXME
|
||||||
|
|||||||
@ -324,7 +324,7 @@ _S_msg_get_env_variable (mach_port_t msgport,
|
|||||||
valuelen = strlen (value);
|
valuelen = strlen (value);
|
||||||
if (valuelen > *datalen)
|
if (valuelen > *datalen)
|
||||||
{
|
{
|
||||||
if (err = __vm_allocate (__mach_task_self (),
|
if (err = __vm_allocate (__mach_task_self (),
|
||||||
(vm_address_t *) data, valuelen, 1))
|
(vm_address_t *) data, valuelen, 1))
|
||||||
return err;
|
return err;
|
||||||
}
|
}
|
||||||
|
|||||||
@ -32,7 +32,7 @@ _hurd_new_fd (io_t port, io_t ctty)
|
|||||||
/* Initialize the port cells. */
|
/* Initialize the port cells. */
|
||||||
_hurd_port_init (&d->port, port);
|
_hurd_port_init (&d->port, port);
|
||||||
_hurd_port_init (&d->ctty, ctty);
|
_hurd_port_init (&d->ctty, ctty);
|
||||||
|
|
||||||
/* And the fcntl flags. */
|
/* And the fcntl flags. */
|
||||||
d->flags = 0;
|
d->flags = 0;
|
||||||
}
|
}
|
||||||
|
|||||||
@ -37,7 +37,7 @@ _hurd_ports_get (unsigned int which, mach_port_t *result)
|
|||||||
return EINVAL;
|
return EINVAL;
|
||||||
if (which >= INIT_PORT_MAX || _hurd_ports_getters[which] == NULL)
|
if (which >= INIT_PORT_MAX || _hurd_ports_getters[which] == NULL)
|
||||||
return HURD_PORT_USE (&_hurd_ports[which],
|
return HURD_PORT_USE (&_hurd_ports[which],
|
||||||
(*result = port) == MACH_PORT_NULL ? 0
|
(*result = port) == MACH_PORT_NULL ? 0
|
||||||
: __mach_port_mod_refs (__mach_task_self (),
|
: __mach_port_mod_refs (__mach_task_self (),
|
||||||
port, MACH_PORT_RIGHT_SEND,
|
port, MACH_PORT_RIGHT_SEND,
|
||||||
+1));
|
+1));
|
||||||
|
|||||||
@ -23,138 +23,138 @@
|
|||||||
|
|
||||||
static const char __from_ibm1008_to_ibm420[256] =
|
static const char __from_ibm1008_to_ibm420[256] =
|
||||||
{
|
{
|
||||||
[0x00] = 0x00, [0x01] = 0x01, [0x02] = 0x02, [0x03] = 0x03,
|
[0x00] = 0x00, [0x01] = 0x01, [0x02] = 0x02, [0x03] = 0x03,
|
||||||
[0x04] = 0x37, [0x05] = 0x2D, [0x06] = 0x2E, [0x07] = 0x2F,
|
[0x04] = 0x37, [0x05] = 0x2D, [0x06] = 0x2E, [0x07] = 0x2F,
|
||||||
[0x08] = 0x16, [0x09] = 0x05, [0x0A] = 0x25, [0x0B] = 0x0B,
|
[0x08] = 0x16, [0x09] = 0x05, [0x0A] = 0x25, [0x0B] = 0x0B,
|
||||||
[0x0C] = 0x0C, [0x0D] = 0x0D, [0x0E] = 0x0E, [0x0F] = 0x0F,
|
[0x0C] = 0x0C, [0x0D] = 0x0D, [0x0E] = 0x0E, [0x0F] = 0x0F,
|
||||||
[0x10] = 0x10, [0x11] = 0x11, [0x12] = 0x12, [0x13] = 0x13,
|
[0x10] = 0x10, [0x11] = 0x11, [0x12] = 0x12, [0x13] = 0x13,
|
||||||
[0x14] = 0x3C, [0x15] = 0x3D, [0x16] = 0x32, [0x17] = 0x26,
|
[0x14] = 0x3C, [0x15] = 0x3D, [0x16] = 0x32, [0x17] = 0x26,
|
||||||
[0x18] = 0x18, [0x19] = 0x19, [0x1A] = 0x3F, [0x1B] = 0x27,
|
[0x18] = 0x18, [0x19] = 0x19, [0x1A] = 0x3F, [0x1B] = 0x27,
|
||||||
[0x1C] = 0x1C, [0x1D] = 0x1D, [0x1E] = 0x1E, [0x1F] = 0x1F,
|
[0x1C] = 0x1C, [0x1D] = 0x1D, [0x1E] = 0x1E, [0x1F] = 0x1F,
|
||||||
[0x20] = 0x40, [0x21] = 0x5A, [0x22] = 0x7F, [0x23] = 0x7B,
|
[0x20] = 0x40, [0x21] = 0x5A, [0x22] = 0x7F, [0x23] = 0x7B,
|
||||||
[0x24] = 0x5B, [0x25] = 0x6C, [0x26] = 0x50, [0x27] = 0x7D,
|
[0x24] = 0x5B, [0x25] = 0x6C, [0x26] = 0x50, [0x27] = 0x7D,
|
||||||
[0x28] = 0x4D, [0x29] = 0x5D, [0x2A] = 0x5C, [0x2B] = 0x4E,
|
[0x28] = 0x4D, [0x29] = 0x5D, [0x2A] = 0x5C, [0x2B] = 0x4E,
|
||||||
[0x2C] = 0x6B, [0x2D] = 0x60, [0x2E] = 0x4B, [0x2F] = 0x61,
|
[0x2C] = 0x6B, [0x2D] = 0x60, [0x2E] = 0x4B, [0x2F] = 0x61,
|
||||||
[0x30] = 0xF0, [0x31] = 0xF1, [0x32] = 0xF2, [0x33] = 0xF3,
|
[0x30] = 0xF0, [0x31] = 0xF1, [0x32] = 0xF2, [0x33] = 0xF3,
|
||||||
[0x34] = 0xF4, [0x35] = 0xF5, [0x36] = 0xF6, [0x37] = 0xF7,
|
[0x34] = 0xF4, [0x35] = 0xF5, [0x36] = 0xF6, [0x37] = 0xF7,
|
||||||
[0x38] = 0xF8, [0x39] = 0xF9, [0x3A] = 0x7A, [0x3B] = 0x5E,
|
[0x38] = 0xF8, [0x39] = 0xF9, [0x3A] = 0x7A, [0x3B] = 0x5E,
|
||||||
[0x3C] = 0x4C, [0x3D] = 0x7E, [0x3E] = 0x6E, [0x3F] = 0x6F,
|
[0x3C] = 0x4C, [0x3D] = 0x7E, [0x3E] = 0x6E, [0x3F] = 0x6F,
|
||||||
[0x40] = 0x7C, [0x41] = 0xC1, [0x42] = 0xC2, [0x43] = 0xC3,
|
[0x40] = 0x7C, [0x41] = 0xC1, [0x42] = 0xC2, [0x43] = 0xC3,
|
||||||
[0x44] = 0xC4, [0x45] = 0xC5, [0x46] = 0xC6, [0x47] = 0xC7,
|
[0x44] = 0xC4, [0x45] = 0xC5, [0x46] = 0xC6, [0x47] = 0xC7,
|
||||||
[0x48] = 0xC8, [0x49] = 0xC9, [0x4A] = 0xD1, [0x4B] = 0xD2,
|
[0x48] = 0xC8, [0x49] = 0xC9, [0x4A] = 0xD1, [0x4B] = 0xD2,
|
||||||
[0x4C] = 0xD3, [0x4D] = 0xD4, [0x4E] = 0xD5, [0x4F] = 0xD6,
|
[0x4C] = 0xD3, [0x4D] = 0xD4, [0x4E] = 0xD5, [0x4F] = 0xD6,
|
||||||
[0x50] = 0xD7, [0x51] = 0xD8, [0x52] = 0xD9, [0x53] = 0xE2,
|
[0x50] = 0xD7, [0x51] = 0xD8, [0x52] = 0xD9, [0x53] = 0xE2,
|
||||||
[0x54] = 0xE3, [0x55] = 0xE4, [0x56] = 0xE5, [0x57] = 0xE6,
|
[0x54] = 0xE3, [0x55] = 0xE4, [0x56] = 0xE5, [0x57] = 0xE6,
|
||||||
[0x58] = 0xE7, [0x59] = 0xE8, [0x5A] = 0xE9, [0x5B] = 0x53,
|
[0x58] = 0xE7, [0x59] = 0xE8, [0x5A] = 0xE9, [0x5B] = 0x53,
|
||||||
[0x5C] = 0x54, [0x5D] = 0xB6, [0x5E] = 0xB7, [0x5F] = 0x6D,
|
[0x5C] = 0x54, [0x5D] = 0xB6, [0x5E] = 0xB7, [0x5F] = 0x6D,
|
||||||
[0x60] = 0xCC, [0x61] = 0x81, [0x62] = 0x82, [0x63] = 0x83,
|
[0x60] = 0xCC, [0x61] = 0x81, [0x62] = 0x82, [0x63] = 0x83,
|
||||||
[0x64] = 0x84, [0x65] = 0x85, [0x66] = 0x86, [0x67] = 0x87,
|
[0x64] = 0x84, [0x65] = 0x85, [0x66] = 0x86, [0x67] = 0x87,
|
||||||
[0x68] = 0x88, [0x69] = 0x89, [0x6A] = 0x91, [0x6B] = 0x92,
|
[0x68] = 0x88, [0x69] = 0x89, [0x6A] = 0x91, [0x6B] = 0x92,
|
||||||
[0x6C] = 0x93, [0x6D] = 0x94, [0x6E] = 0x95, [0x6F] = 0x96,
|
[0x6C] = 0x93, [0x6D] = 0x94, [0x6E] = 0x95, [0x6F] = 0x96,
|
||||||
[0x70] = 0x97, [0x71] = 0x98, [0x72] = 0x99, [0x73] = 0xA2,
|
[0x70] = 0x97, [0x71] = 0x98, [0x72] = 0x99, [0x73] = 0xA2,
|
||||||
[0x74] = 0xA3, [0x75] = 0xA4, [0x76] = 0xA5, [0x77] = 0xA6,
|
[0x74] = 0xA3, [0x75] = 0xA4, [0x76] = 0xA5, [0x77] = 0xA6,
|
||||||
[0x78] = 0xA7, [0x79] = 0xA8, [0x7A] = 0xA9, [0x7B] = 0xCE,
|
[0x78] = 0xA7, [0x79] = 0xA8, [0x7A] = 0xA9, [0x7B] = 0xCE,
|
||||||
[0x7C] = 0x4F, [0x7D] = 0xE1, [0x7E] = 0xEC, [0x7F] = 0x07,
|
[0x7C] = 0x4F, [0x7D] = 0xE1, [0x7E] = 0xEC, [0x7F] = 0x07,
|
||||||
[0x80] = 0x20, [0x81] = 0x21, [0x82] = 0x22, [0x83] = 0x23,
|
[0x80] = 0x20, [0x81] = 0x21, [0x82] = 0x22, [0x83] = 0x23,
|
||||||
[0x84] = 0x24, [0x85] = 0x15, [0x86] = 0x06, [0x87] = 0x17,
|
[0x84] = 0x24, [0x85] = 0x15, [0x86] = 0x06, [0x87] = 0x17,
|
||||||
[0x88] = 0x28, [0x89] = 0x29, [0x8A] = 0x2A, [0x8B] = 0x2B,
|
[0x88] = 0x28, [0x89] = 0x29, [0x8A] = 0x2A, [0x8B] = 0x2B,
|
||||||
[0x8C] = 0x2C, [0x8D] = 0x09, [0x8E] = 0x0A, [0x8F] = 0x1B,
|
[0x8C] = 0x2C, [0x8D] = 0x09, [0x8E] = 0x0A, [0x8F] = 0x1B,
|
||||||
[0x90] = 0x30, [0x91] = 0x31, [0x92] = 0x1A, [0x93] = 0x33,
|
[0x90] = 0x30, [0x91] = 0x31, [0x92] = 0x1A, [0x93] = 0x33,
|
||||||
[0x94] = 0x34, [0x95] = 0x35, [0x96] = 0x36, [0x97] = 0x08,
|
[0x94] = 0x34, [0x95] = 0x35, [0x96] = 0x36, [0x97] = 0x08,
|
||||||
[0x98] = 0x38, [0x99] = 0x39, [0x9A] = 0x3A, [0x9B] = 0x3B,
|
[0x98] = 0x38, [0x99] = 0x39, [0x9A] = 0x3A, [0x9B] = 0x3B,
|
||||||
[0x9C] = 0x04, [0x9D] = 0x14, [0x9E] = 0x3E, [0x9F] = 0xFF,
|
[0x9C] = 0x04, [0x9D] = 0x14, [0x9E] = 0x3E, [0x9F] = 0xFF,
|
||||||
[0xA0] = 0x41, [0xA1] = 0x79, [0xA2] = 0x4A, [0xA3] = 0xC0,
|
[0xA0] = 0x41, [0xA1] = 0x79, [0xA2] = 0x4A, [0xA3] = 0xC0,
|
||||||
[0xA4] = 0xD0, [0xA5] = 0x42, [0xA6] = 0x6A, [0xA7] = 0x43,
|
[0xA4] = 0xD0, [0xA5] = 0x42, [0xA6] = 0x6A, [0xA7] = 0x43,
|
||||||
[0xA8] = 0x44, [0xA9] = 0x45, [0xAA] = 0x46, [0xAB] = 0x47,
|
[0xA8] = 0x44, [0xA9] = 0x45, [0xAA] = 0x46, [0xAB] = 0x47,
|
||||||
[0xAC] = 0x5F, [0xAD] = 0xCA, [0xAE] = 0x48, [0xAF] = 0x49,
|
[0xAC] = 0x5F, [0xAD] = 0xCA, [0xAE] = 0x48, [0xAF] = 0x49,
|
||||||
[0xB0] = 0xDF, [0xB1] = 0xEA, [0xB2] = 0xEB, [0xB3] = 0xED,
|
[0xB0] = 0xDF, [0xB1] = 0xEA, [0xB2] = 0xEB, [0xB3] = 0xED,
|
||||||
[0xB4] = 0xEE, [0xB5] = 0xEF, [0xB6] = 0xFB, [0xB7] = 0xFC,
|
[0xB4] = 0xEE, [0xB5] = 0xEF, [0xB6] = 0xFB, [0xB7] = 0xFC,
|
||||||
[0xB8] = 0xFD, [0xB9] = 0xFE, [0xBA] = 0x51, [0xBB] = 0x52,
|
[0xB8] = 0xFD, [0xB9] = 0xFE, [0xBA] = 0x51, [0xBB] = 0x52,
|
||||||
[0xBC] = 0x55, [0xBD] = 0x56, [0xBE] = 0x57, [0xBF] = 0x58,
|
[0xBC] = 0x55, [0xBD] = 0x56, [0xBE] = 0x57, [0xBF] = 0x58,
|
||||||
[0xC0] = 0x59, [0xC1] = 0x62, [0xC2] = 0x63, [0xC3] = 0x64,
|
[0xC0] = 0x59, [0xC1] = 0x62, [0xC2] = 0x63, [0xC3] = 0x64,
|
||||||
[0xC4] = 0x65, [0xC5] = 0x66, [0xC6] = 0x67, [0xC7] = 0x68,
|
[0xC4] = 0x65, [0xC5] = 0x66, [0xC6] = 0x67, [0xC7] = 0x68,
|
||||||
[0xC8] = 0x69, [0xC9] = 0x70, [0xCA] = 0x71, [0xCB] = 0x72,
|
[0xC8] = 0x69, [0xC9] = 0x70, [0xCA] = 0x71, [0xCB] = 0x72,
|
||||||
[0xCC] = 0x73, [0xCD] = 0x74, [0xCE] = 0x75, [0xCF] = 0x76,
|
[0xCC] = 0x73, [0xCD] = 0x74, [0xCE] = 0x75, [0xCF] = 0x76,
|
||||||
[0xD0] = 0x77, [0xD1] = 0x78, [0xD2] = 0x80, [0xD3] = 0x8A,
|
[0xD0] = 0x77, [0xD1] = 0x78, [0xD2] = 0x80, [0xD3] = 0x8A,
|
||||||
[0xD4] = 0x8B, [0xD5] = 0x8C, [0xD6] = 0x8D, [0xD7] = 0xE0,
|
[0xD4] = 0x8B, [0xD5] = 0x8C, [0xD6] = 0x8D, [0xD7] = 0xE0,
|
||||||
[0xD8] = 0x8E, [0xD9] = 0x8F, [0xDA] = 0x90, [0xDB] = 0x9A,
|
[0xD8] = 0x8E, [0xD9] = 0x8F, [0xDA] = 0x90, [0xDB] = 0x9A,
|
||||||
[0xDC] = 0x9B, [0xDD] = 0x9C, [0xDE] = 0x9D, [0xDF] = 0x9E,
|
[0xDC] = 0x9B, [0xDD] = 0x9C, [0xDE] = 0x9D, [0xDF] = 0x9E,
|
||||||
[0xE0] = 0x9F, [0xE1] = 0xA0, [0xE2] = 0xAA, [0xE3] = 0xAB,
|
[0xE0] = 0x9F, [0xE1] = 0xA0, [0xE2] = 0xAA, [0xE3] = 0xAB,
|
||||||
[0xE4] = 0xAC, [0xE5] = 0xAD, [0xE6] = 0xAE, [0xE7] = 0xAF,
|
[0xE4] = 0xAC, [0xE5] = 0xAD, [0xE6] = 0xAE, [0xE7] = 0xAF,
|
||||||
[0xE8] = 0xB0, [0xE9] = 0xB1, [0xEA] = 0xB2, [0xEB] = 0xB3,
|
[0xE8] = 0xB0, [0xE9] = 0xB1, [0xEA] = 0xB2, [0xEB] = 0xB3,
|
||||||
[0xEC] = 0xB4, [0xED] = 0xB5, [0xEE] = 0xB8, [0xEF] = 0xB9,
|
[0xEC] = 0xB4, [0xED] = 0xB5, [0xEE] = 0xB8, [0xEF] = 0xB9,
|
||||||
[0xF0] = 0xBA, [0xF1] = 0xBB, [0xF2] = 0xBC, [0xF3] = 0xBD,
|
[0xF0] = 0xBA, [0xF1] = 0xBB, [0xF2] = 0xBC, [0xF3] = 0xBD,
|
||||||
[0xF4] = 0xBE, [0xF5] = 0xBF, [0xF6] = 0xCB, [0xF7] = 0xA1,
|
[0xF4] = 0xBE, [0xF5] = 0xBF, [0xF6] = 0xCB, [0xF7] = 0xA1,
|
||||||
[0xF8] = 0xCD, [0xF9] = 0xCF, [0xFA] = 0xDA, [0xFB] = 0xDB,
|
[0xF8] = 0xCD, [0xF9] = 0xCF, [0xFA] = 0xDA, [0xFB] = 0xDB,
|
||||||
[0xFC] = 0xDC, [0xFD] = 0xDD, [0xFE] = 0xDE, [0xFF] = 0xFA,
|
[0xFC] = 0xDC, [0xFD] = 0xDD, [0xFE] = 0xDE, [0xFF] = 0xFA,
|
||||||
};
|
};
|
||||||
|
|
||||||
static const char __from_ibm420_to_ibm1008[256] =
|
static const char __from_ibm420_to_ibm1008[256] =
|
||||||
{
|
{
|
||||||
[0x00] = 0x00, [0x01] = 0x01, [0x02] = 0x02, [0x03] = 0x03,
|
[0x00] = 0x00, [0x01] = 0x01, [0x02] = 0x02, [0x03] = 0x03,
|
||||||
[0x04] = 0x9C, [0x05] = 0x09, [0x06] = 0x86, [0x07] = 0x7F,
|
[0x04] = 0x9C, [0x05] = 0x09, [0x06] = 0x86, [0x07] = 0x7F,
|
||||||
[0x08] = 0x97, [0x09] = 0x8D, [0x0A] = 0x8E, [0x0B] = 0x0B,
|
[0x08] = 0x97, [0x09] = 0x8D, [0x0A] = 0x8E, [0x0B] = 0x0B,
|
||||||
[0x0C] = 0x0C, [0x0D] = 0x0D, [0x0E] = 0x0E, [0x0F] = 0x0F,
|
[0x0C] = 0x0C, [0x0D] = 0x0D, [0x0E] = 0x0E, [0x0F] = 0x0F,
|
||||||
[0x10] = 0x10, [0x11] = 0x11, [0x12] = 0x12, [0x13] = 0x13,
|
[0x10] = 0x10, [0x11] = 0x11, [0x12] = 0x12, [0x13] = 0x13,
|
||||||
[0x14] = 0x9D, [0x15] = 0x85, [0x16] = 0x08, [0x17] = 0x87,
|
[0x14] = 0x9D, [0x15] = 0x85, [0x16] = 0x08, [0x17] = 0x87,
|
||||||
[0x18] = 0x18, [0x19] = 0x19, [0x1A] = 0x92, [0x1B] = 0x8F,
|
[0x18] = 0x18, [0x19] = 0x19, [0x1A] = 0x92, [0x1B] = 0x8F,
|
||||||
[0x1C] = 0x1C, [0x1D] = 0x1D, [0x1E] = 0x1E, [0x1F] = 0x1F,
|
[0x1C] = 0x1C, [0x1D] = 0x1D, [0x1E] = 0x1E, [0x1F] = 0x1F,
|
||||||
[0x20] = 0x80, [0x21] = 0x81, [0x22] = 0x82, [0x23] = 0x83,
|
[0x20] = 0x80, [0x21] = 0x81, [0x22] = 0x82, [0x23] = 0x83,
|
||||||
[0x24] = 0x84, [0x25] = 0x0A, [0x26] = 0x17, [0x27] = 0x1B,
|
[0x24] = 0x84, [0x25] = 0x0A, [0x26] = 0x17, [0x27] = 0x1B,
|
||||||
[0x28] = 0x88, [0x29] = 0x89, [0x2A] = 0x8A, [0x2B] = 0x8B,
|
[0x28] = 0x88, [0x29] = 0x89, [0x2A] = 0x8A, [0x2B] = 0x8B,
|
||||||
[0x2C] = 0x8C, [0x2D] = 0x05, [0x2E] = 0x06, [0x2F] = 0x07,
|
[0x2C] = 0x8C, [0x2D] = 0x05, [0x2E] = 0x06, [0x2F] = 0x07,
|
||||||
[0x30] = 0x90, [0x31] = 0x91, [0x32] = 0x16, [0x33] = 0x93,
|
[0x30] = 0x90, [0x31] = 0x91, [0x32] = 0x16, [0x33] = 0x93,
|
||||||
[0x34] = 0x94, [0x35] = 0x95, [0x36] = 0x96, [0x37] = 0x04,
|
[0x34] = 0x94, [0x35] = 0x95, [0x36] = 0x96, [0x37] = 0x04,
|
||||||
[0x38] = 0x98, [0x39] = 0x99, [0x3A] = 0x9A, [0x3B] = 0x9B,
|
[0x38] = 0x98, [0x39] = 0x99, [0x3A] = 0x9A, [0x3B] = 0x9B,
|
||||||
[0x3C] = 0x14, [0x3D] = 0x15, [0x3E] = 0x9E, [0x3F] = 0x1A,
|
[0x3C] = 0x14, [0x3D] = 0x15, [0x3E] = 0x9E, [0x3F] = 0x1A,
|
||||||
[0x40] = 0x20, [0x41] = 0xA0, [0x42] = 0xA5, [0x43] = 0xA7,
|
[0x40] = 0x20, [0x41] = 0xA0, [0x42] = 0xA5, [0x43] = 0xA7,
|
||||||
[0x44] = 0xA8, [0x45] = 0xA9, [0x46] = 0xAA, [0x47] = 0xAB,
|
[0x44] = 0xA8, [0x45] = 0xA9, [0x46] = 0xAA, [0x47] = 0xAB,
|
||||||
[0x48] = 0xAE, [0x49] = 0xAF, [0x4A] = 0xA2, [0x4B] = 0x2E,
|
[0x48] = 0xAE, [0x49] = 0xAF, [0x4A] = 0xA2, [0x4B] = 0x2E,
|
||||||
[0x4C] = 0x3C, [0x4D] = 0x28, [0x4E] = 0x2B, [0x4F] = 0x7C,
|
[0x4C] = 0x3C, [0x4D] = 0x28, [0x4E] = 0x2B, [0x4F] = 0x7C,
|
||||||
[0x50] = 0x26, [0x51] = 0xBA, [0x52] = 0xBB, [0x53] = 0x5B,
|
[0x50] = 0x26, [0x51] = 0xBA, [0x52] = 0xBB, [0x53] = 0x5B,
|
||||||
[0x54] = 0x5C, [0x55] = 0xBC, [0x56] = 0xBD, [0x57] = 0xBE,
|
[0x54] = 0x5C, [0x55] = 0xBC, [0x56] = 0xBD, [0x57] = 0xBE,
|
||||||
[0x58] = 0xBF, [0x59] = 0xC0, [0x5A] = 0x21, [0x5B] = 0x24,
|
[0x58] = 0xBF, [0x59] = 0xC0, [0x5A] = 0x21, [0x5B] = 0x24,
|
||||||
[0x5C] = 0x2A, [0x5D] = 0x29, [0x5E] = 0x3B, [0x5F] = 0xAC,
|
[0x5C] = 0x2A, [0x5D] = 0x29, [0x5E] = 0x3B, [0x5F] = 0xAC,
|
||||||
[0x60] = 0x2D, [0x61] = 0x2F, [0x62] = 0xC1, [0x63] = 0xC2,
|
[0x60] = 0x2D, [0x61] = 0x2F, [0x62] = 0xC1, [0x63] = 0xC2,
|
||||||
[0x64] = 0xC3, [0x65] = 0xC4, [0x66] = 0xC5, [0x67] = 0xC6,
|
[0x64] = 0xC3, [0x65] = 0xC4, [0x66] = 0xC5, [0x67] = 0xC6,
|
||||||
[0x68] = 0xC7, [0x69] = 0xC8, [0x6A] = 0xA6, [0x6B] = 0x2C,
|
[0x68] = 0xC7, [0x69] = 0xC8, [0x6A] = 0xA6, [0x6B] = 0x2C,
|
||||||
[0x6C] = 0x25, [0x6D] = 0x5F, [0x6E] = 0x3E, [0x6F] = 0x3F,
|
[0x6C] = 0x25, [0x6D] = 0x5F, [0x6E] = 0x3E, [0x6F] = 0x3F,
|
||||||
[0x70] = 0xC9, [0x71] = 0xCA, [0x72] = 0xCB, [0x73] = 0xCC,
|
[0x70] = 0xC9, [0x71] = 0xCA, [0x72] = 0xCB, [0x73] = 0xCC,
|
||||||
[0x74] = 0xCD, [0x75] = 0xCE, [0x76] = 0xCF, [0x77] = 0xD0,
|
[0x74] = 0xCD, [0x75] = 0xCE, [0x76] = 0xCF, [0x77] = 0xD0,
|
||||||
[0x78] = 0xD1, [0x79] = 0xA1, [0x7A] = 0x3A, [0x7B] = 0x23,
|
[0x78] = 0xD1, [0x79] = 0xA1, [0x7A] = 0x3A, [0x7B] = 0x23,
|
||||||
[0x7C] = 0x40, [0x7D] = 0x27, [0x7E] = 0x3D, [0x7F] = 0x22,
|
[0x7C] = 0x40, [0x7D] = 0x27, [0x7E] = 0x3D, [0x7F] = 0x22,
|
||||||
[0x80] = 0xD2, [0x81] = 0x61, [0x82] = 0x62, [0x83] = 0x63,
|
[0x80] = 0xD2, [0x81] = 0x61, [0x82] = 0x62, [0x83] = 0x63,
|
||||||
[0x84] = 0x64, [0x85] = 0x65, [0x86] = 0x66, [0x87] = 0x67,
|
[0x84] = 0x64, [0x85] = 0x65, [0x86] = 0x66, [0x87] = 0x67,
|
||||||
[0x88] = 0x68, [0x89] = 0x69, [0x8A] = 0xD3, [0x8B] = 0xD4,
|
[0x88] = 0x68, [0x89] = 0x69, [0x8A] = 0xD3, [0x8B] = 0xD4,
|
||||||
[0x8C] = 0xD5, [0x8D] = 0xD6, [0x8E] = 0xD8, [0x8F] = 0xD9,
|
[0x8C] = 0xD5, [0x8D] = 0xD6, [0x8E] = 0xD8, [0x8F] = 0xD9,
|
||||||
[0x90] = 0xDA, [0x91] = 0x6A, [0x92] = 0x6B, [0x93] = 0x6C,
|
[0x90] = 0xDA, [0x91] = 0x6A, [0x92] = 0x6B, [0x93] = 0x6C,
|
||||||
[0x94] = 0x6D, [0x95] = 0x6E, [0x96] = 0x6F, [0x97] = 0x70,
|
[0x94] = 0x6D, [0x95] = 0x6E, [0x96] = 0x6F, [0x97] = 0x70,
|
||||||
[0x98] = 0x71, [0x99] = 0x72, [0x9A] = 0xDB, [0x9B] = 0xDC,
|
[0x98] = 0x71, [0x99] = 0x72, [0x9A] = 0xDB, [0x9B] = 0xDC,
|
||||||
[0x9C] = 0xDD, [0x9D] = 0xDE, [0x9E] = 0xDF, [0x9F] = 0xE0,
|
[0x9C] = 0xDD, [0x9D] = 0xDE, [0x9E] = 0xDF, [0x9F] = 0xE0,
|
||||||
[0xA0] = 0xE1, [0xA1] = 0xF7, [0xA2] = 0x73, [0xA3] = 0x74,
|
[0xA0] = 0xE1, [0xA1] = 0xF7, [0xA2] = 0x73, [0xA3] = 0x74,
|
||||||
[0xA4] = 0x75, [0xA5] = 0x76, [0xA6] = 0x77, [0xA7] = 0x78,
|
[0xA4] = 0x75, [0xA5] = 0x76, [0xA6] = 0x77, [0xA7] = 0x78,
|
||||||
[0xA8] = 0x79, [0xA9] = 0x7A, [0xAA] = 0xE2, [0xAB] = 0xE3,
|
[0xA8] = 0x79, [0xA9] = 0x7A, [0xAA] = 0xE2, [0xAB] = 0xE3,
|
||||||
[0xAC] = 0xE4, [0xAD] = 0xE5, [0xAE] = 0xE6, [0xAF] = 0xE7,
|
[0xAC] = 0xE4, [0xAD] = 0xE5, [0xAE] = 0xE6, [0xAF] = 0xE7,
|
||||||
[0xB0] = 0xE8, [0xB1] = 0xE9, [0xB2] = 0xEA, [0xB3] = 0xEB,
|
[0xB0] = 0xE8, [0xB1] = 0xE9, [0xB2] = 0xEA, [0xB3] = 0xEB,
|
||||||
[0xB4] = 0xEC, [0xB5] = 0xED, [0xB6] = 0x5D, [0xB7] = 0x5E,
|
[0xB4] = 0xEC, [0xB5] = 0xED, [0xB6] = 0x5D, [0xB7] = 0x5E,
|
||||||
[0xB8] = 0xEE, [0xB9] = 0xEF, [0xBA] = 0xF0, [0xBB] = 0xF1,
|
[0xB8] = 0xEE, [0xB9] = 0xEF, [0xBA] = 0xF0, [0xBB] = 0xF1,
|
||||||
[0xBC] = 0xF2, [0xBD] = 0xF3, [0xBE] = 0xF4, [0xBF] = 0xF5,
|
[0xBC] = 0xF2, [0xBD] = 0xF3, [0xBE] = 0xF4, [0xBF] = 0xF5,
|
||||||
[0xC0] = 0xA3, [0xC1] = 0x41, [0xC2] = 0x42, [0xC3] = 0x43,
|
[0xC0] = 0xA3, [0xC1] = 0x41, [0xC2] = 0x42, [0xC3] = 0x43,
|
||||||
[0xC4] = 0x44, [0xC5] = 0x45, [0xC6] = 0x46, [0xC7] = 0x47,
|
[0xC4] = 0x44, [0xC5] = 0x45, [0xC6] = 0x46, [0xC7] = 0x47,
|
||||||
[0xC8] = 0x48, [0xC9] = 0x49, [0xCA] = 0xAD, [0xCB] = 0xF6,
|
[0xC8] = 0x48, [0xC9] = 0x49, [0xCA] = 0xAD, [0xCB] = 0xF6,
|
||||||
[0xCC] = 0x60, [0xCD] = 0xF8, [0xCE] = 0x7B, [0xCF] = 0xF9,
|
[0xCC] = 0x60, [0xCD] = 0xF8, [0xCE] = 0x7B, [0xCF] = 0xF9,
|
||||||
[0xD0] = 0xA4, [0xD1] = 0x4A, [0xD2] = 0x4B, [0xD3] = 0x4C,
|
[0xD0] = 0xA4, [0xD1] = 0x4A, [0xD2] = 0x4B, [0xD3] = 0x4C,
|
||||||
[0xD4] = 0x4D, [0xD5] = 0x4E, [0xD6] = 0x4F, [0xD7] = 0x50,
|
[0xD4] = 0x4D, [0xD5] = 0x4E, [0xD6] = 0x4F, [0xD7] = 0x50,
|
||||||
[0xD8] = 0x51, [0xD9] = 0x52, [0xDA] = 0xFA, [0xDB] = 0xFB,
|
[0xD8] = 0x51, [0xD9] = 0x52, [0xDA] = 0xFA, [0xDB] = 0xFB,
|
||||||
[0xDC] = 0xFC, [0xDD] = 0xFD, [0xDE] = 0xFE, [0xDF] = 0xB0,
|
[0xDC] = 0xFC, [0xDD] = 0xFD, [0xDE] = 0xFE, [0xDF] = 0xB0,
|
||||||
[0xE0] = 0xD7, [0xE1] = 0x7D, [0xE2] = 0x53, [0xE3] = 0x54,
|
[0xE0] = 0xD7, [0xE1] = 0x7D, [0xE2] = 0x53, [0xE3] = 0x54,
|
||||||
[0xE4] = 0x55, [0xE5] = 0x56, [0xE6] = 0x57, [0xE7] = 0x58,
|
[0xE4] = 0x55, [0xE5] = 0x56, [0xE6] = 0x57, [0xE7] = 0x58,
|
||||||
[0xE8] = 0x59, [0xE9] = 0x5A, [0xEA] = 0xB1, [0xEB] = 0xB2,
|
[0xE8] = 0x59, [0xE9] = 0x5A, [0xEA] = 0xB1, [0xEB] = 0xB2,
|
||||||
[0xEC] = 0x7E, [0xED] = 0xB3, [0xEE] = 0xB4, [0xEF] = 0xB5,
|
[0xEC] = 0x7E, [0xED] = 0xB3, [0xEE] = 0xB4, [0xEF] = 0xB5,
|
||||||
[0xF0] = 0x30, [0xF1] = 0x31, [0xF2] = 0x32, [0xF3] = 0x33,
|
[0xF0] = 0x30, [0xF1] = 0x31, [0xF2] = 0x32, [0xF3] = 0x33,
|
||||||
[0xF4] = 0x34, [0xF5] = 0x35, [0xF6] = 0x36, [0xF7] = 0x37,
|
[0xF4] = 0x34, [0xF5] = 0x35, [0xF6] = 0x36, [0xF7] = 0x37,
|
||||||
[0xF8] = 0x38, [0xF9] = 0x39, [0xFA] = 0xFF, [0xFB] = 0xB6,
|
[0xF8] = 0x38, [0xF9] = 0x39, [0xFA] = 0xFF, [0xFB] = 0xB6,
|
||||||
[0xFC] = 0xB7, [0xFD] = 0xB8, [0xFE] = 0xB9, [0xFF] = 0x9F,
|
[0xFC] = 0xB7, [0xFD] = 0xB8, [0xFE] = 0xB9, [0xFF] = 0x9F,
|
||||||
};
|
};
|
||||||
|
|
||||||
#define CHARSET_NAME "IBM1008//"
|
#define CHARSET_NAME "IBM1008//"
|
||||||
|
|||||||
@ -19,7 +19,7 @@ do_test (void)
|
|||||||
puts ("failed without NI_NAMEREQD");
|
puts ("failed without NI_NAMEREQD");
|
||||||
retval = 1;
|
retval = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
r = getnameinfo((struct sockaddr *) &s, sizeof (s), NULL, 0, NULL, 0,
|
r = getnameinfo((struct sockaddr *) &s, sizeof (s), NULL, 0, NULL, 0,
|
||||||
NI_NUMERICHOST | NI_NUMERICSERV | NI_NAMEREQD);
|
NI_NUMERICHOST | NI_NUMERICSERV | NI_NAMEREQD);
|
||||||
printf("r = %d\n", r);
|
printf("r = %d\n", r);
|
||||||
|
|||||||
@ -23,7 +23,7 @@ do_test (void)
|
|||||||
puts ("failed without NI_NAMEREQD");
|
puts ("failed without NI_NAMEREQD");
|
||||||
retval = 1;
|
retval = 1;
|
||||||
}
|
}
|
||||||
|
|
||||||
buf[0] = '\0';
|
buf[0] = '\0';
|
||||||
r = getnameinfo((struct sockaddr *) &s, sizeof (s), buf, sizeof (buf),
|
r = getnameinfo((struct sockaddr *) &s, sizeof (s), buf, sizeof (buf),
|
||||||
NULL, 0, NI_NUMERICSERV | NI_NAMEREQD);
|
NULL, 0, NI_NUMERICSERV | NI_NAMEREQD);
|
||||||
|
|||||||
@ -35,7 +35,7 @@ _IO_ungetc (c, fp)
|
|||||||
CHECK_FILE (fp, EOF);
|
CHECK_FILE (fp, EOF);
|
||||||
if (c == EOF)
|
if (c == EOF)
|
||||||
return EOF;
|
return EOF;
|
||||||
_IO_acquire_lock (fp);
|
_IO_acquire_lock (fp);
|
||||||
result = _IO_sputbackc (fp, (unsigned char) c);
|
result = _IO_sputbackc (fp, (unsigned char) c);
|
||||||
_IO_release_lock (fp);
|
_IO_release_lock (fp);
|
||||||
return result;
|
return result;
|
||||||
|
|||||||
@ -27,7 +27,7 @@
|
|||||||
/*
|
/*
|
||||||
Copyright (C) 1990 The Regents of the University of California.
|
Copyright (C) 1990 The Regents of the University of California.
|
||||||
All rights reserved.
|
All rights reserved.
|
||||||
|
|
||||||
Redistribution and use in source and binary forms, with or without
|
Redistribution and use in source and binary forms, with or without
|
||||||
modification, are permitted provided that the following conditions
|
modification, are permitted provided that the following conditions
|
||||||
are met:
|
are met:
|
||||||
@ -40,7 +40,7 @@
|
|||||||
4. Neither the name of the University nor the names of its contributors
|
4. Neither the name of the University nor the names of its contributors
|
||||||
may be used to endorse or promote products derived from this software
|
may be used to endorse or promote products derived from this software
|
||||||
without specific prior written permission.
|
without specific prior written permission.
|
||||||
|
|
||||||
THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
||||||
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||||
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||||
|
|||||||
@ -235,6 +235,6 @@ sub by_platforms {
|
|||||||
|
|
||||||
$pa = $pplatforms{$a} ? $pplatforms{$a} : $a;
|
$pa = $pplatforms{$a} ? $pplatforms{$a} : $a;
|
||||||
$pb = $pplatforms{$b} ? $pplatforms{$b} : $b;
|
$pb = $pplatforms{$b} ? $pplatforms{$b} : $b;
|
||||||
|
|
||||||
return $pa cmp $pb;
|
return $pa cmp $pb;
|
||||||
}
|
}
|
||||||
|
|||||||
@ -1,6 +1,6 @@
|
|||||||
/*
|
/*
|
||||||
* dremf() wrapper for remainderf().
|
* dremf() wrapper for remainderf().
|
||||||
*
|
*
|
||||||
* Written by J.T. Conklin, <jtc@wimsey.com>
|
* Written by J.T. Conklin, <jtc@wimsey.com>
|
||||||
* Placed into the Public Domain, 1994.
|
* Placed into the Public Domain, 1994.
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -30,5 +30,5 @@ __ftruncate (fd, length)
|
|||||||
}
|
}
|
||||||
|
|
||||||
weak_alias (__ftruncate, ftruncate)
|
weak_alias (__ftruncate, ftruncate)
|
||||||
|
|
||||||
stub_warning (ftruncate)
|
stub_warning (ftruncate)
|
||||||
|
|||||||
@ -276,7 +276,7 @@ do_test (void)
|
|||||||
!= GLOB_ABORTED)
|
!= GLOB_ABORTED)
|
||||||
{
|
{
|
||||||
puts ("glob did not fail with GLOB_ABORTED");
|
puts ("glob did not fail with GLOB_ABORTED");
|
||||||
exit (EXIT_FAILURE);
|
exit (EXIT_FAILURE);
|
||||||
}
|
}
|
||||||
|
|
||||||
globfree (&gl);
|
globfree (&gl);
|
||||||
@ -288,7 +288,7 @@ do_test (void)
|
|||||||
if (glob ("dir2/*", GLOB_DOOFFS, NULL, &gl) != GLOB_NOMATCH)
|
if (glob ("dir2/*", GLOB_DOOFFS, NULL, &gl) != GLOB_NOMATCH)
|
||||||
{
|
{
|
||||||
puts ("glob did not fail with GLOB_NOMATCH");
|
puts ("glob did not fail with GLOB_NOMATCH");
|
||||||
exit (EXIT_FAILURE);
|
exit (EXIT_FAILURE);
|
||||||
}
|
}
|
||||||
|
|
||||||
globfree (&gl);
|
globfree (&gl);
|
||||||
|
|||||||
@ -132,7 +132,7 @@ main (int argc, char **argv)
|
|||||||
{
|
{
|
||||||
regex_t re;
|
regex_t re;
|
||||||
int n;
|
int n;
|
||||||
|
|
||||||
if (!pattern_valid)
|
if (!pattern_valid)
|
||||||
{
|
{
|
||||||
printf ("%zd: No previous valid pattern %s\n", linenum, line);
|
printf ("%zd: No previous valid pattern %s\n", linenum, line);
|
||||||
|
|||||||
@ -20,7 +20,7 @@
|
|||||||
#include <errno.h>
|
#include <errno.h>
|
||||||
|
|
||||||
pid_t
|
pid_t
|
||||||
__wait4 (__pid_t pid, __WAIT_STATUS stat_loc, int options,
|
__wait4 (__pid_t pid, __WAIT_STATUS stat_loc, int options,
|
||||||
struct rusage *usage)
|
struct rusage *usage)
|
||||||
{
|
{
|
||||||
__set_errno (ENOSYS);
|
__set_errno (ENOSYS);
|
||||||
|
|||||||
@ -62,7 +62,7 @@ the `gethostby*' family of functions, which means that for example
|
|||||||
traditional resolver interfaces however, continue to use a single
|
traditional resolver interfaces however, continue to use a single
|
||||||
resolver state and are therefore still thread-unsafe. The resolver
|
resolver state and are therefore still thread-unsafe. The resolver
|
||||||
state is the same resolver state that is used for the initial ("main")
|
state is the same resolver state that is used for the initial ("main")
|
||||||
thread.
|
thread.
|
||||||
|
|
||||||
This has the following consequences for existing binaries and source
|
This has the following consequences for existing binaries and source
|
||||||
code:
|
code:
|
||||||
|
|||||||
@ -31,4 +31,4 @@
|
|||||||
} else {}
|
} else {}
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#endif /* _RES_DEBUG_H_ */
|
#endif /* _RES_DEBUG_H_ */
|
||||||
|
|||||||
@ -106,6 +106,6 @@ main (void)
|
|||||||
result++;
|
result++;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
return result;
|
return result;
|
||||||
}
|
}
|
||||||
|
|||||||
@ -29,7 +29,7 @@ int n_x = 6;
|
|||||||
static int g_counter = 0;
|
static int g_counter = 0;
|
||||||
|
|
||||||
int
|
int
|
||||||
f (void)
|
f (void)
|
||||||
{
|
{
|
||||||
static int counter = 0;
|
static int counter = 0;
|
||||||
static int way_point1 = 3;
|
static int way_point1 = 3;
|
||||||
|
|||||||
@ -203,7 +203,7 @@ union _FP_UNION_E
|
|||||||
* anyway, we optimize it by doing most of the calculations
|
* anyway, we optimize it by doing most of the calculations
|
||||||
* in two UWtype registers instead of four.
|
* in two UWtype registers instead of four.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define _FP_SQRT_MEAT_E(R, S, T, X, q) \
|
#define _FP_SQRT_MEAT_E(R, S, T, X, q) \
|
||||||
do { \
|
do { \
|
||||||
q = (_FP_W_TYPE)1 << (_FP_W_TYPE_SIZE - 1); \
|
q = (_FP_W_TYPE)1 << (_FP_W_TYPE_SIZE - 1); \
|
||||||
@ -416,7 +416,7 @@ union _FP_UNION_E
|
|||||||
R##_f0 |= _FP_WORK_STICKY; \
|
R##_f0 |= _FP_WORK_STICKY; \
|
||||||
} \
|
} \
|
||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
#define FP_CMP_E(r,X,Y,un) _FP_CMP(E,2,r,X,Y,un)
|
#define FP_CMP_E(r,X,Y,un) _FP_CMP(E,2,r,X,Y,un)
|
||||||
#define FP_CMP_EQ_E(r,X,Y) _FP_CMP_EQ(E,2,r,X,Y)
|
#define FP_CMP_EQ_E(r,X,Y) _FP_CMP_EQ(E,2,r,X,Y)
|
||||||
#define FP_CMP_UNORD_E(r,X,Y) _FP_CMP_UNORD(E,2,r,X,Y)
|
#define FP_CMP_UNORD_E(r,X,Y) _FP_CMP_UNORD(E,2,r,X,Y)
|
||||||
|
|||||||
@ -255,14 +255,14 @@ do { \
|
|||||||
udiv_qrnnd(_q, _r, _nh, _nl, Y##_f); \
|
udiv_qrnnd(_q, _r, _nh, _nl, Y##_f); \
|
||||||
R##_f = _q | (_r != 0); \
|
R##_f = _q | (_r != 0); \
|
||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Square root algorithms:
|
* Square root algorithms:
|
||||||
* We have just one right now, maybe Newton approximation
|
* We have just one right now, maybe Newton approximation
|
||||||
* should be added for those machines where division is fast.
|
* should be added for those machines where division is fast.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define _FP_SQRT_MEAT_1(R, S, T, X, q) \
|
#define _FP_SQRT_MEAT_1(R, S, T, X, q) \
|
||||||
do { \
|
do { \
|
||||||
while (q != _FP_WORK_ROUND) \
|
while (q != _FP_WORK_ROUND) \
|
||||||
@ -286,7 +286,7 @@ do { \
|
|||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Assembly/disassembly for converting to/from integral types.
|
* Assembly/disassembly for converting to/from integral types.
|
||||||
* No shifting or overflow handled here.
|
* No shifting or overflow handled here.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|||||||
@ -145,7 +145,7 @@
|
|||||||
#define _FP_MAXFRAC_2 (~(_FP_WS_TYPE)0), (~(_FP_WS_TYPE)0)
|
#define _FP_MAXFRAC_2 (~(_FP_WS_TYPE)0), (~(_FP_WS_TYPE)0)
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Internals
|
* Internals
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define __FP_FRAC_SET_2(X,I1,I0) (X##_f0 = I0, X##_f1 = I1)
|
#define __FP_FRAC_SET_2(X,I1,I0) (X##_f0 = I0, X##_f1 = I1)
|
||||||
@ -348,7 +348,7 @@
|
|||||||
point multiplication. This is useful if floating point
|
point multiplication. This is useful if floating point
|
||||||
multiplication has much bigger throughput than integer multiply.
|
multiplication has much bigger throughput than integer multiply.
|
||||||
It is supposed to work for _FP_W_TYPE_SIZE 64 and wfracbits
|
It is supposed to work for _FP_W_TYPE_SIZE 64 and wfracbits
|
||||||
between 106 and 120 only.
|
between 106 and 120 only.
|
||||||
Caller guarantees that X and Y has (1LLL << (wfracbits - 1)) set.
|
Caller guarantees that X and Y has (1LLL << (wfracbits - 1)) set.
|
||||||
SETFETZ is a macro which will disable all FPU exceptions and set rounding
|
SETFETZ is a macro which will disable all FPU exceptions and set rounding
|
||||||
towards zero, RESETFE should optionally reset it back. */
|
towards zero, RESETFE should optionally reset it back. */
|
||||||
@ -544,7 +544,7 @@
|
|||||||
* We have just one right now, maybe Newton approximation
|
* We have just one right now, maybe Newton approximation
|
||||||
* should be added for those machines where division is fast.
|
* should be added for those machines where division is fast.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define _FP_SQRT_MEAT_2(R, S, T, X, q) \
|
#define _FP_SQRT_MEAT_2(R, S, T, X, q) \
|
||||||
do { \
|
do { \
|
||||||
while (q) \
|
while (q) \
|
||||||
@ -586,7 +586,7 @@
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Assembly/disassembly for converting to/from integral types.
|
* Assembly/disassembly for converting to/from integral types.
|
||||||
* No shifting or overflow handled here.
|
* No shifting or overflow handled here.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
|
|||||||
@ -81,7 +81,7 @@
|
|||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
|
|
||||||
/* Right shift with sticky-lsb.
|
/* Right shift with sticky-lsb.
|
||||||
* What this actually means is that we do a standard right-shift,
|
* What this actually means is that we do a standard right-shift,
|
||||||
* but that if any of the bits that fall off the right hand side
|
* but that if any of the bits that fall off the right hand side
|
||||||
* were one then we always set the LSbit.
|
* were one then we always set the LSbit.
|
||||||
@ -435,7 +435,7 @@
|
|||||||
* We have just one right now, maybe Newton approximation
|
* We have just one right now, maybe Newton approximation
|
||||||
* should be added for those machines where division is fast.
|
* should be added for those machines where division is fast.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define _FP_SQRT_MEAT_4(R, S, T, X, q) \
|
#define _FP_SQRT_MEAT_4(R, S, T, X, q) \
|
||||||
do { \
|
do { \
|
||||||
while (q) \
|
while (q) \
|
||||||
@ -516,7 +516,7 @@
|
|||||||
|
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Internals
|
* Internals
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define __FP_FRAC_SET_4(X,I3,I2,I1,I0) \
|
#define __FP_FRAC_SET_4(X,I3,I2,I1,I0) \
|
||||||
@ -618,9 +618,9 @@
|
|||||||
/* Convert FP values between word sizes. This appears to be more
|
/* Convert FP values between word sizes. This appears to be more
|
||||||
* complicated than I'd have expected it to be, so these might be
|
* complicated than I'd have expected it to be, so these might be
|
||||||
* wrong... These macros are in any case somewhat bogus because they
|
* wrong... These macros are in any case somewhat bogus because they
|
||||||
* use information about what various FRAC_n variables look like
|
* use information about what various FRAC_n variables look like
|
||||||
* internally [eg, that 2 word vars are X_f0 and x_f1]. But so do
|
* internally [eg, that 2 word vars are X_f0 and x_f1]. But so do
|
||||||
* the ones in op-2.h and op-1.h.
|
* the ones in op-2.h and op-1.h.
|
||||||
*/
|
*/
|
||||||
#define _FP_FRAC_COPY_1_4(D, S) (D##_f = S##_f[0])
|
#define _FP_FRAC_COPY_1_4(D, S) (D##_f = S##_f[0])
|
||||||
|
|
||||||
@ -630,7 +630,7 @@ do { \
|
|||||||
D##_f1 = S##_f[1]; \
|
D##_f1 = S##_f[1]; \
|
||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
/* Assembly/disassembly for converting to/from integral types.
|
/* Assembly/disassembly for converting to/from integral types.
|
||||||
* No shifting or overflow handled here.
|
* No shifting or overflow handled here.
|
||||||
*/
|
*/
|
||||||
/* Put the FP value X into r, which is an integer of size rsize. */
|
/* Put the FP value X into r, which is an integer of size rsize. */
|
||||||
|
|||||||
@ -77,7 +77,7 @@
|
|||||||
} while (0)
|
} while (0)
|
||||||
|
|
||||||
|
|
||||||
/* Right shift with sticky-lsb.
|
/* Right shift with sticky-lsb.
|
||||||
* What this actually means is that we do a standard right-shift,
|
* What this actually means is that we do a standard right-shift,
|
||||||
* but that if any of the bits that fall off the right hand side
|
* but that if any of the bits that fall off the right hand side
|
||||||
* were one then we always set the LSbit.
|
* were one then we always set the LSbit.
|
||||||
|
|||||||
@ -244,7 +244,7 @@ float build_float(const char *s, const char *e, const char *f)
|
|||||||
|
|
||||||
return u.flt;
|
return u.flt;
|
||||||
}
|
}
|
||||||
|
|
||||||
double build_double(const char *s, const char *e, const char *f)
|
double build_double(const char *s, const char *e, const char *f)
|
||||||
{
|
{
|
||||||
union _FP_UNION_D u;
|
union _FP_UNION_D u;
|
||||||
@ -264,10 +264,10 @@ double build_double(const char *s, const char *e, const char *f)
|
|||||||
#else
|
#else
|
||||||
u.bits.frac = strtoul(f, 0, 16);
|
u.bits.frac = strtoul(f, 0, 16);
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
return u.flt;
|
return u.flt;
|
||||||
}
|
}
|
||||||
|
|
||||||
/*======================================================================*/
|
/*======================================================================*/
|
||||||
|
|
||||||
fpu_control_t fcw0, fcw1;
|
fpu_control_t fcw0, fcw1;
|
||||||
@ -303,7 +303,7 @@ void test_double_arith(double (*tf)(double, double),
|
|||||||
_FPU_GETCW(fcw0);
|
_FPU_GETCW(fcw0);
|
||||||
fcw1 = ((fcw0 & ~_FPU_EXTENDED) | _FPU_DOUBLE);
|
fcw1 = ((fcw0 & ~_FPU_EXTENDED) | _FPU_DOUBLE);
|
||||||
_FPU_SETCW(fcw1);
|
_FPU_SETCW(fcw1);
|
||||||
#endif
|
#endif
|
||||||
rr = (*rf)(x, y);
|
rr = (*rf)(x, y);
|
||||||
#ifdef __i386__
|
#ifdef __i386__
|
||||||
_FPU_SETCW(fcw0);
|
_FPU_SETCW(fcw0);
|
||||||
@ -386,7 +386,7 @@ void test_float_int_conv(float x)
|
|||||||
printf("\n\ttrue = %d\n\tfalse = %d\n", rr, tr);
|
printf("\n\ttrue = %d\n\tfalse = %d\n", rr, tr);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
void test_double_int_conv(double x)
|
void test_double_int_conv(double x)
|
||||||
{
|
{
|
||||||
int tr, rr;
|
int tr, rr;
|
||||||
|
|||||||
@ -20,7 +20,7 @@ do_test (void)
|
|||||||
int ret = 0;
|
int ret = 0;
|
||||||
|
|
||||||
for (size_t i = 0; i < sizeof (tests) / sizeof (tests[0]); ++i)
|
for (size_t i = 0; i < sizeof (tests) / sizeof (tests[0]); ++i)
|
||||||
{
|
{
|
||||||
snprintf (buf, sizeof (buf), "%.0LA", tests[i].val);
|
snprintf (buf, sizeof (buf), "%.0LA", tests[i].val);
|
||||||
|
|
||||||
size_t j;
|
size_t j;
|
||||||
|
|||||||
@ -24,7 +24,7 @@
|
|||||||
/*
|
/*
|
||||||
Copyright (C) 1983 Regents of the University of California.
|
Copyright (C) 1983 Regents of the University of California.
|
||||||
All rights reserved.
|
All rights reserved.
|
||||||
|
|
||||||
Redistribution and use in source and binary forms, with or without
|
Redistribution and use in source and binary forms, with or without
|
||||||
modification, are permitted provided that the following conditions
|
modification, are permitted provided that the following conditions
|
||||||
are met:
|
are met:
|
||||||
@ -37,7 +37,7 @@
|
|||||||
4. Neither the name of the University nor the names of its contributors
|
4. Neither the name of the University nor the names of its contributors
|
||||||
may be used to endorse or promote products derived from this software
|
may be used to endorse or promote products derived from this software
|
||||||
without specific prior written permission.
|
without specific prior written permission.
|
||||||
|
|
||||||
THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
|
||||||
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
||||||
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
||||||
|
|||||||
@ -27,7 +27,7 @@ struct rquota {
|
|||||||
unsigned int rq_curfiles; /* current # allocated files */
|
unsigned int rq_curfiles; /* current # allocated files */
|
||||||
unsigned int rq_btimeleft; /* time left for excessive disk use */
|
unsigned int rq_btimeleft; /* time left for excessive disk use */
|
||||||
unsigned int rq_ftimeleft; /* time left for excessive files */
|
unsigned int rq_ftimeleft; /* time left for excessive files */
|
||||||
};
|
};
|
||||||
|
|
||||||
enum gqr_status {
|
enum gqr_status {
|
||||||
Q_OK = 1, /* quota returned */
|
Q_OK = 1, /* quota returned */
|
||||||
|
|||||||
@ -23,9 +23,9 @@
|
|||||||
|
|
||||||
|
|
||||||
|
|
||||||
static const double powtwo[] = { 1.0, 2.0, 4.0,
|
static const double powtwo[] = { 1.0, 2.0, 4.0,
|
||||||
8.0, 16.0, 32.0, 64.0, 128.0,
|
8.0, 16.0, 32.0, 64.0, 128.0,
|
||||||
256.0, 512.0, 1024.0, 2048.0, 4096.0,
|
256.0, 512.0, 1024.0, 2048.0, 4096.0,
|
||||||
8192.0, 16384.0, 32768.0, 65536.0, 131072.0,
|
8192.0, 16384.0, 32768.0, 65536.0, 131072.0,
|
||||||
262144.0, 524288.0, 1048576.0, 2097152.0, 4194304.0,
|
262144.0, 524288.0, 1048576.0, 2097152.0, 4194304.0,
|
||||||
8388608.0, 16777216.0, 33554432.0, 67108864.0, 134217728.0 };
|
8388608.0, 16777216.0, 33554432.0, 67108864.0, 134217728.0 };
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -20,7 +20,7 @@ static char rcsid[] = "$NetBSD: k_cosf.c,v 1.4 1995/05/10 20:46:23 jtc Exp $";
|
|||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include <math_private.h>
|
#include <math_private.h>
|
||||||
|
|
||||||
static const float
|
static const float
|
||||||
one = 1.0000000000e+00, /* 0x3f800000 */
|
one = 1.0000000000e+00, /* 0x3f800000 */
|
||||||
C1 = 4.1666667908e-02, /* 0x3d2aaaab */
|
C1 = 4.1666667908e-02, /* 0x3d2aaaab */
|
||||||
C2 = -1.3888889225e-03, /* 0xbab60b61 */
|
C2 = -1.3888889225e-03, /* 0xbab60b61 */
|
||||||
@ -40,7 +40,7 @@ float __kernel_cosf(float x, float y)
|
|||||||
}
|
}
|
||||||
z = x*x;
|
z = x*x;
|
||||||
r = z*(C1+z*(C2+z*(C3+z*(C4+z*(C5+z*C6)))));
|
r = z*(C1+z*(C2+z*(C3+z*(C4+z*(C5+z*C6)))));
|
||||||
if(ix < 0x3e99999a) /* if |x| < 0.3 */
|
if(ix < 0x3e99999a) /* if |x| < 0.3 */
|
||||||
return one - ((float)0.5*z - (z*r - x*y));
|
return one - ((float)0.5*z - (z*r - x*y));
|
||||||
else {
|
else {
|
||||||
if(ix > 0x3f480000) { /* x > 0.78125 */
|
if(ix > 0x3f480000) { /* x > 0.78125 */
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -39,7 +39,7 @@ static const float PIo2[] = {
|
|||||||
6.3331015649e-25, /* 0x17440000 */
|
6.3331015649e-25, /* 0x17440000 */
|
||||||
};
|
};
|
||||||
|
|
||||||
static const float
|
static const float
|
||||||
zero = 0.0,
|
zero = 0.0,
|
||||||
one = 1.0,
|
one = 1.0,
|
||||||
two8 = 2.5600000000e+02, /* 0x43800000 */
|
two8 = 2.5600000000e+02, /* 0x43800000 */
|
||||||
@ -87,7 +87,7 @@ recompute:
|
|||||||
i = (iq[jz-1]>>(8-q0)); n += i;
|
i = (iq[jz-1]>>(8-q0)); n += i;
|
||||||
iq[jz-1] -= i<<(8-q0);
|
iq[jz-1] -= i<<(8-q0);
|
||||||
ih = iq[jz-1]>>(7-q0);
|
ih = iq[jz-1]>>(7-q0);
|
||||||
}
|
}
|
||||||
else if(q0==0) ih = iq[jz-1]>>7;
|
else if(q0==0) ih = iq[jz-1]>>7;
|
||||||
else if(z>=(float)0.5) ih=2;
|
else if(z>=(float)0.5) ih=2;
|
||||||
|
|
||||||
@ -138,7 +138,7 @@ recompute:
|
|||||||
while(iq[jz]==0) { jz--; q0-=8;}
|
while(iq[jz]==0) { jz--; q0-=8;}
|
||||||
} else { /* break z into 8-bit if necessary */
|
} else { /* break z into 8-bit if necessary */
|
||||||
z = __scalbnf(z,-q0);
|
z = __scalbnf(z,-q0);
|
||||||
if(z>=two8) {
|
if(z>=two8) {
|
||||||
fw = (float)((int32_t)(twon8*z));
|
fw = (float)((int32_t)(twon8*z));
|
||||||
iq[jz] = (int32_t)(z-two8*fw);
|
iq[jz] = (int32_t)(z-two8*fw);
|
||||||
jz += 1; q0 += 8;
|
jz += 1; q0 += 8;
|
||||||
@ -163,7 +163,7 @@ recompute:
|
|||||||
case 0:
|
case 0:
|
||||||
fw = 0.0;
|
fw = 0.0;
|
||||||
for (i=jz;i>=0;i--) fw += fq[i];
|
for (i=jz;i>=0;i--) fw += fq[i];
|
||||||
y[0] = (ih==0)? fw: -fw;
|
y[0] = (ih==0)? fw: -fw;
|
||||||
break;
|
break;
|
||||||
case 1:
|
case 1:
|
||||||
case 2:;
|
case 2:;
|
||||||
@ -194,7 +194,7 @@ recompute:
|
|||||||
fq[i] += fq[i-1]-fv;
|
fq[i] += fq[i-1]-fv;
|
||||||
fq[i-1] = fv;
|
fq[i-1] = fv;
|
||||||
}
|
}
|
||||||
for (fw=0.0,i=jz;i>=2;i--) fw += fq[i];
|
for (fw=0.0,i=jz;i>=2;i--) fw += fq[i];
|
||||||
if(ih==0) {
|
if(ih==0) {
|
||||||
y[0] = fq[0]; y[1] = fq[1]; y[2] = fw;
|
y[0] = fq[0]; y[1] = fq[1]; y[2] = fw;
|
||||||
} else {
|
} else {
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -20,7 +20,7 @@ static char rcsid[] = "$NetBSD: k_sinf.c,v 1.4 1995/05/10 20:46:33 jtc Exp $";
|
|||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include <math_private.h>
|
#include <math_private.h>
|
||||||
|
|
||||||
static const float
|
static const float
|
||||||
half = 5.0000000000e-01,/* 0x3f000000 */
|
half = 5.0000000000e-01,/* 0x3f000000 */
|
||||||
S1 = -1.6666667163e-01, /* 0xbe2aaaab */
|
S1 = -1.6666667163e-01, /* 0xbe2aaaab */
|
||||||
S2 = 8.3333337680e-03, /* 0x3c088889 */
|
S2 = 8.3333337680e-03, /* 0x3c088889 */
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -19,7 +19,7 @@ static char rcsid[] = "$NetBSD: k_tanf.c,v 1.4 1995/05/10 20:46:39 jtc Exp $";
|
|||||||
|
|
||||||
#include <math.h>
|
#include <math.h>
|
||||||
#include <math_private.h>
|
#include <math_private.h>
|
||||||
static const float
|
static const float
|
||||||
one = 1.0000000000e+00, /* 0x3f800000 */
|
one = 1.0000000000e+00, /* 0x3f800000 */
|
||||||
pio4 = 7.8539812565e-01, /* 0x3f490fda */
|
pio4 = 7.8539812565e-01, /* 0x3f490fda */
|
||||||
pio4lo= 3.7748947079e-08, /* 0x33222168 */
|
pio4lo= 3.7748947079e-08, /* 0x33222168 */
|
||||||
@ -76,7 +76,7 @@ float __kernel_tanf(float x, float y, int iy)
|
|||||||
return (float)(1-((hx>>30)&2))*(v-(float)2.0*(x-(w*w/(w+v)-r)));
|
return (float)(1-((hx>>30)&2))*(v-(float)2.0*(x-(w*w/(w+v)-r)));
|
||||||
}
|
}
|
||||||
if(iy==1) return w;
|
if(iy==1) return w;
|
||||||
else { /* if allow error up to 2 ulp,
|
else { /* if allow error up to 2 ulp,
|
||||||
simply return -1.0/(x+r) here */
|
simply return -1.0/(x+r) here */
|
||||||
/* compute -1.0/(x+r) accurately */
|
/* compute -1.0/(x+r) accurately */
|
||||||
float a,t;
|
float a,t;
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -73,9 +73,9 @@ float __atanf(float x)
|
|||||||
x = fabsf(x);
|
x = fabsf(x);
|
||||||
if (ix < 0x3f980000) { /* |x| < 1.1875 */
|
if (ix < 0x3f980000) { /* |x| < 1.1875 */
|
||||||
if (ix < 0x3f300000) { /* 7/16 <=|x|<11/16 */
|
if (ix < 0x3f300000) { /* 7/16 <=|x|<11/16 */
|
||||||
id = 0; x = ((float)2.0*x-one)/((float)2.0+x);
|
id = 0; x = ((float)2.0*x-one)/((float)2.0+x);
|
||||||
} else { /* 11/16<=|x|< 19/16 */
|
} else { /* 11/16<=|x|< 19/16 */
|
||||||
id = 1; x = (x-one)/(x+one);
|
id = 1; x = (x-one)/(x+one);
|
||||||
}
|
}
|
||||||
} else {
|
} else {
|
||||||
if (ix < 0x401c0000) { /* |x| < 2.4375 */
|
if (ix < 0x401c0000) { /* |x| < 2.4375 */
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
@ -43,7 +43,7 @@ qq3 = 5.0813062117e-03, /* 0x3ba68116 */
|
|||||||
qq4 = 1.3249473704e-04, /* 0x390aee49 */
|
qq4 = 1.3249473704e-04, /* 0x390aee49 */
|
||||||
qq5 = -3.9602282413e-06, /* 0xb684e21a */
|
qq5 = -3.9602282413e-06, /* 0xb684e21a */
|
||||||
/*
|
/*
|
||||||
* Coefficients for approximation to erf in [0.84375,1.25]
|
* Coefficients for approximation to erf in [0.84375,1.25]
|
||||||
*/
|
*/
|
||||||
pa0 = -2.3621185683e-03, /* 0xbb1acdc6 */
|
pa0 = -2.3621185683e-03, /* 0xbb1acdc6 */
|
||||||
pa1 = 4.1485610604e-01, /* 0x3ed46805 */
|
pa1 = 4.1485610604e-01, /* 0x3ed46805 */
|
||||||
@ -108,7 +108,7 @@ float __erff(float x)
|
|||||||
|
|
||||||
if(ix < 0x3f580000) { /* |x|<0.84375 */
|
if(ix < 0x3f580000) { /* |x|<0.84375 */
|
||||||
if(ix < 0x31800000) { /* |x|<2**-28 */
|
if(ix < 0x31800000) { /* |x|<2**-28 */
|
||||||
if (ix < 0x04000000)
|
if (ix < 0x04000000)
|
||||||
/*avoid underflow */
|
/*avoid underflow */
|
||||||
return (float)0.125*((float)8.0*x+efx8*x);
|
return (float)0.125*((float)8.0*x+efx8*x);
|
||||||
return x + efx*x;
|
return x + efx*x;
|
||||||
@ -179,7 +179,7 @@ float __erfcf(float x)
|
|||||||
P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
|
P = pa0+s*(pa1+s*(pa2+s*(pa3+s*(pa4+s*(pa5+s*pa6)))));
|
||||||
Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*qa6)))));
|
Q = one+s*(qa1+s*(qa2+s*(qa3+s*(qa4+s*(qa5+s*qa6)))));
|
||||||
if(hx>=0) {
|
if(hx>=0) {
|
||||||
z = one-erx; return z - P/Q;
|
z = one-erx; return z - P/Q;
|
||||||
} else {
|
} else {
|
||||||
z = erx+P/Q; return one+z;
|
z = erx+P/Q; return one+z;
|
||||||
}
|
}
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -8,7 +8,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -21,166 +21,166 @@
|
|||||||
#include <math_private.h>
|
#include <math_private.h>
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Table of constants for 2/pi, 5628 hexadecimal digits of 2/pi
|
* Table of constants for 2/pi, 5628 hexadecimal digits of 2/pi
|
||||||
*/
|
*/
|
||||||
static const int32_t two_over_pi[] = {
|
static const int32_t two_over_pi[] = {
|
||||||
0xa2f983, 0x6e4e44, 0x1529fc, 0x2757d1, 0xf534dd, 0xc0db62,
|
0xa2f983, 0x6e4e44, 0x1529fc, 0x2757d1, 0xf534dd, 0xc0db62,
|
||||||
0x95993c, 0x439041, 0xfe5163, 0xabdebb, 0xc561b7, 0x246e3a,
|
0x95993c, 0x439041, 0xfe5163, 0xabdebb, 0xc561b7, 0x246e3a,
|
||||||
0x424dd2, 0xe00649, 0x2eea09, 0xd1921c, 0xfe1deb, 0x1cb129,
|
0x424dd2, 0xe00649, 0x2eea09, 0xd1921c, 0xfe1deb, 0x1cb129,
|
||||||
0xa73ee8, 0x8235f5, 0x2ebb44, 0x84e99c, 0x7026b4, 0x5f7e41,
|
0xa73ee8, 0x8235f5, 0x2ebb44, 0x84e99c, 0x7026b4, 0x5f7e41,
|
||||||
0x3991d6, 0x398353, 0x39f49c, 0x845f8b, 0xbdf928, 0x3b1ff8,
|
0x3991d6, 0x398353, 0x39f49c, 0x845f8b, 0xbdf928, 0x3b1ff8,
|
||||||
0x97ffde, 0x05980f, 0xef2f11, 0x8b5a0a, 0x6d1f6d, 0x367ecf,
|
0x97ffde, 0x05980f, 0xef2f11, 0x8b5a0a, 0x6d1f6d, 0x367ecf,
|
||||||
0x27cb09, 0xb74f46, 0x3f669e, 0x5fea2d, 0x7527ba, 0xc7ebe5,
|
0x27cb09, 0xb74f46, 0x3f669e, 0x5fea2d, 0x7527ba, 0xc7ebe5,
|
||||||
0xf17b3d, 0x0739f7, 0x8a5292, 0xea6bfb, 0x5fb11f, 0x8d5d08,
|
0xf17b3d, 0x0739f7, 0x8a5292, 0xea6bfb, 0x5fb11f, 0x8d5d08,
|
||||||
0x560330, 0x46fc7b, 0x6babf0, 0xcfbc20, 0x9af436, 0x1da9e3,
|
0x560330, 0x46fc7b, 0x6babf0, 0xcfbc20, 0x9af436, 0x1da9e3,
|
||||||
0x91615e, 0xe61b08, 0x659985, 0x5f14a0, 0x68408d, 0xffd880,
|
0x91615e, 0xe61b08, 0x659985, 0x5f14a0, 0x68408d, 0xffd880,
|
||||||
0x4d7327, 0x310606, 0x1556ca, 0x73a8c9, 0x60e27b, 0xc08c6b,
|
0x4d7327, 0x310606, 0x1556ca, 0x73a8c9, 0x60e27b, 0xc08c6b,
|
||||||
0x47c419, 0xc367cd, 0xdce809, 0x2a8359, 0xc4768b, 0x961ca6,
|
0x47c419, 0xc367cd, 0xdce809, 0x2a8359, 0xc4768b, 0x961ca6,
|
||||||
0xddaf44, 0xd15719, 0x053ea5, 0xff0705, 0x3f7e33, 0xe832c2,
|
0xddaf44, 0xd15719, 0x053ea5, 0xff0705, 0x3f7e33, 0xe832c2,
|
||||||
0xde4f98, 0x327dbb, 0xc33d26, 0xef6b1e, 0x5ef89f, 0x3a1f35,
|
0xde4f98, 0x327dbb, 0xc33d26, 0xef6b1e, 0x5ef89f, 0x3a1f35,
|
||||||
0xcaf27f, 0x1d87f1, 0x21907c, 0x7c246a, 0xfa6ed5, 0x772d30,
|
0xcaf27f, 0x1d87f1, 0x21907c, 0x7c246a, 0xfa6ed5, 0x772d30,
|
||||||
0x433b15, 0xc614b5, 0x9d19c3, 0xc2c4ad, 0x414d2c, 0x5d000c,
|
0x433b15, 0xc614b5, 0x9d19c3, 0xc2c4ad, 0x414d2c, 0x5d000c,
|
||||||
0x467d86, 0x2d71e3, 0x9ac69b, 0x006233, 0x7cd2b4, 0x97a7b4,
|
0x467d86, 0x2d71e3, 0x9ac69b, 0x006233, 0x7cd2b4, 0x97a7b4,
|
||||||
0xd55537, 0xf63ed7, 0x1810a3, 0xfc764d, 0x2a9d64, 0xabd770,
|
0xd55537, 0xf63ed7, 0x1810a3, 0xfc764d, 0x2a9d64, 0xabd770,
|
||||||
0xf87c63, 0x57b07a, 0xe71517, 0x5649c0, 0xd9d63b, 0x3884a7,
|
0xf87c63, 0x57b07a, 0xe71517, 0x5649c0, 0xd9d63b, 0x3884a7,
|
||||||
0xcb2324, 0x778ad6, 0x23545a, 0xb91f00, 0x1b0af1, 0xdfce19,
|
0xcb2324, 0x778ad6, 0x23545a, 0xb91f00, 0x1b0af1, 0xdfce19,
|
||||||
0xff319f, 0x6a1e66, 0x615799, 0x47fbac, 0xd87f7e, 0xb76522,
|
0xff319f, 0x6a1e66, 0x615799, 0x47fbac, 0xd87f7e, 0xb76522,
|
||||||
0x89e832, 0x60bfe6, 0xcdc4ef, 0x09366c, 0xd43f5d, 0xd7de16,
|
0x89e832, 0x60bfe6, 0xcdc4ef, 0x09366c, 0xd43f5d, 0xd7de16,
|
||||||
0xde3b58, 0x929bde, 0x2822d2, 0xe88628, 0x4d58e2, 0x32cac6,
|
0xde3b58, 0x929bde, 0x2822d2, 0xe88628, 0x4d58e2, 0x32cac6,
|
||||||
0x16e308, 0xcb7de0, 0x50c017, 0xa71df3, 0x5be018, 0x34132e,
|
0x16e308, 0xcb7de0, 0x50c017, 0xa71df3, 0x5be018, 0x34132e,
|
||||||
0x621283, 0x014883, 0x5b8ef5, 0x7fb0ad, 0xf2e91e, 0x434a48,
|
0x621283, 0x014883, 0x5b8ef5, 0x7fb0ad, 0xf2e91e, 0x434a48,
|
||||||
0xd36710, 0xd8ddaa, 0x425fae, 0xce616a, 0xa4280a, 0xb499d3,
|
0xd36710, 0xd8ddaa, 0x425fae, 0xce616a, 0xa4280a, 0xb499d3,
|
||||||
0xf2a606, 0x7f775c, 0x83c2a3, 0x883c61, 0x78738a, 0x5a8caf,
|
0xf2a606, 0x7f775c, 0x83c2a3, 0x883c61, 0x78738a, 0x5a8caf,
|
||||||
0xbdd76f, 0x63a62d, 0xcbbff4, 0xef818d, 0x67c126, 0x45ca55,
|
0xbdd76f, 0x63a62d, 0xcbbff4, 0xef818d, 0x67c126, 0x45ca55,
|
||||||
0x36d9ca, 0xd2a828, 0x8d61c2, 0x77c912, 0x142604, 0x9b4612,
|
0x36d9ca, 0xd2a828, 0x8d61c2, 0x77c912, 0x142604, 0x9b4612,
|
||||||
0xc459c4, 0x44c5c8, 0x91b24d, 0xf31700, 0xad43d4, 0xe54929,
|
0xc459c4, 0x44c5c8, 0x91b24d, 0xf31700, 0xad43d4, 0xe54929,
|
||||||
0x10d5fd, 0xfcbe00, 0xcc941e, 0xeece70, 0xf53e13, 0x80f1ec,
|
0x10d5fd, 0xfcbe00, 0xcc941e, 0xeece70, 0xf53e13, 0x80f1ec,
|
||||||
0xc3e7b3, 0x28f8c7, 0x940593, 0x3e71c1, 0xb3092e, 0xf3450b,
|
0xc3e7b3, 0x28f8c7, 0x940593, 0x3e71c1, 0xb3092e, 0xf3450b,
|
||||||
0x9c1288, 0x7b20ab, 0x9fb52e, 0xc29247, 0x2f327b, 0x6d550c,
|
0x9c1288, 0x7b20ab, 0x9fb52e, 0xc29247, 0x2f327b, 0x6d550c,
|
||||||
0x90a772, 0x1fe76b, 0x96cb31, 0x4a1679, 0xe27941, 0x89dff4,
|
0x90a772, 0x1fe76b, 0x96cb31, 0x4a1679, 0xe27941, 0x89dff4,
|
||||||
0x9794e8, 0x84e6e2, 0x973199, 0x6bed88, 0x365f5f, 0x0efdbb,
|
0x9794e8, 0x84e6e2, 0x973199, 0x6bed88, 0x365f5f, 0x0efdbb,
|
||||||
0xb49a48, 0x6ca467, 0x427271, 0x325d8d, 0xb8159f, 0x09e5bc,
|
0xb49a48, 0x6ca467, 0x427271, 0x325d8d, 0xb8159f, 0x09e5bc,
|
||||||
0x25318d, 0x3974f7, 0x1c0530, 0x010c0d, 0x68084b, 0x58ee2c,
|
0x25318d, 0x3974f7, 0x1c0530, 0x010c0d, 0x68084b, 0x58ee2c,
|
||||||
0x90aa47, 0x02e774, 0x24d6bd, 0xa67df7, 0x72486e, 0xef169f,
|
0x90aa47, 0x02e774, 0x24d6bd, 0xa67df7, 0x72486e, 0xef169f,
|
||||||
0xa6948e, 0xf691b4, 0x5153d1, 0xf20acf, 0x339820, 0x7e4bf5,
|
0xa6948e, 0xf691b4, 0x5153d1, 0xf20acf, 0x339820, 0x7e4bf5,
|
||||||
0x6863b2, 0x5f3edd, 0x035d40, 0x7f8985, 0x295255, 0xc06437,
|
0x6863b2, 0x5f3edd, 0x035d40, 0x7f8985, 0x295255, 0xc06437,
|
||||||
0x10d86d, 0x324832, 0x754c5b, 0xd4714e, 0x6e5445, 0xc1090b,
|
0x10d86d, 0x324832, 0x754c5b, 0xd4714e, 0x6e5445, 0xc1090b,
|
||||||
0x69f52a, 0xd56614, 0x9d0727, 0x50045d, 0xdb3bb4, 0xc576ea,
|
0x69f52a, 0xd56614, 0x9d0727, 0x50045d, 0xdb3bb4, 0xc576ea,
|
||||||
0x17f987, 0x7d6b49, 0xba271d, 0x296996, 0xacccc6, 0x5414ad,
|
0x17f987, 0x7d6b49, 0xba271d, 0x296996, 0xacccc6, 0x5414ad,
|
||||||
0x6ae290, 0x89d988, 0x50722c, 0xbea404, 0x940777, 0x7030f3,
|
0x6ae290, 0x89d988, 0x50722c, 0xbea404, 0x940777, 0x7030f3,
|
||||||
0x27fc00, 0xa871ea, 0x49c266, 0x3de064, 0x83dd97, 0x973fa3,
|
0x27fc00, 0xa871ea, 0x49c266, 0x3de064, 0x83dd97, 0x973fa3,
|
||||||
0xfd9443, 0x8c860d, 0xde4131, 0x9d3992, 0x8c70dd, 0xe7b717,
|
0xfd9443, 0x8c860d, 0xde4131, 0x9d3992, 0x8c70dd, 0xe7b717,
|
||||||
0x3bdf08, 0x2b3715, 0xa0805c, 0x93805a, 0x921110, 0xd8e80f,
|
0x3bdf08, 0x2b3715, 0xa0805c, 0x93805a, 0x921110, 0xd8e80f,
|
||||||
0xaf806c, 0x4bffdb, 0x0f9038, 0x761859, 0x15a562, 0xbbcb61,
|
0xaf806c, 0x4bffdb, 0x0f9038, 0x761859, 0x15a562, 0xbbcb61,
|
||||||
0xb989c7, 0xbd4010, 0x04f2d2, 0x277549, 0xf6b6eb, 0xbb22db,
|
0xb989c7, 0xbd4010, 0x04f2d2, 0x277549, 0xf6b6eb, 0xbb22db,
|
||||||
0xaa140a, 0x2f2689, 0x768364, 0x333b09, 0x1a940e, 0xaa3a51,
|
0xaa140a, 0x2f2689, 0x768364, 0x333b09, 0x1a940e, 0xaa3a51,
|
||||||
0xc2a31d, 0xaeedaf, 0x12265c, 0x4dc26d, 0x9c7a2d, 0x9756c0,
|
0xc2a31d, 0xaeedaf, 0x12265c, 0x4dc26d, 0x9c7a2d, 0x9756c0,
|
||||||
0x833f03, 0xf6f009, 0x8c402b, 0x99316d, 0x07b439, 0x15200c,
|
0x833f03, 0xf6f009, 0x8c402b, 0x99316d, 0x07b439, 0x15200c,
|
||||||
0x5bc3d8, 0xc492f5, 0x4badc6, 0xa5ca4e, 0xcd37a7, 0x36a9e6,
|
0x5bc3d8, 0xc492f5, 0x4badc6, 0xa5ca4e, 0xcd37a7, 0x36a9e6,
|
||||||
0x9492ab, 0x6842dd, 0xde6319, 0xef8c76, 0x528b68, 0x37dbfc,
|
0x9492ab, 0x6842dd, 0xde6319, 0xef8c76, 0x528b68, 0x37dbfc,
|
||||||
0xaba1ae, 0x3115df, 0xa1ae00, 0xdafb0c, 0x664d64, 0xb705ed,
|
0xaba1ae, 0x3115df, 0xa1ae00, 0xdafb0c, 0x664d64, 0xb705ed,
|
||||||
0x306529, 0xbf5657, 0x3aff47, 0xb9f96a, 0xf3be75, 0xdf9328,
|
0x306529, 0xbf5657, 0x3aff47, 0xb9f96a, 0xf3be75, 0xdf9328,
|
||||||
0x3080ab, 0xf68c66, 0x15cb04, 0x0622fa, 0x1de4d9, 0xa4b33d,
|
0x3080ab, 0xf68c66, 0x15cb04, 0x0622fa, 0x1de4d9, 0xa4b33d,
|
||||||
0x8f1b57, 0x09cd36, 0xe9424e, 0xa4be13, 0xb52333, 0x1aaaf0,
|
0x8f1b57, 0x09cd36, 0xe9424e, 0xa4be13, 0xb52333, 0x1aaaf0,
|
||||||
0xa8654f, 0xa5c1d2, 0x0f3f0b, 0xcd785b, 0x76f923, 0x048b7b,
|
0xa8654f, 0xa5c1d2, 0x0f3f0b, 0xcd785b, 0x76f923, 0x048b7b,
|
||||||
0x721789, 0x53a6c6, 0xe26e6f, 0x00ebef, 0x584a9b, 0xb7dac4,
|
0x721789, 0x53a6c6, 0xe26e6f, 0x00ebef, 0x584a9b, 0xb7dac4,
|
||||||
0xba66aa, 0xcfcf76, 0x1d02d1, 0x2df1b1, 0xc1998c, 0x77adc3,
|
0xba66aa, 0xcfcf76, 0x1d02d1, 0x2df1b1, 0xc1998c, 0x77adc3,
|
||||||
0xda4886, 0xa05df7, 0xf480c6, 0x2ff0ac, 0x9aecdd, 0xbc5c3f,
|
0xda4886, 0xa05df7, 0xf480c6, 0x2ff0ac, 0x9aecdd, 0xbc5c3f,
|
||||||
0x6dded0, 0x1fc790, 0xb6db2a, 0x3a25a3, 0x9aaf00, 0x9353ad,
|
0x6dded0, 0x1fc790, 0xb6db2a, 0x3a25a3, 0x9aaf00, 0x9353ad,
|
||||||
0x0457b6, 0xb42d29, 0x7e804b, 0xa707da, 0x0eaa76, 0xa1597b,
|
0x0457b6, 0xb42d29, 0x7e804b, 0xa707da, 0x0eaa76, 0xa1597b,
|
||||||
0x2a1216, 0x2db7dc, 0xfde5fa, 0xfedb89, 0xfdbe89, 0x6c76e4,
|
0x2a1216, 0x2db7dc, 0xfde5fa, 0xfedb89, 0xfdbe89, 0x6c76e4,
|
||||||
0xfca906, 0x70803e, 0x156e85, 0xff87fd, 0x073e28, 0x336761,
|
0xfca906, 0x70803e, 0x156e85, 0xff87fd, 0x073e28, 0x336761,
|
||||||
0x86182a, 0xeabd4d, 0xafe7b3, 0x6e6d8f, 0x396795, 0x5bbf31,
|
0x86182a, 0xeabd4d, 0xafe7b3, 0x6e6d8f, 0x396795, 0x5bbf31,
|
||||||
0x48d784, 0x16df30, 0x432dc7, 0x356125, 0xce70c9, 0xb8cb30,
|
0x48d784, 0x16df30, 0x432dc7, 0x356125, 0xce70c9, 0xb8cb30,
|
||||||
0xfd6cbf, 0xa200a4, 0xe46c05, 0xa0dd5a, 0x476f21, 0xd21262,
|
0xfd6cbf, 0xa200a4, 0xe46c05, 0xa0dd5a, 0x476f21, 0xd21262,
|
||||||
0x845cb9, 0x496170, 0xe0566b, 0x015299, 0x375550, 0xb7d51e,
|
0x845cb9, 0x496170, 0xe0566b, 0x015299, 0x375550, 0xb7d51e,
|
||||||
0xc4f133, 0x5f6e13, 0xe4305d, 0xa92e85, 0xc3b21d, 0x3632a1,
|
0xc4f133, 0x5f6e13, 0xe4305d, 0xa92e85, 0xc3b21d, 0x3632a1,
|
||||||
0xa4b708, 0xd4b1ea, 0x21f716, 0xe4698f, 0x77ff27, 0x80030c,
|
0xa4b708, 0xd4b1ea, 0x21f716, 0xe4698f, 0x77ff27, 0x80030c,
|
||||||
0x2d408d, 0xa0cd4f, 0x99a520, 0xd3a2b3, 0x0a5d2f, 0x42f9b4,
|
0x2d408d, 0xa0cd4f, 0x99a520, 0xd3a2b3, 0x0a5d2f, 0x42f9b4,
|
||||||
0xcbda11, 0xd0be7d, 0xc1db9b, 0xbd17ab, 0x81a2ca, 0x5c6a08,
|
0xcbda11, 0xd0be7d, 0xc1db9b, 0xbd17ab, 0x81a2ca, 0x5c6a08,
|
||||||
0x17552e, 0x550027, 0xf0147f, 0x8607e1, 0x640b14, 0x8d4196,
|
0x17552e, 0x550027, 0xf0147f, 0x8607e1, 0x640b14, 0x8d4196,
|
||||||
0xdebe87, 0x2afdda, 0xb6256b, 0x34897b, 0xfef305, 0x9ebfb9,
|
0xdebe87, 0x2afdda, 0xb6256b, 0x34897b, 0xfef305, 0x9ebfb9,
|
||||||
0x4f6a68, 0xa82a4a, 0x5ac44f, 0xbcf82d, 0x985ad7, 0x95c7f4,
|
0x4f6a68, 0xa82a4a, 0x5ac44f, 0xbcf82d, 0x985ad7, 0x95c7f4,
|
||||||
0x8d4d0d, 0xa63a20, 0x5f57a4, 0xb13f14, 0x953880, 0x0120cc,
|
0x8d4d0d, 0xa63a20, 0x5f57a4, 0xb13f14, 0x953880, 0x0120cc,
|
||||||
0x86dd71, 0xb6dec9, 0xf560bf, 0x11654d, 0x6b0701, 0xacb08c,
|
0x86dd71, 0xb6dec9, 0xf560bf, 0x11654d, 0x6b0701, 0xacb08c,
|
||||||
0xd0c0b2, 0x485551, 0x0efb1e, 0xc37295, 0x3b06a3, 0x3540c0,
|
0xd0c0b2, 0x485551, 0x0efb1e, 0xc37295, 0x3b06a3, 0x3540c0,
|
||||||
0x7bdc06, 0xcc45e0, 0xfa294e, 0xc8cad6, 0x41f3e8, 0xde647c,
|
0x7bdc06, 0xcc45e0, 0xfa294e, 0xc8cad6, 0x41f3e8, 0xde647c,
|
||||||
0xd8649b, 0x31bed9, 0xc397a4, 0xd45877, 0xc5e369, 0x13daf0,
|
0xd8649b, 0x31bed9, 0xc397a4, 0xd45877, 0xc5e369, 0x13daf0,
|
||||||
0x3c3aba, 0x461846, 0x5f7555, 0xf5bdd2, 0xc6926e, 0x5d2eac,
|
0x3c3aba, 0x461846, 0x5f7555, 0xf5bdd2, 0xc6926e, 0x5d2eac,
|
||||||
0xed440e, 0x423e1c, 0x87c461, 0xe9fd29, 0xf3d6e7, 0xca7c22,
|
0xed440e, 0x423e1c, 0x87c461, 0xe9fd29, 0xf3d6e7, 0xca7c22,
|
||||||
0x35916f, 0xc5e008, 0x8dd7ff, 0xe26a6e, 0xc6fdb0, 0xc10893,
|
0x35916f, 0xc5e008, 0x8dd7ff, 0xe26a6e, 0xc6fdb0, 0xc10893,
|
||||||
0x745d7c, 0xb2ad6b, 0x9d6ecd, 0x7b723e, 0x6a11c6, 0xa9cff7,
|
0x745d7c, 0xb2ad6b, 0x9d6ecd, 0x7b723e, 0x6a11c6, 0xa9cff7,
|
||||||
0xdf7329, 0xbac9b5, 0x5100b7, 0x0db2e2, 0x24ba74, 0x607de5,
|
0xdf7329, 0xbac9b5, 0x5100b7, 0x0db2e2, 0x24ba74, 0x607de5,
|
||||||
0x8ad874, 0x2c150d, 0x0c1881, 0x94667e, 0x162901, 0x767a9f,
|
0x8ad874, 0x2c150d, 0x0c1881, 0x94667e, 0x162901, 0x767a9f,
|
||||||
0xbefdfd, 0xef4556, 0x367ed9, 0x13d9ec, 0xb9ba8b, 0xfc97c4,
|
0xbefdfd, 0xef4556, 0x367ed9, 0x13d9ec, 0xb9ba8b, 0xfc97c4,
|
||||||
0x27a831, 0xc36ef1, 0x36c594, 0x56a8d8, 0xb5a8b4, 0x0ecccf,
|
0x27a831, 0xc36ef1, 0x36c594, 0x56a8d8, 0xb5a8b4, 0x0ecccf,
|
||||||
0x2d8912, 0x34576f, 0x89562c, 0xe3ce99, 0xb920d6, 0xaa5e6b,
|
0x2d8912, 0x34576f, 0x89562c, 0xe3ce99, 0xb920d6, 0xaa5e6b,
|
||||||
0x9c2a3e, 0xcc5f11, 0x4a0bfd, 0xfbf4e1, 0x6d3b8e, 0x2c86e2,
|
0x9c2a3e, 0xcc5f11, 0x4a0bfd, 0xfbf4e1, 0x6d3b8e, 0x2c86e2,
|
||||||
0x84d4e9, 0xa9b4fc, 0xd1eeef, 0xc9352e, 0x61392f, 0x442138,
|
0x84d4e9, 0xa9b4fc, 0xd1eeef, 0xc9352e, 0x61392f, 0x442138,
|
||||||
0xc8d91b, 0x0afc81, 0x6a4afb, 0xd81c2f, 0x84b453, 0x8c994e,
|
0xc8d91b, 0x0afc81, 0x6a4afb, 0xd81c2f, 0x84b453, 0x8c994e,
|
||||||
0xcc2254, 0xdc552a, 0xd6c6c0, 0x96190b, 0xb8701a, 0x649569,
|
0xcc2254, 0xdc552a, 0xd6c6c0, 0x96190b, 0xb8701a, 0x649569,
|
||||||
0x605a26, 0xee523f, 0x0f117f, 0x11b5f4, 0xf5cbfc, 0x2dbc34,
|
0x605a26, 0xee523f, 0x0f117f, 0x11b5f4, 0xf5cbfc, 0x2dbc34,
|
||||||
0xeebc34, 0xcc5de8, 0x605edd, 0x9b8e67, 0xef3392, 0xb817c9,
|
0xeebc34, 0xcc5de8, 0x605edd, 0x9b8e67, 0xef3392, 0xb817c9,
|
||||||
0x9b5861, 0xbc57e1, 0xc68351, 0x103ed8, 0x4871dd, 0xdd1c2d,
|
0x9b5861, 0xbc57e1, 0xc68351, 0x103ed8, 0x4871dd, 0xdd1c2d,
|
||||||
0xa118af, 0x462c21, 0xd7f359, 0x987ad9, 0xc0549e, 0xfa864f,
|
0xa118af, 0x462c21, 0xd7f359, 0x987ad9, 0xc0549e, 0xfa864f,
|
||||||
0xfc0656, 0xae79e5, 0x362289, 0x22ad38, 0xdc9367, 0xaae855,
|
0xfc0656, 0xae79e5, 0x362289, 0x22ad38, 0xdc9367, 0xaae855,
|
||||||
0x382682, 0x9be7ca, 0xa40d51, 0xb13399, 0x0ed7a9, 0x480569,
|
0x382682, 0x9be7ca, 0xa40d51, 0xb13399, 0x0ed7a9, 0x480569,
|
||||||
0xf0b265, 0xa7887f, 0x974c88, 0x36d1f9, 0xb39221, 0x4a827b,
|
0xf0b265, 0xa7887f, 0x974c88, 0x36d1f9, 0xb39221, 0x4a827b,
|
||||||
0x21cf98, 0xdc9f40, 0x5547dc, 0x3a74e1, 0x42eb67, 0xdf9dfe,
|
0x21cf98, 0xdc9f40, 0x5547dc, 0x3a74e1, 0x42eb67, 0xdf9dfe,
|
||||||
0x5fd45e, 0xa4677b, 0x7aacba, 0xa2f655, 0x23882b, 0x55ba41,
|
0x5fd45e, 0xa4677b, 0x7aacba, 0xa2f655, 0x23882b, 0x55ba41,
|
||||||
0x086e59, 0x862a21, 0x834739, 0xe6e389, 0xd49ee5, 0x40fb49,
|
0x086e59, 0x862a21, 0x834739, 0xe6e389, 0xd49ee5, 0x40fb49,
|
||||||
0xe956ff, 0xca0f1c, 0x8a59c5, 0x2bfa94, 0xc5c1d3, 0xcfc50f,
|
0xe956ff, 0xca0f1c, 0x8a59c5, 0x2bfa94, 0xc5c1d3, 0xcfc50f,
|
||||||
0xae5adb, 0x86c547, 0x624385, 0x3b8621, 0x94792c, 0x876110,
|
0xae5adb, 0x86c547, 0x624385, 0x3b8621, 0x94792c, 0x876110,
|
||||||
0x7b4c2a, 0x1a2c80, 0x12bf43, 0x902688, 0x893c78, 0xe4c4a8,
|
0x7b4c2a, 0x1a2c80, 0x12bf43, 0x902688, 0x893c78, 0xe4c4a8,
|
||||||
0x7bdbe5, 0xc23ac4, 0xeaf426, 0x8a67f7, 0xbf920d, 0x2ba365,
|
0x7bdbe5, 0xc23ac4, 0xeaf426, 0x8a67f7, 0xbf920d, 0x2ba365,
|
||||||
0xb1933d, 0x0b7cbd, 0xdc51a4, 0x63dd27, 0xdde169, 0x19949a,
|
0xb1933d, 0x0b7cbd, 0xdc51a4, 0x63dd27, 0xdde169, 0x19949a,
|
||||||
0x9529a8, 0x28ce68, 0xb4ed09, 0x209f44, 0xca984e, 0x638270,
|
0x9529a8, 0x28ce68, 0xb4ed09, 0x209f44, 0xca984e, 0x638270,
|
||||||
0x237c7e, 0x32b90f, 0x8ef5a7, 0xe75614, 0x08f121, 0x2a9db5,
|
0x237c7e, 0x32b90f, 0x8ef5a7, 0xe75614, 0x08f121, 0x2a9db5,
|
||||||
0x4d7e6f, 0x5119a5, 0xabf9b5, 0xd6df82, 0x61dd96, 0x023616,
|
0x4d7e6f, 0x5119a5, 0xabf9b5, 0xd6df82, 0x61dd96, 0x023616,
|
||||||
0x9f3ac4, 0xa1a283, 0x6ded72, 0x7a8d39, 0xa9b882, 0x5c326b,
|
0x9f3ac4, 0xa1a283, 0x6ded72, 0x7a8d39, 0xa9b882, 0x5c326b,
|
||||||
0x5b2746, 0xed3400, 0x7700d2, 0x55f4fc, 0x4d5901, 0x8071e0,
|
0x5b2746, 0xed3400, 0x7700d2, 0x55f4fc, 0x4d5901, 0x8071e0,
|
||||||
0xe13f89, 0xb295f3, 0x64a8f1, 0xaea74b, 0x38fc4c, 0xeab2bb,
|
0xe13f89, 0xb295f3, 0x64a8f1, 0xaea74b, 0x38fc4c, 0xeab2bb,
|
||||||
0x47270b, 0xabc3a7, 0x34ba60, 0x52dd34, 0xf8563a, 0xeb7e8a,
|
0x47270b, 0xabc3a7, 0x34ba60, 0x52dd34, 0xf8563a, 0xeb7e8a,
|
||||||
0x31bb36, 0x5895b7, 0x47f7a9, 0x94c3aa, 0xd39225, 0x1e7f3e,
|
0x31bb36, 0x5895b7, 0x47f7a9, 0x94c3aa, 0xd39225, 0x1e7f3e,
|
||||||
0xd8974e, 0xbba94f, 0xd8ae01, 0xe661b4, 0x393d8e, 0xa523aa,
|
0xd8974e, 0xbba94f, 0xd8ae01, 0xe661b4, 0x393d8e, 0xa523aa,
|
||||||
0x33068e, 0x1633b5, 0x3bb188, 0x1d3a9d, 0x4013d0, 0xcc1be5,
|
0x33068e, 0x1633b5, 0x3bb188, 0x1d3a9d, 0x4013d0, 0xcc1be5,
|
||||||
0xf862e7, 0x3bf28f, 0x39b5bf, 0x0bc235, 0x22747e, 0xa247c0,
|
0xf862e7, 0x3bf28f, 0x39b5bf, 0x0bc235, 0x22747e, 0xa247c0,
|
||||||
0xd52d1f, 0x19add3, 0x9094df, 0x9311d0, 0xb42b25, 0x496db2,
|
0xd52d1f, 0x19add3, 0x9094df, 0x9311d0, 0xb42b25, 0x496db2,
|
||||||
0xe264b2, 0x5ef135, 0x3bc6a4, 0x1a4ad0, 0xaac92e, 0x64e886,
|
0xe264b2, 0x5ef135, 0x3bc6a4, 0x1a4ad0, 0xaac92e, 0x64e886,
|
||||||
0x573091, 0x982cfb, 0x311b1a, 0x08728b, 0xbdcee1, 0x60e142,
|
0x573091, 0x982cfb, 0x311b1a, 0x08728b, 0xbdcee1, 0x60e142,
|
||||||
0xeb641d, 0xd0bba3, 0xe559d4, 0x597b8c, 0x2a4483, 0xf332ba,
|
0xeb641d, 0xd0bba3, 0xe559d4, 0x597b8c, 0x2a4483, 0xf332ba,
|
||||||
0xf84867, 0x2c8d1b, 0x2fa9b0, 0x50f3dd, 0xf9f573, 0xdb61b4,
|
0xf84867, 0x2c8d1b, 0x2fa9b0, 0x50f3dd, 0xf9f573, 0xdb61b4,
|
||||||
0xfe233e, 0x6c41a6, 0xeea318, 0x775a26, 0xbc5e5c, 0xcea708,
|
0xfe233e, 0x6c41a6, 0xeea318, 0x775a26, 0xbc5e5c, 0xcea708,
|
||||||
0x94dc57, 0xe20196, 0xf1e839, 0xbe4851, 0x5d2d2f, 0x4e9555,
|
0x94dc57, 0xe20196, 0xf1e839, 0xbe4851, 0x5d2d2f, 0x4e9555,
|
||||||
0xd96ec2, 0xe7d755, 0x6304e0, 0xc02e0e, 0xfc40a0, 0xbbf9b3,
|
0xd96ec2, 0xe7d755, 0x6304e0, 0xc02e0e, 0xfc40a0, 0xbbf9b3,
|
||||||
0x7125a7, 0x222dfb, 0xf619d8, 0x838c1c, 0x6619e6, 0xb20d55,
|
0x7125a7, 0x222dfb, 0xf619d8, 0x838c1c, 0x6619e6, 0xb20d55,
|
||||||
0xbb5137, 0x79e809, 0xaf9149, 0x0d73de, 0x0b0da5, 0xce7f58,
|
0xbb5137, 0x79e809, 0xaf9149, 0x0d73de, 0x0b0da5, 0xce7f58,
|
||||||
0xac1934, 0x724667, 0x7a1a13, 0x9e26bc, 0x4555e7, 0x585cb5,
|
0xac1934, 0x724667, 0x7a1a13, 0x9e26bc, 0x4555e7, 0x585cb5,
|
||||||
0x711d14, 0x486991, 0x480d60, 0x56adab, 0xd62f64, 0x96ee0c,
|
0x711d14, 0x486991, 0x480d60, 0x56adab, 0xd62f64, 0x96ee0c,
|
||||||
0x212ff3, 0x5d6d88, 0xa67684, 0x95651e, 0xab9e0a, 0x4ddefe,
|
0x212ff3, 0x5d6d88, 0xa67684, 0x95651e, 0xab9e0a, 0x4ddefe,
|
||||||
0x571010, 0x836a39, 0xf8ea31, 0x9e381d, 0xeac8b1, 0xcac96b,
|
0x571010, 0x836a39, 0xf8ea31, 0x9e381d, 0xeac8b1, 0xcac96b,
|
||||||
0x37f21e, 0xd505e9, 0x984743, 0x9fc56c, 0x0331b7, 0x3b8bf8,
|
0x37f21e, 0xd505e9, 0x984743, 0x9fc56c, 0x0331b7, 0x3b8bf8,
|
||||||
0x86e56a, 0x8dc343, 0x6230e7, 0x93cfd5, 0x6a8f2d, 0x733005,
|
0x86e56a, 0x8dc343, 0x6230e7, 0x93cfd5, 0x6a8f2d, 0x733005,
|
||||||
0x1af021, 0xa09fcb, 0x7415a1, 0xd56b23, 0x6ff725, 0x2f4bc7,
|
0x1af021, 0xa09fcb, 0x7415a1, 0xd56b23, 0x6ff725, 0x2f4bc7,
|
||||||
0xb8a591, 0x7fac59, 0x5c55de, 0x212c38, 0xb13296, 0x5cff50,
|
0xb8a591, 0x7fac59, 0x5c55de, 0x212c38, 0xb13296, 0x5cff50,
|
||||||
0x366262, 0xfa7b16, 0xf4d9a6, 0x2acfe7, 0xf07403, 0xd4d604,
|
0x366262, 0xfa7b16, 0xf4d9a6, 0x2acfe7, 0xf07403, 0xd4d604,
|
||||||
0x6fd916, 0x31b1bf, 0xcbb450, 0x5bd7c8, 0x0ce194, 0x6bd643,
|
0x6fd916, 0x31b1bf, 0xcbb450, 0x5bd7c8, 0x0ce194, 0x6bd643,
|
||||||
0x4fd91c, 0xdf4543, 0x5f3453, 0xe2b5aa, 0xc9aec8, 0x131485,
|
0x4fd91c, 0xdf4543, 0x5f3453, 0xe2b5aa, 0xc9aec8, 0x131485,
|
||||||
0xf9d2bf, 0xbadb9e, 0x76f5b9, 0xaf15cf, 0xca3182, 0x14b56d,
|
0xf9d2bf, 0xbadb9e, 0x76f5b9, 0xaf15cf, 0xca3182, 0x14b56d,
|
||||||
0xe9fe4d, 0x50fc35, 0xf5aed5, 0xa2d0c1, 0xc96057, 0x192eb6,
|
0xe9fe4d, 0x50fc35, 0xf5aed5, 0xa2d0c1, 0xc96057, 0x192eb6,
|
||||||
0xe91d92, 0x07d144, 0xaea3c6, 0x343566, 0x26d5b4, 0x3161e2,
|
0xe91d92, 0x07d144, 0xaea3c6, 0x343566, 0x26d5b4, 0x3161e2,
|
||||||
0x37f1a2, 0x209eff, 0x958e23, 0x493798, 0x35f4a6, 0x4bdc02,
|
0x37f1a2, 0x209eff, 0x958e23, 0x493798, 0x35f4a6, 0x4bdc02,
|
||||||
0xc2be13, 0xbe80a0, 0x0b72a3, 0x115c5f, 0x1e1bd1, 0x0db4d3,
|
0xc2be13, 0xbe80a0, 0x0b72a3, 0x115c5f, 0x1e1bd1, 0x0db4d3,
|
||||||
0x869e85, 0x96976b, 0x2ac91f, 0x8a26c2, 0x3070f0, 0x041412,
|
0x869e85, 0x96976b, 0x2ac91f, 0x8a26c2, 0x3070f0, 0x041412,
|
||||||
0xfc9fa5, 0xf72a38, 0x9c6878, 0xe2aa76, 0x50cfe1, 0x559274,
|
0xfc9fa5, 0xf72a38, 0x9c6878, 0xe2aa76, 0x50cfe1, 0x559274,
|
||||||
0x934e38, 0x0a92f7, 0x5533f0, 0xa63db4, 0x399971, 0xe2b755,
|
0x934e38, 0x0a92f7, 0x5533f0, 0xa63db4, 0x399971, 0xe2b755,
|
||||||
0xa98a7c, 0x008f19, 0xac54d2, 0x2ea0b4, 0xf5f3e0, 0x60c849,
|
0xa98a7c, 0x008f19, 0xac54d2, 0x2ea0b4, 0xf5f3e0, 0x60c849,
|
||||||
0xffd269, 0xae52ce, 0x7a5fdd, 0xe9ce06, 0xfb0ae8, 0xa50cce,
|
0xffd269, 0xae52ce, 0x7a5fdd, 0xe9ce06, 0xfb0ae8, 0xa50cce,
|
||||||
0xea9d3e, 0x3766dd, 0xb834f5, 0x0da090, 0x846f88, 0x4ae3d5,
|
0xea9d3e, 0x3766dd, 0xb834f5, 0x0da090, 0x846f88, 0x4ae3d5,
|
||||||
0x099a03, 0x2eae2d, 0xfcb40a, 0xfb9b33, 0xe281dd, 0x1b16ba,
|
0x099a03, 0x2eae2d, 0xfcb40a, 0xfb9b33, 0xe281dd, 0x1b16ba,
|
||||||
0xd8c0af, 0xd96b97, 0xb52dc9, 0x9c277f, 0x5951d5, 0x21ccd6,
|
0xd8c0af, 0xd96b97, 0xb52dc9, 0x9c277f, 0x5951d5, 0x21ccd6,
|
||||||
0xb6496b, 0x584562, 0xb3baf2, 0xa1a5c4, 0x7ca2cf, 0xa9b93d,
|
0xb6496b, 0x584562, 0xb3baf2, 0xa1a5c4, 0x7ca2cf, 0xa9b93d,
|
||||||
0x7b7b89, 0x483d38,
|
0x7b7b89, 0x483d38,
|
||||||
};
|
};
|
||||||
|
|
||||||
static const long double c[] = {
|
static const long double c[] = {
|
||||||
@ -212,7 +212,7 @@ int32_t __ieee754_rem_pio2l(long double x, long double *y)
|
|||||||
if (ix < 0x40002d97c7f3321dLL) /* |x| in <pi/4, 3pi/4) */
|
if (ix < 0x40002d97c7f3321dLL) /* |x| in <pi/4, 3pi/4) */
|
||||||
{
|
{
|
||||||
if (hx > 0)
|
if (hx > 0)
|
||||||
{
|
{
|
||||||
/* 113 + 113 bit PI is ok */
|
/* 113 + 113 bit PI is ok */
|
||||||
z = x - PI_2_1;
|
z = x - PI_2_1;
|
||||||
y[0] = z - PI_2_1t;
|
y[0] = z - PI_2_1t;
|
||||||
|
|||||||
@ -12,9 +12,9 @@
|
|||||||
/*
|
/*
|
||||||
Long double expansions are
|
Long double expansions are
|
||||||
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
||||||
and are incorporated herein by permission of the author. The author
|
and are incorporated herein by permission of the author. The author
|
||||||
reserves the right to distribute this material elsewhere under different
|
reserves the right to distribute this material elsewhere under different
|
||||||
copying permissions. These modifications are distributed here under
|
copying permissions. These modifications are distributed here under
|
||||||
the following terms:
|
the following terms:
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
|
|||||||
@ -42,7 +42,7 @@
|
|||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* Copyright 2001 by Stephen L. Moshier <moshier@na-net.ornl.gov>
|
/* Copyright 2001 by Stephen L. Moshier <moshier@na-net.ornl.gov>
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
modify it under the terms of the GNU Lesser General Public
|
modify it under the terms of the GNU Lesser General Public
|
||||||
|
|||||||
@ -11,9 +11,9 @@
|
|||||||
|
|
||||||
/* Modifications and expansions for 128-bit long double are
|
/* Modifications and expansions for 128-bit long double are
|
||||||
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
||||||
and are incorporated herein by permission of the author. The author
|
and are incorporated herein by permission of the author. The author
|
||||||
reserves the right to distribute this material elsewhere under different
|
reserves the right to distribute this material elsewhere under different
|
||||||
copying permissions. These modifications are distributed here under
|
copying permissions. These modifications are distributed here under
|
||||||
the following terms:
|
the following terms:
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
|
|||||||
@ -35,7 +35,7 @@
|
|||||||
*
|
*
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* Copyright 2001 by Stephen L. Moshier
|
/* Copyright 2001 by Stephen L. Moshier
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
modify it under the terms of the GNU Lesser General Public
|
modify it under the terms of the GNU Lesser General Public
|
||||||
|
|||||||
@ -36,7 +36,7 @@
|
|||||||
* IEEE -1, 8 100000 1.9e-34 4.3e-35
|
* IEEE -1, 8 100000 1.9e-34 4.3e-35
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* Copyright 2001 by Stephen L. Moshier
|
/* Copyright 2001 by Stephen L. Moshier
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
modify it under the terms of the GNU Lesser General Public
|
modify it under the terms of the GNU Lesser General Public
|
||||||
|
|||||||
@ -26,7 +26,7 @@ float __nexttowardf(float x, long double y)
|
|||||||
int32_t hx,ix;
|
int32_t hx,ix;
|
||||||
int64_t hy,iy;
|
int64_t hy,iy;
|
||||||
u_int64_t ly;
|
u_int64_t ly;
|
||||||
|
|
||||||
GET_FLOAT_WORD(hx,x);
|
GET_FLOAT_WORD(hx,x);
|
||||||
GET_LDOUBLE_WORDS64(hy,ly,y);
|
GET_LDOUBLE_WORDS64(hy,ly,y);
|
||||||
ix = hx&0x7fffffff; /* |x| */
|
ix = hx&0x7fffffff; /* |x| */
|
||||||
|
|||||||
@ -50,7 +50,7 @@ __remquol (long double x, long double y, int *quo)
|
|||||||
|
|
||||||
if (hy <= 0x7ffbffffffffffffLL)
|
if (hy <= 0x7ffbffffffffffffLL)
|
||||||
x = __ieee754_fmodl (x, 8 * y); /* now x < 8y */
|
x = __ieee754_fmodl (x, 8 * y); /* now x < 8y */
|
||||||
|
|
||||||
if (((hx - hy) | (lx - ly)) == 0)
|
if (((hx - hy) | (lx - ly)) == 0)
|
||||||
{
|
{
|
||||||
*quo = qs ? -1 : 1;
|
*quo = qs ? -1 : 1;
|
||||||
|
|||||||
@ -1,7 +1,7 @@
|
|||||||
/* s_scalblnl.c -- long double version of s_scalbn.c.
|
/* s_scalblnl.c -- long double version of s_scalbn.c.
|
||||||
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* @(#)s_scalbn.c 5.1 93/09/24 */
|
/* @(#)s_scalbn.c 5.1 93/09/24 */
|
||||||
/*
|
/*
|
||||||
* ====================================================
|
* ====================================================
|
||||||
|
|||||||
@ -1,7 +1,7 @@
|
|||||||
/* s_scalbnl.c -- long double version of s_scalbn.c.
|
/* s_scalbnl.c -- long double version of s_scalbn.c.
|
||||||
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* @(#)s_scalbn.c 5.1 93/09/24 */
|
/* @(#)s_scalbn.c 5.1 93/09/24 */
|
||||||
/*
|
/*
|
||||||
* ====================================================
|
* ====================================================
|
||||||
|
|||||||
@ -1,7 +1,7 @@
|
|||||||
/* s_tanl.c -- long double version of s_tan.c.
|
/* s_tanl.c -- long double version of s_tan.c.
|
||||||
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
* Conversion to IEEE quad long double by Jakub Jelinek, jj@ultra.linux.cz.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
/* @(#)s_tan.c 5.1 93/09/24 */
|
/* @(#)s_tan.c 5.1 93/09/24 */
|
||||||
/*
|
/*
|
||||||
* ====================================================
|
* ====================================================
|
||||||
|
|||||||
@ -34,7 +34,7 @@ const long double __sincosl_table[] = {
|
|||||||
/* sin(x) = 0.25dc50bc95711d0d9787d108fd438cf5959ee0bfb7a1e36e8b1a112968f356657420e9cc9ea */
|
/* sin(x) = 0.25dc50bc95711d0d9787d108fd438cf5959ee0bfb7a1e36e8b1a112968f356657420e9cc9ea */
|
||||||
1.47892995873409608580026675734609314e-01L, /* 3ffc2ee285e4ab88e86cbc3e8847ea1c */
|
1.47892995873409608580026675734609314e-01L, /* 3ffc2ee285e4ab88e86cbc3e8847ea1c */
|
||||||
9.74950446464233268291647449768590886e-36L, /* 3f8a9eb2b3dc17f6f43c6dd16342252d */
|
9.74950446464233268291647449768590886e-36L, /* 3f8a9eb2b3dc17f6f43c6dd16342252d */
|
||||||
|
|
||||||
/* x = 1.56250000000000000000000000000000000e-01 3ffc4000000000000000000000000000 */
|
/* x = 1.56250000000000000000000000000000000e-01 3ffc4000000000000000000000000000 */
|
||||||
/* cos(x) = 0.fce1a053e621438b6d60c76e8c45bf0a9dc71aa16f922acc10e95144ec796a249813c9cb649 */
|
/* cos(x) = 0.fce1a053e621438b6d60c76e8c45bf0a9dc71aa16f922acc10e95144ec796a249813c9cb649 */
|
||||||
9.87817783816471944100503034363211317e-01L, /* 3ffef9c340a7cc428716dac18edd188b */
|
9.87817783816471944100503034363211317e-01L, /* 3ffef9c340a7cc428716dac18edd188b */
|
||||||
|
|||||||
@ -120,7 +120,7 @@ __kernel_cosl(long double x, long double y)
|
|||||||
The following should work for double but generates the wrong index.
|
The following should work for double but generates the wrong index.
|
||||||
For now the code above converts double to ieee extended to compute
|
For now the code above converts double to ieee extended to compute
|
||||||
the index back to double for the h value.
|
the index back to double for the h value.
|
||||||
|
|
||||||
index = 0x3fe - (tix >> 20);
|
index = 0x3fe - (tix >> 20);
|
||||||
hix = (tix + (0x200 << index)) & (0xfffffc00 << index);
|
hix = (tix + (0x200 << index)) & (0xfffffc00 << index);
|
||||||
if (signbit (x))
|
if (signbit (x))
|
||||||
|
|||||||
@ -146,8 +146,8 @@ __kernel_sincosl(long double x, long double y, long double *sinx, long double *c
|
|||||||
/*
|
/*
|
||||||
The following should work for double but generates the wrong index.
|
The following should work for double but generates the wrong index.
|
||||||
For now the code above converts double to ieee extended to compute
|
For now the code above converts double to ieee extended to compute
|
||||||
the index back to double for the h value.
|
the index back to double for the h value.
|
||||||
|
|
||||||
|
|
||||||
index = 0x3fe - (tix >> 20);
|
index = 0x3fe - (tix >> 20);
|
||||||
hix = (tix + (0x2000 << index)) & (0xffffc000 << index);
|
hix = (tix + (0x2000 << index)) & (0xffffc000 << index);
|
||||||
|
|||||||
@ -119,8 +119,8 @@ __kernel_sinl(long double x, long double y, int iy)
|
|||||||
/*
|
/*
|
||||||
The following should work for double but generates the wrong index.
|
The following should work for double but generates the wrong index.
|
||||||
For now the code above converts double to ieee extended to compute
|
For now the code above converts double to ieee extended to compute
|
||||||
the index back to double for the h value.
|
the index back to double for the h value.
|
||||||
|
|
||||||
index = 0x3fe - (tix >> 20);
|
index = 0x3fe - (tix >> 20);
|
||||||
hix = (tix + (0x2000 << index)) & (0xffffc000 << index);
|
hix = (tix + (0x2000 << index)) & (0xffffc000 << index);
|
||||||
x = fabsl (x);
|
x = fabsl (x);
|
||||||
|
|||||||
@ -5,7 +5,7 @@
|
|||||||
#include <sysdeps/ieee754/ldbl-128/math_ldbl.h>
|
#include <sysdeps/ieee754/ldbl-128/math_ldbl.h>
|
||||||
#include <ieee754.h>
|
#include <ieee754.h>
|
||||||
#include <stdint.h>
|
#include <stdint.h>
|
||||||
|
|
||||||
static inline void
|
static inline void
|
||||||
ldbl_extract_mantissa (int64_t *hi64, uint64_t *lo64, int *exp, long double x)
|
ldbl_extract_mantissa (int64_t *hi64, uint64_t *lo64, int *exp, long double x)
|
||||||
{
|
{
|
||||||
@ -34,7 +34,7 @@ ldbl_extract_mantissa (int64_t *hi64, uint64_t *lo64, int *exp, long double x)
|
|||||||
lo = lo >> (ediff-53);
|
lo = lo >> (ediff-53);
|
||||||
hi |= (1ULL << 52);
|
hi |= (1ULL << 52);
|
||||||
}
|
}
|
||||||
|
|
||||||
if ((eldbl.ieee.negative != eldbl.ieee.negative2)
|
if ((eldbl.ieee.negative != eldbl.ieee.negative2)
|
||||||
&& ((eldbl.ieee.exponent2 != 0) && (lo != 0LL)))
|
&& ((eldbl.ieee.exponent2 != 0) && (lo != 0LL)))
|
||||||
{
|
{
|
||||||
@ -64,7 +64,7 @@ ldbl_insert_mantissa (int sign, int exp, int64_t hi64, u_int64_t lo64)
|
|||||||
u.ieee.exponent = exp + IBM_EXTENDED_LONG_DOUBLE_BIAS;
|
u.ieee.exponent = exp + IBM_EXTENDED_LONG_DOUBLE_BIAS;
|
||||||
u.ieee.exponent2 = exp-53 + IBM_EXTENDED_LONG_DOUBLE_BIAS;
|
u.ieee.exponent2 = exp-53 + IBM_EXTENDED_LONG_DOUBLE_BIAS;
|
||||||
/* Expect 113 bits (112 bits + hidden) right justified in two longs.
|
/* Expect 113 bits (112 bits + hidden) right justified in two longs.
|
||||||
The low order 53 bits (52 + hidden) go into the lower double */
|
The low order 53 bits (52 + hidden) go into the lower double */
|
||||||
lo = (lo64 >> 7)& ((1ULL << 53) - 1);
|
lo = (lo64 >> 7)& ((1ULL << 53) - 1);
|
||||||
hidden2 = (lo64 >> 59) & 1ULL;
|
hidden2 = (lo64 >> 59) & 1ULL;
|
||||||
/* The high order 53 bits (52 + hidden) go into the upper double */
|
/* The high order 53 bits (52 + hidden) go into the upper double */
|
||||||
@ -84,7 +84,7 @@ ldbl_insert_mantissa (int sign, int exp, int64_t hi64, u_int64_t lo64)
|
|||||||
}
|
}
|
||||||
/* The hidden bit of the lo mantissa is zero so we need to
|
/* The hidden bit of the lo mantissa is zero so we need to
|
||||||
normalize the it for the low double. Shift it left until the
|
normalize the it for the low double. Shift it left until the
|
||||||
hidden bit is '1' then adjust the 2nd exponent accordingly. */
|
hidden bit is '1' then adjust the 2nd exponent accordingly. */
|
||||||
|
|
||||||
if (sizeof (lo) == sizeof (long))
|
if (sizeof (lo) == sizeof (long))
|
||||||
lzcount = __builtin_clzl (lo);
|
lzcount = __builtin_clzl (lo);
|
||||||
@ -122,7 +122,7 @@ ldbl_insert_mantissa (int sign, int exp, int64_t hi64, u_int64_t lo64)
|
|||||||
u.ieee.mantissa0 = (hi >> 32) & ((1ULL << 20) - 1);
|
u.ieee.mantissa0 = (hi >> 32) & ((1ULL << 20) - 1);
|
||||||
return u.d;
|
return u.d;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* Handy utility functions to pack/unpack/cononicalize and find the nearbyint
|
/* Handy utility functions to pack/unpack/cononicalize and find the nearbyint
|
||||||
of long double implemented as double double. */
|
of long double implemented as double double. */
|
||||||
static inline long double
|
static inline long double
|
||||||
|
|||||||
@ -56,7 +56,7 @@ long double __nextafterl(long double x, long double y)
|
|||||||
math_force_eval (u); /* raise underflow flag */
|
math_force_eval (u); /* raise underflow flag */
|
||||||
return x;
|
return x;
|
||||||
}
|
}
|
||||||
|
|
||||||
long double u;
|
long double u;
|
||||||
if(x > y) { /* x > y, x -= ulp */
|
if(x > y) { /* x > y, x -= ulp */
|
||||||
if((hx==0xffefffffffffffffLL)&&(lx==0xfc8ffffffffffffeLL))
|
if((hx==0xffefffffffffffffLL)&&(lx==0xfc8ffffffffffffeLL))
|
||||||
|
|||||||
@ -11,9 +11,9 @@
|
|||||||
|
|
||||||
/* Long double expansions are
|
/* Long double expansions are
|
||||||
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
Copyright (C) 2001 Stephen L. Moshier <moshier@na-net.ornl.gov>
|
||||||
and are incorporated herein by permission of the author. The author
|
and are incorporated herein by permission of the author. The author
|
||||||
reserves the right to distribute this material elsewhere under different
|
reserves the right to distribute this material elsewhere under different
|
||||||
copying permissions. These modifications are distributed here under
|
copying permissions. These modifications are distributed here under
|
||||||
the following terms:
|
the following terms:
|
||||||
|
|
||||||
This library is free software; you can redistribute it and/or
|
This library is free software; you can redistribute it and/or
|
||||||
|
|||||||
@ -5,7 +5,7 @@
|
|||||||
*
|
*
|
||||||
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
* Developed at SunPro, a Sun Microsystems, Inc. business.
|
||||||
* Permission to use, copy, modify, and distribute this
|
* Permission to use, copy, modify, and distribute this
|
||||||
* software is freely granted, provided that this notice
|
* software is freely granted, provided that this notice
|
||||||
* is preserved.
|
* is preserved.
|
||||||
* ====================================================
|
* ====================================================
|
||||||
*/
|
*/
|
||||||
|
|||||||
@ -61,7 +61,7 @@ check_one_fd (int fd, int mode)
|
|||||||
return;
|
return;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
/* We cannot even give an error message here since it would run
|
/* We cannot even give an error message here since it would run
|
||||||
into the same problems. */
|
into the same problems. */
|
||||||
while (1)
|
while (1)
|
||||||
@ -100,7 +100,7 @@ __libc_check_standard_fds (void)
|
|||||||
/* We don't check the standard file descriptors here. They will be
|
/* We don't check the standard file descriptors here. They will be
|
||||||
checked when we initialize the file descriptor table, as part of
|
checked when we initialize the file descriptor table, as part of
|
||||||
the _hurd_fd_subinit hook.
|
the _hurd_fd_subinit hook.
|
||||||
|
|
||||||
This function is only present to make sure that this module gets
|
This function is only present to make sure that this module gets
|
||||||
linked in when part of the static libc. */
|
linked in when part of the static libc. */
|
||||||
}
|
}
|
||||||
|
|||||||
@ -47,7 +47,7 @@ __getsockname (fd, addrarg, len)
|
|||||||
|
|
||||||
if (*len > buflen)
|
if (*len > buflen)
|
||||||
*len = buflen;
|
*len = buflen;
|
||||||
|
|
||||||
if (buf != (char *) addr)
|
if (buf != (char *) addr)
|
||||||
{
|
{
|
||||||
memcpy (addr, buf, *len);
|
memcpy (addr, buf, *len);
|
||||||
|
|||||||
@ -3,7 +3,7 @@
|
|||||||
/*
|
/*
|
||||||
* if_ppp.h - Point-to-Point Protocol definitions.
|
* if_ppp.h - Point-to-Point Protocol definitions.
|
||||||
*
|
*
|
||||||
* Copyright (c) 1989 Carnegie Mellon University.
|
* Copyright (c) 1989 Carnegie Mellon University.
|
||||||
*
|
*
|
||||||
* Redistribution and use in source and binary forms, with or without
|
* Redistribution and use in source and binary forms, with or without
|
||||||
* modification, are permitted provided that the following conditions
|
* modification, are permitted provided that the following conditions
|
||||||
|
|||||||
@ -75,7 +75,7 @@ __recvfrom (fd, buf, n, flags, addrarg, addr_len)
|
|||||||
__mach_port_deallocate (__mach_task_self (), addrport);
|
__mach_port_deallocate (__mach_task_self (), addrport);
|
||||||
return __hurd_sockfail (fd, flags, err);
|
return __hurd_sockfail (fd, flags, err);
|
||||||
}
|
}
|
||||||
|
|
||||||
if (*addr_len > buflen)
|
if (*addr_len > buflen)
|
||||||
*addr_len = buflen;
|
*addr_len = buflen;
|
||||||
|
|
||||||
|
|||||||
@ -83,7 +83,7 @@ typedef struct La_ppc64_retval
|
|||||||
uint64_t lrv_r3;
|
uint64_t lrv_r3;
|
||||||
uint64_t lrv_r4;
|
uint64_t lrv_r4;
|
||||||
double lrv_fp[4]; /* f1-f4, float - complex long double. */
|
double lrv_fp[4]; /* f1-f4, float - complex long double. */
|
||||||
uint32_t lrv_v2[4]; /* v2. */
|
uint32_t lrv_v2[4]; /* v2. */
|
||||||
} La_ppc64_retval;
|
} La_ppc64_retval;
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@ -49,7 +49,7 @@ PROCINFO_CLASS const char _dl_powerpc_cap_flags[25][10]
|
|||||||
#endif
|
#endif
|
||||||
#ifndef PROCINFO_DECL
|
#ifndef PROCINFO_DECL
|
||||||
= {
|
= {
|
||||||
"vsx",
|
"vsx",
|
||||||
"arch_2_06", "power6x", "dfp", "pa6t",
|
"arch_2_06", "power6x", "dfp", "pa6t",
|
||||||
"arch_2_05", "ic_snoop", "smt", "booke",
|
"arch_2_05", "ic_snoop", "smt", "booke",
|
||||||
"cellbe", "power5+", "power5", "power4",
|
"cellbe", "power5+", "power5", "power4",
|
||||||
|
|||||||
@ -32,7 +32,7 @@ feholdexcept (fenv_t *envp)
|
|||||||
flag. */
|
flag. */
|
||||||
new.l[1] = old.l[1] & 7;
|
new.l[1] = old.l[1] & 7;
|
||||||
new.l[0] = old.l[0];
|
new.l[0] = old.l[0];
|
||||||
|
|
||||||
/* If the old env had any enabled exceptions, then mask SIGFPE in the
|
/* If the old env had any enabled exceptions, then mask SIGFPE in the
|
||||||
MSR FE0/FE1 bits. This may allow the FPU to run faster because it
|
MSR FE0/FE1 bits. This may allow the FPU to run faster because it
|
||||||
always takes the default action and can not generate SIGFPE. */
|
always takes the default action and can not generate SIGFPE. */
|
||||||
|
|||||||
@ -16,17 +16,17 @@
|
|||||||
License along with the GNU C Library; if not, see
|
License along with the GNU C Library; if not, see
|
||||||
<http://www.gnu.org/licenses/>. */
|
<http://www.gnu.org/licenses/>. */
|
||||||
|
|
||||||
/* We want to specify the bit pattern of the __fe_*_env constants, so
|
/* We want to specify the bit pattern of the __fe_*_env constants, so
|
||||||
pretend they're really `long long' instead of `double'. */
|
pretend they're really `long long' instead of `double'. */
|
||||||
|
|
||||||
/* If the default argument is used we use this value. */
|
/* If the default argument is used we use this value. */
|
||||||
const unsigned long long __fe_dfl_env __attribute__ ((aligned (8))) =
|
const unsigned long long __fe_dfl_env __attribute__ ((aligned (8))) =
|
||||||
0xfff8000000000000ULL;
|
0xfff8000000000000ULL;
|
||||||
|
|
||||||
/* Floating-point environment where none of the exceptions are masked. */
|
/* Floating-point environment where none of the exceptions are masked. */
|
||||||
const unsigned long long __fe_enabled_env __attribute__ ((aligned (8))) =
|
const unsigned long long __fe_enabled_env __attribute__ ((aligned (8))) =
|
||||||
0xfff80000000000f8ULL;
|
0xfff80000000000f8ULL;
|
||||||
|
|
||||||
/* Floating-point environment with the NI bit set. */
|
/* Floating-point environment with the NI bit set. */
|
||||||
const unsigned long long __fe_nonieee_env __attribute__ ((aligned (8))) =
|
const unsigned long long __fe_nonieee_env __attribute__ ((aligned (8))) =
|
||||||
0xfff8000000000004ULL;
|
0xfff8000000000004ULL;
|
||||||
|
|||||||
@ -29,21 +29,21 @@ __fesetenv (const fenv_t *envp)
|
|||||||
/* get the currently set exceptions. */
|
/* get the currently set exceptions. */
|
||||||
new.fenv = *envp;
|
new.fenv = *envp;
|
||||||
old.fenv = fegetenv_register ();
|
old.fenv = fegetenv_register ();
|
||||||
|
|
||||||
/* If the old env has no enabled exceptions and the new env has any enabled
|
/* If the old env has no enabled exceptions and the new env has any enabled
|
||||||
exceptions, then unmask SIGFPE in the MSR FE0/FE1 bits. This will put the
|
exceptions, then unmask SIGFPE in the MSR FE0/FE1 bits. This will put the
|
||||||
hardware into "precise mode" and may cause the FPU to run slower on some
|
hardware into "precise mode" and may cause the FPU to run slower on some
|
||||||
hardware. */
|
hardware. */
|
||||||
if ((old.l[1] & _FPU_MASK_ALL) == 0 && (new.l[1] & _FPU_MASK_ALL) != 0)
|
if ((old.l[1] & _FPU_MASK_ALL) == 0 && (new.l[1] & _FPU_MASK_ALL) != 0)
|
||||||
(void)__fe_nomask_env ();
|
(void)__fe_nomask_env ();
|
||||||
|
|
||||||
/* If the old env had any enabled exceptions and the new env has no enabled
|
/* If the old env had any enabled exceptions and the new env has no enabled
|
||||||
exceptions, then mask SIGFPE in the MSR FE0/FE1 bits. This may allow the
|
exceptions, then mask SIGFPE in the MSR FE0/FE1 bits. This may allow the
|
||||||
FPU to run faster because it always takes the default action and can not
|
FPU to run faster because it always takes the default action and can not
|
||||||
generate SIGFPE. */
|
generate SIGFPE. */
|
||||||
if ((old.l[1] & _FPU_MASK_ALL) != 0 && (new.l[1] & _FPU_MASK_ALL) == 0)
|
if ((old.l[1] & _FPU_MASK_ALL) != 0 && (new.l[1] & _FPU_MASK_ALL) == 0)
|
||||||
(void)__fe_mask_env ();
|
(void)__fe_mask_env ();
|
||||||
|
|
||||||
fesetenv_register (*envp);
|
fesetenv_register (*envp);
|
||||||
|
|
||||||
/* Success. */
|
/* Success. */
|
||||||
|
|||||||
@ -35,17 +35,17 @@ __feupdateenv (const fenv_t *envp)
|
|||||||
exceptions. Leave fraction rounded/inexact and FP result/CC bits
|
exceptions. Leave fraction rounded/inexact and FP result/CC bits
|
||||||
unchanged. */
|
unchanged. */
|
||||||
new.l[1] = (old.l[1] & 0x1FFFFF00) | (new.l[1] & 0x1FF80FFF);
|
new.l[1] = (old.l[1] & 0x1FFFFF00) | (new.l[1] & 0x1FF80FFF);
|
||||||
|
|
||||||
/* If the old env has no enabled exceptions and the new env has any enabled
|
/* If the old env has no enabled exceptions and the new env has any enabled
|
||||||
exceptions, then unmask SIGFPE in the MSR FE0/FE1 bits. This will put
|
exceptions, then unmask SIGFPE in the MSR FE0/FE1 bits. This will put
|
||||||
the hardware into "precise mode" and may cause the FPU to run slower on
|
the hardware into "precise mode" and may cause the FPU to run slower on
|
||||||
some hardware. */
|
some hardware. */
|
||||||
if ((old.l[1] & _FPU_MASK_ALL) == 0 && (new.l[1] & _FPU_MASK_ALL) != 0)
|
if ((old.l[1] & _FPU_MASK_ALL) == 0 && (new.l[1] & _FPU_MASK_ALL) != 0)
|
||||||
(void)__fe_nomask_env ();
|
(void)__fe_nomask_env ();
|
||||||
|
|
||||||
/* If the old env had any enabled exceptions and the new env has no enabled
|
/* If the old env had any enabled exceptions and the new env has no enabled
|
||||||
exceptions, then mask SIGFPE in the MSR FE0/FE1 bits. This may allow the
|
exceptions, then mask SIGFPE in the MSR FE0/FE1 bits. This may allow the
|
||||||
FPU to run faster because it always takes the default action and can not
|
FPU to run faster because it always takes the default action and can not
|
||||||
generate SIGFPE. */
|
generate SIGFPE. */
|
||||||
if ((old.l[1] & _FPU_MASK_ALL) != 0 && (new.l[1] & _FPU_MASK_ALL) == 0)
|
if ((old.l[1] & _FPU_MASK_ALL) != 0 && (new.l[1] & _FPU_MASK_ALL) == 0)
|
||||||
(void)__fe_mask_env ();
|
(void)__fe_mask_env ();
|
||||||
|
|||||||
@ -36,7 +36,7 @@ __rintf (float x)
|
|||||||
x = -(x - TWO23);
|
x = -(x - TWO23);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
return x;
|
return x;
|
||||||
}
|
}
|
||||||
weak_alias (__rintf, rintf)
|
weak_alias (__rintf, rintf)
|
||||||
|
|||||||
@ -50,7 +50,7 @@ const float __t_sqrt[1024] = {
|
|||||||
0.9847,0.5077, 0.9857,0.5072, 0.9867,0.5067, 0.9877,0.5062, 0.9887,0.5057,
|
0.9847,0.5077, 0.9857,0.5072, 0.9867,0.5067, 0.9877,0.5062, 0.9887,0.5057,
|
||||||
0.9897,0.5052, 0.9907,0.5047, 0.9917,0.5042, 0.9926,0.5037, 0.9936,0.5032,
|
0.9897,0.5052, 0.9907,0.5047, 0.9917,0.5042, 0.9926,0.5037, 0.9936,0.5032,
|
||||||
0.9946,0.5027, 0.9956,0.5022, 0.9966,0.5017, 0.9976,0.5012, 0.9985,0.5007,
|
0.9946,0.5027, 0.9956,0.5022, 0.9966,0.5017, 0.9976,0.5012, 0.9985,0.5007,
|
||||||
0.9995,0.5002,
|
0.9995,0.5002,
|
||||||
1.0010,0.4995, 1.0029,0.4985, 1.0049,0.4976, 1.0068,0.4966, 1.0088,0.4957,
|
1.0010,0.4995, 1.0029,0.4985, 1.0049,0.4976, 1.0068,0.4966, 1.0088,0.4957,
|
||||||
1.0107,0.4947, 1.0126,0.4938, 1.0145,0.4928, 1.0165,0.4919, 1.0184,0.4910,
|
1.0107,0.4947, 1.0126,0.4938, 1.0145,0.4928, 1.0165,0.4919, 1.0184,0.4910,
|
||||||
1.0203,0.4901, 1.0222,0.4891, 1.0241,0.4882, 1.0260,0.4873, 1.0279,0.4864,
|
1.0203,0.4901, 1.0222,0.4891, 1.0241,0.4882, 1.0260,0.4873, 1.0279,0.4864,
|
||||||
|
|||||||
@ -24,7 +24,7 @@
|
|||||||
atomic operation. In that case we don't expect additional updates
|
atomic operation. In that case we don't expect additional updates
|
||||||
adjacent to the lock word after the Store Conditional and the hint
|
adjacent to the lock word after the Store Conditional and the hint
|
||||||
should be false. */
|
should be false. */
|
||||||
|
|
||||||
#if defined _ARCH_PWR6 || defined _ARCH_PWR6X
|
#if defined _ARCH_PWR6 || defined _ARCH_PWR6X
|
||||||
# define MUTEX_HINT_ACQ ",1"
|
# define MUTEX_HINT_ACQ ",1"
|
||||||
# define MUTEX_HINT_REL ",0"
|
# define MUTEX_HINT_REL ",0"
|
||||||
|
|||||||
@ -59,7 +59,7 @@ ENTRY (__floor)
|
|||||||
fnabs fp1,fp1 /* if (x == 0.0) */
|
fnabs fp1,fp1 /* if (x == 0.0) */
|
||||||
/* x = -0.0; */
|
/* x = -0.0; */
|
||||||
.L9:
|
.L9:
|
||||||
mtfsf 0x01,fp11 /* restore previous rounding mode. */
|
mtfsf 0x01,fp11 /* restore previous rounding mode. */
|
||||||
blr
|
blr
|
||||||
END (__floor)
|
END (__floor)
|
||||||
|
|
||||||
|
|||||||
@ -58,7 +58,7 @@ ENTRY (__floorf)
|
|||||||
fnabs fp1,fp1 /* if (x == 0.0) */
|
fnabs fp1,fp1 /* if (x == 0.0) */
|
||||||
/* x = -0.0; */
|
/* x = -0.0; */
|
||||||
.L9:
|
.L9:
|
||||||
mtfsf 0x01,fp11 /* restore previous rounding mode. */
|
mtfsf 0x01,fp11 /* restore previous rounding mode. */
|
||||||
blr
|
blr
|
||||||
END (__floorf)
|
END (__floorf)
|
||||||
|
|
||||||
|
|||||||
@ -21,7 +21,7 @@
|
|||||||
|
|
||||||
/* int __isnan(x) */
|
/* int __isnan(x) */
|
||||||
.machine power4
|
.machine power4
|
||||||
EALIGN (__isnan, 4, 0)
|
EALIGN (__isnan, 4, 0)
|
||||||
mffs fp0
|
mffs fp0
|
||||||
mtfsb0 4*cr6+lt /* reset_fpscr_bit (FPSCR_VE) */
|
mtfsb0 4*cr6+lt /* reset_fpscr_bit (FPSCR_VE) */
|
||||||
fcmpu cr7,fp1,fp1
|
fcmpu cr7,fp1,fp1
|
||||||
|
|||||||
@ -24,13 +24,13 @@
|
|||||||
.LC0: /* 0.5 */
|
.LC0: /* 0.5 */
|
||||||
.long 0x3f000000
|
.long 0x3f000000
|
||||||
.section ".text"
|
.section ".text"
|
||||||
|
|
||||||
/* long [r3] lround (float x [fp1])
|
/* long [r3] lround (float x [fp1])
|
||||||
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"round to Nearest" as "Choose the best approximation. In case of a
|
"round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we can't use the PowerPC "round to Nearest" mode. Instead we set
|
So we can't use the PowerPC "round to Nearest" mode. Instead we set
|
||||||
"round toward Zero" mode and round by adding +-0.5 before rounding
|
"round toward Zero" mode and round by adding +-0.5 before rounding
|
||||||
to the integer value. It is necessary to detect when x is
|
to the integer value. It is necessary to detect when x is
|
||||||
@ -60,7 +60,7 @@ ENTRY (__lround)
|
|||||||
blt- cr6,.Lretzero
|
blt- cr6,.Lretzero
|
||||||
fadd fp3,fp2,fp10 /* |x|+=0.5 bias to prepare to round. */
|
fadd fp3,fp2,fp10 /* |x|+=0.5 bias to prepare to round. */
|
||||||
bge cr7,.Lconvert /* x is positive so don't negate x. */
|
bge cr7,.Lconvert /* x is positive so don't negate x. */
|
||||||
fnabs fp3,fp3 /* -(|x|+=0.5) */
|
fnabs fp3,fp3 /* -(|x|+=0.5) */
|
||||||
.Lconvert:
|
.Lconvert:
|
||||||
fctiwz fp4,fp3 /* Convert to Integer word lround toward 0. */
|
fctiwz fp4,fp3 /* Convert to Integer word lround toward 0. */
|
||||||
stfd fp4,8(r1)
|
stfd fp4,8(r1)
|
||||||
|
|||||||
@ -27,11 +27,11 @@
|
|||||||
.long 0x3f000000
|
.long 0x3f000000
|
||||||
|
|
||||||
/* double [fp1] round (double x [fp1])
|
/* double [fp1] round (double x [fp1])
|
||||||
IEEE 1003.1 round function. IEEE specifies "round to the nearest
|
IEEE 1003.1 round function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"Round to Nearest" as "Choose the best approximation. In case of a
|
"Round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we can't use the PowerPC "Round to Nearest" mode. Instead we set
|
So we can't use the PowerPC "Round to Nearest" mode. Instead we set
|
||||||
"Round toward Zero" mode and round by adding +-0.5 before rounding
|
"Round toward Zero" mode and round by adding +-0.5 before rounding
|
||||||
to the integer value. */
|
to the integer value. */
|
||||||
|
|||||||
@ -26,11 +26,11 @@
|
|||||||
.long 0x3f000000
|
.long 0x3f000000
|
||||||
|
|
||||||
/* float [fp1] roundf (float x [fp1])
|
/* float [fp1] roundf (float x [fp1])
|
||||||
IEEE 1003.1 round function. IEEE specifies "round to the nearest
|
IEEE 1003.1 round function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"Round to Nearest" as "Choose the best approximation. In case of a
|
"Round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we can't use the PowerPC "Round to Nearest" mode. Instead we set
|
So we can't use the PowerPC "Round to Nearest" mode. Instead we set
|
||||||
"Round toward Zero" mode and round by adding +-0.5 before rounding
|
"Round toward Zero" mode and round by adding +-0.5 before rounding
|
||||||
to the integer value. */
|
to the integer value. */
|
||||||
|
|||||||
@ -26,7 +26,7 @@
|
|||||||
|
|
||||||
/* double [fp1] trunc (double x [fp1])
|
/* double [fp1] trunc (double x [fp1])
|
||||||
IEEE 1003.1 trunc function. IEEE specifies "trunc to the integer
|
IEEE 1003.1 trunc function. IEEE specifies "trunc to the integer
|
||||||
value, in floating format, nearest to but no larger in magnitude
|
value, in floating format, nearest to but no larger in magnitude
|
||||||
then the argument."
|
then the argument."
|
||||||
We set "round toward Zero" mode and trunc by adding +-2**52 then
|
We set "round toward Zero" mode and trunc by adding +-2**52 then
|
||||||
subtracting +-2**52. */
|
subtracting +-2**52. */
|
||||||
|
|||||||
@ -25,7 +25,7 @@
|
|||||||
|
|
||||||
/* float [fp1] truncf (float x [fp1])
|
/* float [fp1] truncf (float x [fp1])
|
||||||
IEEE 1003.1 trunc function. IEEE specifies "trunc to the integer
|
IEEE 1003.1 trunc function. IEEE specifies "trunc to the integer
|
||||||
value, in floating format, nearest to but no larger in magnitude
|
value, in floating format, nearest to but no larger in magnitude
|
||||||
then the argument."
|
then the argument."
|
||||||
We set "round toward Zero" mode and trunc by adding +-2**23 then
|
We set "round toward Zero" mode and trunc by adding +-2**23 then
|
||||||
subtracting +-2**23. */
|
subtracting +-2**23. */
|
||||||
|
|||||||
@ -20,7 +20,7 @@
|
|||||||
#include <math_ldbl_opt.h>
|
#include <math_ldbl_opt.h>
|
||||||
|
|
||||||
/* long long int[r3, r4] __llrint (double x[fp1]) */
|
/* long long int[r3, r4] __llrint (double x[fp1]) */
|
||||||
ENTRY (__llrint)
|
ENTRY (__llrint)
|
||||||
CALL_MCOUNT
|
CALL_MCOUNT
|
||||||
stwu r1,-16(r1)
|
stwu r1,-16(r1)
|
||||||
cfi_adjust_cfa_offset (16)
|
cfi_adjust_cfa_offset (16)
|
||||||
@ -31,7 +31,7 @@ ENTRY (__llrint)
|
|||||||
nop
|
nop
|
||||||
lwz r3,8(r1)
|
lwz r3,8(r1)
|
||||||
lwz r4,12(r1)
|
lwz r4,12(r1)
|
||||||
addi r1,r1,16
|
addi r1,r1,16
|
||||||
blr
|
blr
|
||||||
END (__llrint)
|
END (__llrint)
|
||||||
|
|
||||||
|
|||||||
@ -19,7 +19,7 @@
|
|||||||
#include <sysdep.h>
|
#include <sysdep.h>
|
||||||
|
|
||||||
/* long long int[r3, r4] __llrintf (float x[fp1]) */
|
/* long long int[r3, r4] __llrintf (float x[fp1]) */
|
||||||
ENTRY (__llrintf)
|
ENTRY (__llrintf)
|
||||||
CALL_MCOUNT
|
CALL_MCOUNT
|
||||||
stwu r1,-16(r1)
|
stwu r1,-16(r1)
|
||||||
cfi_adjust_cfa_offset (16)
|
cfi_adjust_cfa_offset (16)
|
||||||
@ -30,7 +30,7 @@ ENTRY (__llrintf)
|
|||||||
nop
|
nop
|
||||||
lwz r3,8(r1)
|
lwz r3,8(r1)
|
||||||
lwz r4,12(r1)
|
lwz r4,12(r1)
|
||||||
addi r1,r1,16
|
addi r1,r1,16
|
||||||
blr
|
blr
|
||||||
END (__llrintf)
|
END (__llrintf)
|
||||||
|
|
||||||
|
|||||||
@ -29,11 +29,11 @@
|
|||||||
.section ".text"
|
.section ".text"
|
||||||
|
|
||||||
/* long [r3] lround (float x [fp1])
|
/* long [r3] lround (float x [fp1])
|
||||||
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"round to Nearest" as "Choose the best approximation. In case of a
|
"round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we can't use the PowerPC "round to Nearest" mode. Instead we set
|
So we can't use the PowerPC "round to Nearest" mode. Instead we set
|
||||||
"round toward Zero" mode and round by adding +-0.5 before rounding
|
"round toward Zero" mode and round by adding +-0.5 before rounding
|
||||||
to the integer value.
|
to the integer value.
|
||||||
|
|||||||
@ -25,20 +25,20 @@
|
|||||||
sets the appropriate floating point exceptions. Extended checking is
|
sets the appropriate floating point exceptions. Extended checking is
|
||||||
only needed to set errno (via __kernel_standard) if the input value
|
only needed to set errno (via __kernel_standard) if the input value
|
||||||
is negative.
|
is negative.
|
||||||
|
|
||||||
The fsqrt will set FPCC and FU (Floating Point Unordered or NaN
|
The fsqrt will set FPCC and FU (Floating Point Unordered or NaN
|
||||||
to indicated that the input value was negative or NaN. Use Move to
|
to indicated that the input value was negative or NaN. Use Move to
|
||||||
Condition Register from FPSCR to copy the FPCC field to cr1. The
|
Condition Register from FPSCR to copy the FPCC field to cr1. The
|
||||||
branch on summary overflow transfers control to w_sqrt to process
|
branch on summary overflow transfers control to w_sqrt to process
|
||||||
any error conditions. Otherwise we can return the result directly.
|
any error conditions. Otherwise we can return the result directly.
|
||||||
|
|
||||||
This part of the function is a leaf routine, so no need to stack a
|
This part of the function is a leaf routine, so no need to stack a
|
||||||
frame or execute prologue/epilogue code. This means it is safe to
|
frame or execute prologue/epilogue code. This means it is safe to
|
||||||
transfer directly to w_sqrt as long as the input value (f1) is
|
transfer directly to w_sqrt as long as the input value (f1) is
|
||||||
preserved. Putting the sqrt result into f2 (double parameter 2)
|
preserved. Putting the sqrt result into f2 (double parameter 2)
|
||||||
allows passing both the input value and sqrt result into the extended
|
allows passing both the input value and sqrt result into the extended
|
||||||
wrapper so there is no need to recompute.
|
wrapper so there is no need to recompute.
|
||||||
|
|
||||||
This tactic avoids the overhead of stacking a frame for the normal
|
This tactic avoids the overhead of stacking a frame for the normal
|
||||||
(non-error) case. Until gcc supports prologue shrink-wrapping
|
(non-error) case. Until gcc supports prologue shrink-wrapping
|
||||||
this is the best we can do. */
|
this is the best we can do. */
|
||||||
|
|||||||
@ -25,20 +25,20 @@
|
|||||||
sets the appropriate floating point exceptions. Extended checking is
|
sets the appropriate floating point exceptions. Extended checking is
|
||||||
only needed to set errno (via __kernel_standard) if the input value
|
only needed to set errno (via __kernel_standard) if the input value
|
||||||
is negative.
|
is negative.
|
||||||
|
|
||||||
The fsqrts will set FPCC and FU (Floating Point Unordered or NaN
|
The fsqrts will set FPCC and FU (Floating Point Unordered or NaN
|
||||||
to indicated that the input value was negative or NaN. Use Move to
|
to indicated that the input value was negative or NaN. Use Move to
|
||||||
Condition Register from FPSCR to copy the FPCC field to cr1. The
|
Condition Register from FPSCR to copy the FPCC field to cr1. The
|
||||||
branch on summary overflow transfers control to w_sqrt to process
|
branch on summary overflow transfers control to w_sqrt to process
|
||||||
any error conditions. Otherwise we can return the result directly.
|
any error conditions. Otherwise we can return the result directly.
|
||||||
|
|
||||||
This part of the function is a leaf routine, so no need to stack a
|
This part of the function is a leaf routine, so no need to stack a
|
||||||
frame or execute prologue/epilogue code. This means it is safe to
|
frame or execute prologue/epilogue code. This means it is safe to
|
||||||
transfer directly to w_sqrt as long as the input value (f1) is
|
transfer directly to w_sqrt as long as the input value (f1) is
|
||||||
preserved. Putting the sqrt result into f2 (float parameter 2)
|
preserved. Putting the sqrt result into f2 (float parameter 2)
|
||||||
allows passing both the input value and sqrt result into the extended
|
allows passing both the input value and sqrt result into the extended
|
||||||
wrapper so there is no need to recompute.
|
wrapper so there is no need to recompute.
|
||||||
|
|
||||||
This tactic avoids the overhead of stacking a frame for the normal
|
This tactic avoids the overhead of stacking a frame for the normal
|
||||||
(non-error) case. Until gcc supports prologue shrink-wrapping
|
(non-error) case. Until gcc supports prologue shrink-wrapping
|
||||||
this is the best we can do. */
|
this is the best we can do. */
|
||||||
|
|||||||
@ -1,4 +1,4 @@
|
|||||||
/* Support for high precision, low overhead timing functions.
|
/* Support for high precision, low overhead timing functions.
|
||||||
powerpc64 version.
|
powerpc64 version.
|
||||||
Copyright (C) 2005-2013 Free Software Foundation, Inc.
|
Copyright (C) 2005-2013 Free Software Foundation, Inc.
|
||||||
This file is part of the GNU C Library.
|
This file is part of the GNU C Library.
|
||||||
|
|||||||
@ -53,17 +53,17 @@ EALIGN (memcmp, 4, 0)
|
|||||||
blt cr1, L(bytealigned)
|
blt cr1, L(bytealigned)
|
||||||
stwu 1,-64(1)
|
stwu 1,-64(1)
|
||||||
cfi_adjust_cfa_offset(64)
|
cfi_adjust_cfa_offset(64)
|
||||||
stw r31,48(1)
|
stw r31,48(1)
|
||||||
cfi_offset(31,(48-64))
|
cfi_offset(31,(48-64))
|
||||||
stw r30,44(1)
|
stw r30,44(1)
|
||||||
cfi_offset(30,(44-64))
|
cfi_offset(30,(44-64))
|
||||||
bne L(unaligned)
|
bne L(unaligned)
|
||||||
/* At this point we know both strings have the same alignment and the
|
/* At this point we know both strings have the same alignment and the
|
||||||
compare length is at least 8 bytes. rBITDIF contains the low order
|
compare length is at least 8 bytes. rBITDIF contains the low order
|
||||||
2 bits of rSTR1 and cr5 contains the result of the logical compare
|
2 bits of rSTR1 and cr5 contains the result of the logical compare
|
||||||
of rBITDIF to 0. If rBITDIF == 0 then we are already word
|
of rBITDIF to 0. If rBITDIF == 0 then we are already word
|
||||||
aligned and can perform the word aligned loop.
|
aligned and can perform the word aligned loop.
|
||||||
|
|
||||||
Otherwise we know the two strings have the same alignment (but not
|
Otherwise we know the two strings have the same alignment (but not
|
||||||
yet word aligned). So we force the string addresses to the next lower
|
yet word aligned). So we force the string addresses to the next lower
|
||||||
word boundary and special case this first word using shift left to
|
word boundary and special case this first word using shift left to
|
||||||
@ -143,7 +143,7 @@ L(Waligned):
|
|||||||
beq L(dP4)
|
beq L(dP4)
|
||||||
bgt cr1, L(dP3)
|
bgt cr1, L(dP3)
|
||||||
beq cr1, L(dP2)
|
beq cr1, L(dP2)
|
||||||
|
|
||||||
/* Remainder is 4 */
|
/* Remainder is 4 */
|
||||||
.align 4
|
.align 4
|
||||||
L(dP1):
|
L(dP1):
|
||||||
@ -152,7 +152,7 @@ L(dP1):
|
|||||||
(8-15 byte compare), we want to use only volatile registers. This
|
(8-15 byte compare), we want to use only volatile registers. This
|
||||||
means we can avoid restoring non-volatile registers since we did not
|
means we can avoid restoring non-volatile registers since we did not
|
||||||
change any on the early exit path. The key here is the non-early
|
change any on the early exit path. The key here is the non-early
|
||||||
exit path only cares about the condition code (cr5), not about which
|
exit path only cares about the condition code (cr5), not about which
|
||||||
register pair was used. */
|
register pair was used. */
|
||||||
lwz rWORD5, 0(rSTR1)
|
lwz rWORD5, 0(rSTR1)
|
||||||
lwz rWORD6, 0(rSTR2)
|
lwz rWORD6, 0(rSTR2)
|
||||||
@ -170,7 +170,7 @@ L(dP1e):
|
|||||||
cmplw cr6, rWORD5, rWORD6
|
cmplw cr6, rWORD5, rWORD6
|
||||||
bne cr5, L(dLcr5)
|
bne cr5, L(dLcr5)
|
||||||
bne cr0, L(dLcr0)
|
bne cr0, L(dLcr0)
|
||||||
|
|
||||||
lwzu rWORD7, 16(rSTR1)
|
lwzu rWORD7, 16(rSTR1)
|
||||||
lwzu rWORD8, 16(rSTR2)
|
lwzu rWORD8, 16(rSTR2)
|
||||||
bne cr1, L(dLcr1)
|
bne cr1, L(dLcr1)
|
||||||
@ -188,7 +188,7 @@ L(dP1x):
|
|||||||
bne L(d00)
|
bne L(d00)
|
||||||
li rRTN, 0
|
li rRTN, 0
|
||||||
blr
|
blr
|
||||||
|
|
||||||
/* Remainder is 8 */
|
/* Remainder is 8 */
|
||||||
.align 4
|
.align 4
|
||||||
L(dP2):
|
L(dP2):
|
||||||
@ -230,7 +230,7 @@ L(dP2x):
|
|||||||
bne L(d00)
|
bne L(d00)
|
||||||
li rRTN, 0
|
li rRTN, 0
|
||||||
blr
|
blr
|
||||||
|
|
||||||
/* Remainder is 12 */
|
/* Remainder is 12 */
|
||||||
.align 4
|
.align 4
|
||||||
L(dP3):
|
L(dP3):
|
||||||
@ -273,7 +273,7 @@ L(dP3x):
|
|||||||
bne L(d00)
|
bne L(d00)
|
||||||
li rRTN, 0
|
li rRTN, 0
|
||||||
blr
|
blr
|
||||||
|
|
||||||
/* Count is a multiple of 16, remainder is 0 */
|
/* Count is a multiple of 16, remainder is 0 */
|
||||||
.align 4
|
.align 4
|
||||||
L(dP4):
|
L(dP4):
|
||||||
@ -316,8 +316,8 @@ L(dLoop3):
|
|||||||
lwzu rWORD8, 16(rSTR2)
|
lwzu rWORD8, 16(rSTR2)
|
||||||
bne- cr1, L(dLcr1)
|
bne- cr1, L(dLcr1)
|
||||||
cmplw cr0, rWORD1, rWORD2
|
cmplw cr0, rWORD1, rWORD2
|
||||||
bdnz+ L(dLoop)
|
bdnz+ L(dLoop)
|
||||||
|
|
||||||
L(dL4):
|
L(dL4):
|
||||||
cmplw cr1, rWORD3, rWORD4
|
cmplw cr1, rWORD3, rWORD4
|
||||||
bne cr6, L(dLcr6)
|
bne cr6, L(dLcr6)
|
||||||
@ -332,7 +332,7 @@ L(d24):
|
|||||||
bne cr6, L(dLcr6)
|
bne cr6, L(dLcr6)
|
||||||
L(d14):
|
L(d14):
|
||||||
slwi. r12, rN, 3
|
slwi. r12, rN, 3
|
||||||
bne cr5, L(dLcr5)
|
bne cr5, L(dLcr5)
|
||||||
L(d04):
|
L(d04):
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
@ -341,10 +341,10 @@ L(d04):
|
|||||||
beq L(zeroLength)
|
beq L(zeroLength)
|
||||||
/* At this point we have a remainder of 1 to 3 bytes to compare. Since
|
/* At this point we have a remainder of 1 to 3 bytes to compare. Since
|
||||||
we are aligned it is safe to load the whole word, and use
|
we are aligned it is safe to load the whole word, and use
|
||||||
shift right to eliminate bits beyond the compare length. */
|
shift right to eliminate bits beyond the compare length. */
|
||||||
L(d00):
|
L(d00):
|
||||||
lwz rWORD1, 4(rSTR1)
|
lwz rWORD1, 4(rSTR1)
|
||||||
lwz rWORD2, 4(rSTR2)
|
lwz rWORD2, 4(rSTR2)
|
||||||
srw rWORD1, rWORD1, rN
|
srw rWORD1, rWORD1, rN
|
||||||
srw rWORD2, rWORD2, rN
|
srw rWORD2, rWORD2, rN
|
||||||
cmplw rWORD1,rWORD2
|
cmplw rWORD1,rWORD2
|
||||||
@ -392,22 +392,22 @@ L(dLcr5x):
|
|||||||
bgtlr cr5
|
bgtlr cr5
|
||||||
li rRTN, -1
|
li rRTN, -1
|
||||||
blr
|
blr
|
||||||
|
|
||||||
.align 4
|
.align 4
|
||||||
L(bytealigned):
|
L(bytealigned):
|
||||||
cfi_adjust_cfa_offset(-64)
|
cfi_adjust_cfa_offset(-64)
|
||||||
mtctr rN /* Power4 wants mtctr 1st in dispatch group */
|
mtctr rN /* Power4 wants mtctr 1st in dispatch group */
|
||||||
|
|
||||||
/* We need to prime this loop. This loop is swing modulo scheduled
|
/* We need to prime this loop. This loop is swing modulo scheduled
|
||||||
to avoid pipe delays. The dependent instruction latencies (load to
|
to avoid pipe delays. The dependent instruction latencies (load to
|
||||||
compare to conditional branch) is 2 to 3 cycles. In this loop each
|
compare to conditional branch) is 2 to 3 cycles. In this loop each
|
||||||
dispatch group ends in a branch and takes 1 cycle. Effectively
|
dispatch group ends in a branch and takes 1 cycle. Effectively
|
||||||
the first iteration of the loop only serves to load operands and
|
the first iteration of the loop only serves to load operands and
|
||||||
branches based on compares are delayed until the next loop.
|
branches based on compares are delayed until the next loop.
|
||||||
|
|
||||||
So we must precondition some registers and condition codes so that
|
So we must precondition some registers and condition codes so that
|
||||||
we don't exit the loop early on the first iteration. */
|
we don't exit the loop early on the first iteration. */
|
||||||
|
|
||||||
lbz rWORD1, 0(rSTR1)
|
lbz rWORD1, 0(rSTR1)
|
||||||
lbz rWORD2, 0(rSTR2)
|
lbz rWORD2, 0(rSTR2)
|
||||||
bdz- L(b11)
|
bdz- L(b11)
|
||||||
@ -427,7 +427,7 @@ L(bLoop):
|
|||||||
|
|
||||||
cmplw cr6, rWORD5, rWORD6
|
cmplw cr6, rWORD5, rWORD6
|
||||||
bdz- L(b3i)
|
bdz- L(b3i)
|
||||||
|
|
||||||
lbzu rWORD3, 1(rSTR1)
|
lbzu rWORD3, 1(rSTR1)
|
||||||
lbzu rWORD4, 1(rSTR2)
|
lbzu rWORD4, 1(rSTR2)
|
||||||
bne- cr1, L(bLcr1)
|
bne- cr1, L(bLcr1)
|
||||||
@ -441,10 +441,10 @@ L(bLoop):
|
|||||||
|
|
||||||
cmplw cr1, rWORD3, rWORD4
|
cmplw cr1, rWORD3, rWORD4
|
||||||
bdnz+ L(bLoop)
|
bdnz+ L(bLoop)
|
||||||
|
|
||||||
/* We speculatively loading bytes before we have tested the previous
|
/* We speculatively loading bytes before we have tested the previous
|
||||||
bytes. But we must avoid overrunning the length (in the ctr) to
|
bytes. But we must avoid overrunning the length (in the ctr) to
|
||||||
prevent these speculative loads from causing a segfault. In this
|
prevent these speculative loads from causing a segfault. In this
|
||||||
case the loop will exit early (before the all pending bytes are
|
case the loop will exit early (before the all pending bytes are
|
||||||
tested. In this case we must complete the pending operations
|
tested. In this case we must complete the pending operations
|
||||||
before returning. */
|
before returning. */
|
||||||
@ -488,7 +488,7 @@ L(bx56):
|
|||||||
nop
|
nop
|
||||||
L(b12):
|
L(b12):
|
||||||
bne- cr0, L(bx12)
|
bne- cr0, L(bx12)
|
||||||
L(bx34):
|
L(bx34):
|
||||||
sub rRTN, rWORD3, rWORD4
|
sub rRTN, rWORD3, rWORD4
|
||||||
blr
|
blr
|
||||||
|
|
||||||
@ -497,7 +497,7 @@ L(bx12):
|
|||||||
sub rRTN, rWORD1, rWORD2
|
sub rRTN, rWORD1, rWORD2
|
||||||
blr
|
blr
|
||||||
|
|
||||||
.align 4
|
.align 4
|
||||||
L(zeroLengthReturn):
|
L(zeroLengthReturn):
|
||||||
|
|
||||||
L(zeroLength):
|
L(zeroLength):
|
||||||
@ -509,9 +509,9 @@ L(zeroLength):
|
|||||||
/* At this point we know the strings have different alignment and the
|
/* At this point we know the strings have different alignment and the
|
||||||
compare length is at least 8 bytes. rBITDIF contains the low order
|
compare length is at least 8 bytes. rBITDIF contains the low order
|
||||||
2 bits of rSTR1 and cr5 contains the result of the logical compare
|
2 bits of rSTR1 and cr5 contains the result of the logical compare
|
||||||
of rBITDIF to 0. If rBITDIF == 0 then rStr1 is word aligned and can
|
of rBITDIF to 0. If rBITDIF == 0 then rStr1 is word aligned and can
|
||||||
perform the Wunaligned loop.
|
perform the Wunaligned loop.
|
||||||
|
|
||||||
Otherwise we know that rSTR1 is not aready word aligned yet.
|
Otherwise we know that rSTR1 is not aready word aligned yet.
|
||||||
So we can force the string addresses to the next lower word
|
So we can force the string addresses to the next lower word
|
||||||
boundary and special case this first word using shift left to
|
boundary and special case this first word using shift left to
|
||||||
@ -531,13 +531,13 @@ L(zeroLength):
|
|||||||
#define rE r0 /* Right rotation temp for rWORD6. */
|
#define rE r0 /* Right rotation temp for rWORD6. */
|
||||||
#define rG r12 /* Right rotation temp for rWORD8. */
|
#define rG r12 /* Right rotation temp for rWORD8. */
|
||||||
L(unaligned):
|
L(unaligned):
|
||||||
stw r29,40(r1)
|
stw r29,40(r1)
|
||||||
cfi_offset(r29,(40-64))
|
cfi_offset(r29,(40-64))
|
||||||
clrlwi rSHL, rSTR2, 30
|
clrlwi rSHL, rSTR2, 30
|
||||||
stw r28,36(r1)
|
stw r28,36(r1)
|
||||||
cfi_offset(r28,(36-64))
|
cfi_offset(r28,(36-64))
|
||||||
beq cr5, L(Wunaligned)
|
beq cr5, L(Wunaligned)
|
||||||
stw r27,32(r1)
|
stw r27,32(r1)
|
||||||
cfi_offset(r27,(32-64))
|
cfi_offset(r27,(32-64))
|
||||||
/* Adjust the logical start of rSTR2 to compensate for the extra bits
|
/* Adjust the logical start of rSTR2 to compensate for the extra bits
|
||||||
in the 1st rSTR1 W. */
|
in the 1st rSTR1 W. */
|
||||||
@ -545,19 +545,19 @@ L(unaligned):
|
|||||||
/* But do not attempt to address the W before that W that contains
|
/* But do not attempt to address the W before that W that contains
|
||||||
the actual start of rSTR2. */
|
the actual start of rSTR2. */
|
||||||
clrrwi rSTR2, rSTR2, 2
|
clrrwi rSTR2, rSTR2, 2
|
||||||
stw r26,28(r1)
|
stw r26,28(r1)
|
||||||
cfi_offset(r26,(28-64))
|
cfi_offset(r26,(28-64))
|
||||||
/* Compute the left/right shift counts for the unalign rSTR2,
|
/* Compute the left/right shift counts for the unalign rSTR2,
|
||||||
compensating for the logical (W aligned) start of rSTR1. */
|
compensating for the logical (W aligned) start of rSTR1. */
|
||||||
clrlwi rSHL, r27, 30
|
clrlwi rSHL, r27, 30
|
||||||
clrrwi rSTR1, rSTR1, 2
|
clrrwi rSTR1, rSTR1, 2
|
||||||
stw r25,24(r1)
|
stw r25,24(r1)
|
||||||
cfi_offset(r25,(24-64))
|
cfi_offset(r25,(24-64))
|
||||||
slwi rSHL, rSHL, 3
|
slwi rSHL, rSHL, 3
|
||||||
cmplw cr5, r27, rSTR2
|
cmplw cr5, r27, rSTR2
|
||||||
add rN, rN, rBITDIF
|
add rN, rN, rBITDIF
|
||||||
slwi r11, rBITDIF, 3
|
slwi r11, rBITDIF, 3
|
||||||
stw r24,20(r1)
|
stw r24,20(r1)
|
||||||
cfi_offset(r24,(20-64))
|
cfi_offset(r24,(20-64))
|
||||||
subfic rSHR, rSHL, 32
|
subfic rSHR, rSHL, 32
|
||||||
srwi rTMP, rN, 4 /* Divide by 16 */
|
srwi rTMP, rN, 4 /* Divide by 16 */
|
||||||
@ -633,16 +633,16 @@ L(duPs4):
|
|||||||
compare length is at least 8 bytes. */
|
compare length is at least 8 bytes. */
|
||||||
.align 4
|
.align 4
|
||||||
L(Wunaligned):
|
L(Wunaligned):
|
||||||
stw r27,32(r1)
|
stw r27,32(r1)
|
||||||
cfi_offset(r27,(32-64))
|
cfi_offset(r27,(32-64))
|
||||||
clrrwi rSTR2, rSTR2, 2
|
clrrwi rSTR2, rSTR2, 2
|
||||||
stw r26,28(r1)
|
stw r26,28(r1)
|
||||||
cfi_offset(r26,(28-64))
|
cfi_offset(r26,(28-64))
|
||||||
srwi rTMP, rN, 4 /* Divide by 16 */
|
srwi rTMP, rN, 4 /* Divide by 16 */
|
||||||
stw r25,24(r1)
|
stw r25,24(r1)
|
||||||
cfi_offset(r25,(24-64))
|
cfi_offset(r25,(24-64))
|
||||||
andi. rBITDIF, rN, 12 /* Get the W remainder */
|
andi. rBITDIF, rN, 12 /* Get the W remainder */
|
||||||
stw r24,20(r1)
|
stw r24,20(r1)
|
||||||
cfi_offset(r24,(20-64))
|
cfi_offset(r24,(20-64))
|
||||||
slwi rSHL, rSHL, 3
|
slwi rSHL, rSHL, 3
|
||||||
lwz rWORD6, 0(rSTR2)
|
lwz rWORD6, 0(rSTR2)
|
||||||
@ -656,7 +656,7 @@ L(Wunaligned):
|
|||||||
mtctr rTMP /* Power4 wants mtctr 1st in dispatch group */
|
mtctr rTMP /* Power4 wants mtctr 1st in dispatch group */
|
||||||
bgt cr1, L(duP3)
|
bgt cr1, L(duP3)
|
||||||
beq cr1, L(duP2)
|
beq cr1, L(duP2)
|
||||||
|
|
||||||
/* Remainder is 4 */
|
/* Remainder is 4 */
|
||||||
.align 4
|
.align 4
|
||||||
L(duP1):
|
L(duP1):
|
||||||
@ -687,7 +687,7 @@ L(duP1e):
|
|||||||
bne cr0, L(duLcr0)
|
bne cr0, L(duLcr0)
|
||||||
or rWORD6, rE, rF
|
or rWORD6, rE, rF
|
||||||
cmplw cr6, rWORD5, rWORD6
|
cmplw cr6, rWORD5, rWORD6
|
||||||
b L(duLoop3)
|
b L(duLoop3)
|
||||||
.align 4
|
.align 4
|
||||||
/* At this point we exit early with the first word compare
|
/* At this point we exit early with the first word compare
|
||||||
complete and remainder of 0 to 3 bytes. See L(du14) for details on
|
complete and remainder of 0 to 3 bytes. See L(du14) for details on
|
||||||
@ -751,7 +751,7 @@ L(duP2x):
|
|||||||
lwz rWORD2, 4(rSTR2)
|
lwz rWORD2, 4(rSTR2)
|
||||||
srw rA, rWORD2, rSHR
|
srw rA, rWORD2, rSHR
|
||||||
b L(dutrim)
|
b L(dutrim)
|
||||||
|
|
||||||
/* Remainder is 12 */
|
/* Remainder is 12 */
|
||||||
.align 4
|
.align 4
|
||||||
L(duP3):
|
L(duP3):
|
||||||
@ -801,7 +801,7 @@ L(duP3x):
|
|||||||
lwz rWORD2, 4(rSTR2)
|
lwz rWORD2, 4(rSTR2)
|
||||||
srw rA, rWORD2, rSHR
|
srw rA, rWORD2, rSHR
|
||||||
b L(dutrim)
|
b L(dutrim)
|
||||||
|
|
||||||
/* Count is a multiple of 16, remainder is 0 */
|
/* Count is a multiple of 16, remainder is 0 */
|
||||||
.align 4
|
.align 4
|
||||||
L(duP4):
|
L(duP4):
|
||||||
@ -867,8 +867,8 @@ L(duLoop3):
|
|||||||
srw rG, rWORD8, rSHR
|
srw rG, rWORD8, rSHR
|
||||||
slw rB, rWORD8, rSHL
|
slw rB, rWORD8, rSHL
|
||||||
or rWORD8, rG, rH
|
or rWORD8, rG, rH
|
||||||
bdnz+ L(duLoop)
|
bdnz+ L(duLoop)
|
||||||
|
|
||||||
L(duL4):
|
L(duL4):
|
||||||
bne cr1, L(duLcr1)
|
bne cr1, L(duLcr1)
|
||||||
cmplw cr1, rWORD3, rWORD4
|
cmplw cr1, rWORD3, rWORD4
|
||||||
@ -886,9 +886,9 @@ L(du14):
|
|||||||
slwi. rN, rN, 3
|
slwi. rN, rN, 3
|
||||||
bne cr5, L(duLcr5)
|
bne cr5, L(duLcr5)
|
||||||
/* At this point we have a remainder of 1 to 3 bytes to compare. We use
|
/* At this point we have a remainder of 1 to 3 bytes to compare. We use
|
||||||
shift right to eliminate bits beyond the compare length.
|
shift right to eliminate bits beyond the compare length.
|
||||||
|
|
||||||
However it may not be safe to load rWORD2 which may be beyond the
|
However it may not be safe to load rWORD2 which may be beyond the
|
||||||
string length. So we compare the bit length of the remainder to
|
string length. So we compare the bit length of the remainder to
|
||||||
the right shift count (rSHR). If the bit count is less than or equal
|
the right shift count (rSHR). If the bit count is less than or equal
|
||||||
we do not need to load rWORD2 (all significant bits are already in
|
we do not need to load rWORD2 (all significant bits are already in
|
||||||
@ -903,13 +903,13 @@ L(du14):
|
|||||||
L(dutrim):
|
L(dutrim):
|
||||||
lwz rWORD1, 4(rSTR1)
|
lwz rWORD1, 4(rSTR1)
|
||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
subfic rN, rN, 32 /* Shift count is 32 - (rN * 8). */
|
subfic rN, rN, 32 /* Shift count is 32 - (rN * 8). */
|
||||||
or rWORD2, rA, rB
|
or rWORD2, rA, rB
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
srw rWORD1, rWORD1, rN
|
srw rWORD1, rWORD1, rN
|
||||||
srw rWORD2, rWORD2, rN
|
srw rWORD2, rWORD2, rN
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
lwz r27,32(r1)
|
lwz r27,32(r1)
|
||||||
cmplw rWORD1,rWORD2
|
cmplw rWORD1,rWORD2
|
||||||
li rRTN,0
|
li rRTN,0
|
||||||
@ -923,9 +923,9 @@ L(duLcr0):
|
|||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
li rRTN, 1
|
li rRTN, 1
|
||||||
bgt cr0, L(dureturn29)
|
bgt cr0, L(dureturn29)
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
li rRTN, -1
|
li rRTN, -1
|
||||||
b L(dureturn27)
|
b L(dureturn27)
|
||||||
.align 4
|
.align 4
|
||||||
@ -933,9 +933,9 @@ L(duLcr1):
|
|||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
li rRTN, 1
|
li rRTN, 1
|
||||||
bgt cr1, L(dureturn29)
|
bgt cr1, L(dureturn29)
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
li rRTN, -1
|
li rRTN, -1
|
||||||
b L(dureturn27)
|
b L(dureturn27)
|
||||||
.align 4
|
.align 4
|
||||||
@ -943,9 +943,9 @@ L(duLcr6):
|
|||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
li rRTN, 1
|
li rRTN, 1
|
||||||
bgt cr6, L(dureturn29)
|
bgt cr6, L(dureturn29)
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
li rRTN, -1
|
li rRTN, -1
|
||||||
b L(dureturn27)
|
b L(dureturn27)
|
||||||
.align 4
|
.align 4
|
||||||
@ -953,9 +953,9 @@ L(duLcr5):
|
|||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
li rRTN, 1
|
li rRTN, 1
|
||||||
bgt cr5, L(dureturn29)
|
bgt cr5, L(dureturn29)
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
li rRTN, -1
|
li rRTN, -1
|
||||||
b L(dureturn27)
|
b L(dureturn27)
|
||||||
.align 3
|
.align 3
|
||||||
@ -965,14 +965,14 @@ L(duZeroReturn):
|
|||||||
L(dureturn):
|
L(dureturn):
|
||||||
lwz r31,48(1)
|
lwz r31,48(1)
|
||||||
lwz r30,44(1)
|
lwz r30,44(1)
|
||||||
L(dureturn29):
|
L(dureturn29):
|
||||||
lwz r29,40(r1)
|
lwz r29,40(r1)
|
||||||
lwz r28,36(r1)
|
lwz r28,36(r1)
|
||||||
L(dureturn27):
|
L(dureturn27):
|
||||||
lwz r27,32(r1)
|
lwz r27,32(r1)
|
||||||
L(dureturn26):
|
L(dureturn26):
|
||||||
lwz r26,28(r1)
|
lwz r26,28(r1)
|
||||||
L(dureturn25):
|
L(dureturn25):
|
||||||
lwz r25,24(r1)
|
lwz r25,24(r1)
|
||||||
lwz r24,20(r1)
|
lwz r24,20(r1)
|
||||||
lwz 1,0(1)
|
lwz 1,0(1)
|
||||||
|
|||||||
@ -162,7 +162,7 @@ L(cacheAligned):
|
|||||||
add rMEMP,rMEMP,rCLS
|
add rMEMP,rMEMP,rCLS
|
||||||
b L(cacheAligned)
|
b L(cacheAligned)
|
||||||
|
|
||||||
/* We are here because the cache line size was set and the remainder
|
/* We are here because the cache line size was set and the remainder
|
||||||
(rLEN) is less than the actual cache line size.
|
(rLEN) is less than the actual cache line size.
|
||||||
So set up the preconditions for L(nondcbz) and go there. */
|
So set up the preconditions for L(nondcbz) and go there. */
|
||||||
L(handletail32):
|
L(handletail32):
|
||||||
|
|||||||
@ -37,7 +37,7 @@ _wordcopy_fwd_aligned (dstp, srcp, len)
|
|||||||
if (len & 1)
|
if (len & 1)
|
||||||
{
|
{
|
||||||
((op_t *) dstp)[0] = ((op_t *) srcp)[0];
|
((op_t *) dstp)[0] = ((op_t *) srcp)[0];
|
||||||
|
|
||||||
if (len == 1)
|
if (len == 1)
|
||||||
return;
|
return;
|
||||||
srcp += OPSIZ;
|
srcp += OPSIZ;
|
||||||
@ -88,10 +88,10 @@ _wordcopy_fwd_dest_aligned (dstp, srcp, len)
|
|||||||
{
|
{
|
||||||
a1 = ((op_t *) srcp)[1];
|
a1 = ((op_t *) srcp)[1];
|
||||||
((op_t *) dstp)[0] = MERGE (a0, sh_1, a1, sh_2);
|
((op_t *) dstp)[0] = MERGE (a0, sh_1, a1, sh_2);
|
||||||
|
|
||||||
if (len == 1)
|
if (len == 1)
|
||||||
return;
|
return;
|
||||||
|
|
||||||
a0 = a1;
|
a0 = a1;
|
||||||
srcp += OPSIZ;
|
srcp += OPSIZ;
|
||||||
dstp += OPSIZ;
|
dstp += OPSIZ;
|
||||||
@ -131,7 +131,7 @@ _wordcopy_bwd_aligned (dstp, srcp, len)
|
|||||||
srcp -= OPSIZ;
|
srcp -= OPSIZ;
|
||||||
dstp -= OPSIZ;
|
dstp -= OPSIZ;
|
||||||
((op_t *) dstp)[0] = ((op_t *) srcp)[0];
|
((op_t *) dstp)[0] = ((op_t *) srcp)[0];
|
||||||
|
|
||||||
if (len == 1)
|
if (len == 1)
|
||||||
return;
|
return;
|
||||||
len -= 1;
|
len -= 1;
|
||||||
|
|||||||
@ -18,13 +18,13 @@
|
|||||||
|
|
||||||
#include <sysdep.h>
|
#include <sysdep.h>
|
||||||
#include <math_ldbl_opt.h>
|
#include <math_ldbl_opt.h>
|
||||||
|
|
||||||
/* long [r3] llround (float x [fp1])
|
/* long [r3] llround (float x [fp1])
|
||||||
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"round to Nearest" as "Choose the best approximation. In case of a
|
"round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we pre-round using the V2.02 Floating Round to Integer Nearest
|
So we pre-round using the V2.02 Floating Round to Integer Nearest
|
||||||
instruction before we use the Floating Convert to Integer Word with
|
instruction before we use the Floating Convert to Integer Word with
|
||||||
round to zero instruction. */
|
round to zero instruction. */
|
||||||
|
|||||||
@ -17,13 +17,13 @@
|
|||||||
<http://www.gnu.org/licenses/>. */
|
<http://www.gnu.org/licenses/>. */
|
||||||
#include <sysdep.h>
|
#include <sysdep.h>
|
||||||
#include <math_ldbl_opt.h>
|
#include <math_ldbl_opt.h>
|
||||||
|
|
||||||
/* long [r3] lround (float x [fp1])
|
/* long [r3] lround (float x [fp1])
|
||||||
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
IEEE 1003.1 lround function. IEEE specifies "round to the nearest
|
||||||
integer value, rounding halfway cases away from zero, regardless of
|
integer value, rounding halfway cases away from zero, regardless of
|
||||||
the current rounding mode." However PowerPC Architecture defines
|
the current rounding mode." However PowerPC Architecture defines
|
||||||
"round to Nearest" as "Choose the best approximation. In case of a
|
"round to Nearest" as "Choose the best approximation. In case of a
|
||||||
tie, choose the one that is even (least significant bit o).".
|
tie, choose the one that is even (least significant bit o).".
|
||||||
So we pre-round using the V2.02 Floating Round to Integer Nearest
|
So we pre-round using the V2.02 Floating Round to Integer Nearest
|
||||||
instruction before we use the Floating Convert to Integer Word with
|
instruction before we use the Floating Convert to Integer Word with
|
||||||
round to zero instruction. */
|
round to zero instruction. */
|
||||||
|
|||||||
@ -25,19 +25,19 @@
|
|||||||
sets the appropriate floating point exceptions. Extended checking is
|
sets the appropriate floating point exceptions. Extended checking is
|
||||||
only needed to set errno (via __kernel_standard) if the input value
|
only needed to set errno (via __kernel_standard) if the input value
|
||||||
is negative.
|
is negative.
|
||||||
|
|
||||||
So compare the input value against the absolute value of itself.
|
So compare the input value against the absolute value of itself.
|
||||||
This will compare equal unless the value is negative (EDOM) or a NAN,
|
This will compare equal unless the value is negative (EDOM) or a NAN,
|
||||||
in which case we branch to the extend wrapper. If equal we can return
|
in which case we branch to the extend wrapper. If equal we can return
|
||||||
the result directly.
|
the result directly.
|
||||||
|
|
||||||
This part of the function looks like a leaf routine, so no need to
|
This part of the function looks like a leaf routine, so no need to
|
||||||
stack a frame or execute prologue/epilogue code. It is safe to
|
stack a frame or execute prologue/epilogue code. It is safe to
|
||||||
branch directly to w_sqrt as long as the input value (f1) is
|
branch directly to w_sqrt as long as the input value (f1) is
|
||||||
preserved. Putting the sqrt result into f2 (float parameter 2)
|
preserved. Putting the sqrt result into f2 (float parameter 2)
|
||||||
allows passing both the input value and sqrt result into the extended
|
allows passing both the input value and sqrt result into the extended
|
||||||
wrapper so there is no need to recompute.
|
wrapper so there is no need to recompute.
|
||||||
|
|
||||||
This tactic avoids the overhead of stacking a frame for the normal
|
This tactic avoids the overhead of stacking a frame for the normal
|
||||||
(non-error) case. Until gcc supports prologue shrink-wrapping
|
(non-error) case. Until gcc supports prologue shrink-wrapping
|
||||||
this is the best we can do. */
|
this is the best we can do. */
|
||||||
|
|||||||
@ -25,19 +25,19 @@
|
|||||||
sets the appropriate floating point exceptions. Extended checking is
|
sets the appropriate floating point exceptions. Extended checking is
|
||||||
only needed to set errno (via __kernel_standard) if the input value
|
only needed to set errno (via __kernel_standard) if the input value
|
||||||
is negative.
|
is negative.
|
||||||
|
|
||||||
So compare the input value against the absolute value of itself.
|
So compare the input value against the absolute value of itself.
|
||||||
This will compare equal unless the value is negative (EDOM) or a NAN,
|
This will compare equal unless the value is negative (EDOM) or a NAN,
|
||||||
in which case we branch to the extend wrapper. If equal we can return
|
in which case we branch to the extend wrapper. If equal we can return
|
||||||
the result directly.
|
the result directly.
|
||||||
|
|
||||||
This part of the function looks like a leaf routine, so no need to
|
This part of the function looks like a leaf routine, so no need to
|
||||||
stack a frame or execute prologue/epilogue code. It is safe to
|
stack a frame or execute prologue/epilogue code. It is safe to
|
||||||
branch directly to w_sqrt as long as the input value (f1) is
|
branch directly to w_sqrt as long as the input value (f1) is
|
||||||
preserved. Putting the sqrt result into f2 (float parameter 2)
|
preserved. Putting the sqrt result into f2 (float parameter 2)
|
||||||
allows passing both the input value and sqrt result into the extended
|
allows passing both the input value and sqrt result into the extended
|
||||||
wrapper so there is no need to recompute.
|
wrapper so there is no need to recompute.
|
||||||
|
|
||||||
This tactic avoids the overhead of stacking a frame for the normal
|
This tactic avoids the overhead of stacking a frame for the normal
|
||||||
(non-error) case. Until gcc supports prologue shrink-wrapping
|
(non-error) case. Until gcc supports prologue shrink-wrapping
|
||||||
this is the best we can do. */
|
this is the best we can do. */
|
||||||
|
|||||||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue
Block a user