From 0e3426bbcf2ff61d06d580fc9362fde79953a281 Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Wed, 8 May 1996 02:07:47 +0000 Subject: Tue May 7 19:00:01 1996 Roland McGrath * string/argz-extract.c: Remove const from decl. * string/argz.h: Here too. * Makeconfig (version.mk): Fix regexp in sed cmd. Depend on $(..)Makeconfig. * GMP code updated from gmp-2.0 release. * stdlib/Makefile (mpn-routines): Removed add_1, added inlines. * sysdeps/generic/add_1.c: File removed. * stdlib/strtod.c: mp_limb is now mp_limb_t. * stdlib/fpioconst.c, stdlib/fpioconst.h: Likewise. * stdio-common/_itoa.c: Likewise. * stdio-common/printf_fp.c: Likewise. Don't include ansidecl.h. * sysdeps/mach/hurd/getcwd.c: Use io_identity instead of io_stat. * shlib-versions: New file. * Makerules (soversions.mk): New target, include file generated from shlib-versions. Moved shared library rules before installation rules. Rewrote shared library installation rules for versioned libraries. * math/Makefile (libm.so-version): Variable removed. * sysdeps/mach/hurd/i386/exc2signal.c: Use struct hurd_signal_detail. * hurd/report-wait.c (_S_msg_describe_ports): New function. * configure.in: Add AC_PROG_LN_S check. * config.make.in (LN_S): New variable. Sun May 5 03:10:44 1996 Ulrich Drepper * misc/efgcvt_r.c (ecvt_r): Work aroung gcc bug. gcc does not know about weak aliases now and optimizes necessary `if' statement away. * posix/unistd.h: Add swapoff prototype. * sysdeps/generic/confname.h: Add even more POSIX.4 symbols. * sysdeps/posix/fpathconf.c (__fpathconf): Get information for _PC_PATH_MAX from fstatfs function if available. * sysdeps/posix/sysconf.c: Add code to handle _SC_AIO_LISTIO_MAX, _SC_AIO_MAX, _SC_AIO_PRIO_DELTA_MAX, _SC_DELAYTIMER_MAX, _SC_MQ_OPEN_MAX, _SC_MQ_PRIO_MAX, _SC_RTSIG_MAX, _SC_SEM_NSEMS_MAX, _SC_SEM_VALUE_MAX, _SC_SIGQUEUE_MAX, and _SC_TIMER_MAX. * sysdeps/unix/sysv/sysv4/sysconf.c: Ditto. * sysdeps/stub/swapoff.c: New file. Stub version for swapoff function. * sysdeps/unix/syscalls.list: Add swapoff. * sysdeps/unix/sysv/linux/Dist: Add sys/acct.h. * sysdeps/unix/sysv/linux/Makefile [$(subdir) == misc] (sysdep_routines): Add mount, umount, llseek, setfsgid, setfsuid, sysinfo, and uselib. (headers): Add sys/sysinfo.h. * sysdeps/unix/sysv/linux/gethostid.c: Prevent warning. * sysdeps/unix/sysv/linux/i386/Makefile [$(subdir) == misc] (sysdep_routines): Add ioperm, iopl, and vm86. (headers): Add sys/perm.h and sys/vm86.h. * sysdeps/unix/sysv/linux/i386/sys/perm.h: New file. Contains prototypes for iopl and ioperm. * sysdeps/unix/sysv/linux/i386/sys/vm86.h: New file. Contains prototype for vm86. * sysdeps/unix/sysv/linux/i386/syscalls.list: New file. Add vm86 system call. * sysdeps/unix/sysv/linux/sys/acct.h: New file. Contains prototypes for acct function. * sysdeps/unix/sysv/linux/sys/socket.h: Provide real header file with prototypes. * sysdeps/unix/sysv/linux/sys/sysinfo.h: New file. Contains prototype for sysinfo function. * sysdeps/unix/sysv/linux/syscalls.list: Add flock, ioperm, iopl, llseek, setfsgid, setfsuid, sysinfo, and uselib. * sysdeps/unix/sysv/linux/sysconf.c: Instead of duplicating posix/sysconf.c now only handle cases different to that implementation. Tue May 7 15:08:19 1996 Miles Bader * stdio/linewrap.c (__line_wrap_output): Renamed from lwoutput (all references changed). Now exported. * stdio/linewrap.c (struct data): Type deleted (moved to linewrap.h). (wrap_stream, unwrap_stream, lwclose, lwfileno, lwoutput, line_wrap_stream, line_unwrap_stream): Use struct line_wrap_data instead of struct data. (lwoutput, line_wrap_stream, line_unwrap_stream): Rename various occurences of `wrap' and `wrapmargin' to `wmargin'. (line_wrapped, line_wrap_lmargin, line_wrap_set_lmargin, line_wrap_rmargin, line_wrap_set_rmargin, line_wrap_wmargin, line_wrap_set_wmargin, line_wrap_point): New functions. * stdio/linewrap.h: New file. * stdio/Makefile (headers): Add linewrap.h. Tue May 7 14:19:12 1996 Roland McGrath * sysdeps/unix/sysv/linux/i386/Makefile: File removed. * stdio/stdio.h: Remove line_wrap_stream, line_unwap_stream decls. * sysdeps/unix/sysv/linux/schedbits.h: New file. Tue May 7 13:47:02 1996 Miles Bader * stdio/linewrap.c (struct data): Make margin fields not-pointers. (lwoutput): Adjust uses acordingly. * sysdeps/mach/hurd/fdatasync.c: New file. * sysdeps/mach/hurd/fsync.c: Pass new flag to file_sync. * sysdeps/mach/hurd/xmknod.c: Pass new flag to dir_link. * sysdeps/mach/hurd/symlink.c: Likewise. * sysdeps/mach/hurd/link.c: Likewise. * sysdeps/mach/hurd/bind.c: Likewise. * hurd/hurdsig.c (write_corefile): Likewise. * hurd/hurdsig.c (write_corefile): Pass cttyid port to crash server. * sysdeps/mach/hurd/fpathconf.c: RPC takes int pointer, not long int. * sysdeps/mach/hurd/_exit.c (_hurd_exit): Pass sigcode arg to proc_mark_exit. * sysdeps/mach/hurd/dl-sysdep.c (_exit): Likewise. * sysdeps/mach/hurd/wait4.c: Pass sigcode arg to proc_wait. * sysdeps/mach/hurd/rename.c: Pass new flag to dir_rename. * hurd/hurdfault.c (_hurdsig_fault_catch_exception_raise): Use struct hurd_signal_detail. * hurd/catch-exc.c (_S_catch_exception_raise): Likewise. * hurd/hurd-raise.c (_hurd_raise_signal): Likewise. * sysdeps/mach/hurd/i386/trampoline.c (_hurd_setup_sighandler): Likewise. * sysdeps/mach/hurd/setitimer.c (restart_itimer): Likewise. * hurd/hurd/signal.h: Fix _hurd_exception2signal prototype. * hurd/hurdsig.c (write_corefile): Take const struct hurd_signal_detail * arg. Pass all details to crash_dump_task. (_hurd_internal_post_signal): Pass DETAIL to write_corefile. (_hurd_internal_post_signal: suspend): Pass code and error to proc_mark_stop. * hurd/hurdprio.c (_hurd_priority_which_map): Pass flags arg to proc_getprocinfo by reference. --- stdio-common/_itoa.c | 72 ++++++++++++++++++++++++------------------------ stdio-common/printf_fp.c | 31 ++++++++++----------- 2 files changed, 51 insertions(+), 52 deletions(-) (limited to 'stdio-common') diff --git a/stdio-common/_itoa.c b/stdio-common/_itoa.c index 38d5367ba2..f85b15b030 100644 --- a/stdio-common/_itoa.c +++ b/stdio-common/_itoa.c @@ -49,7 +49,7 @@ Cambridge, MA 02139, USA. */ struct base_table_t { #if (UDIV_TIME > 2 * UMUL_TIME) - mp_limb base_multiplier; + mp_limb_t base_multiplier; #endif char flag; char post_shift; @@ -58,9 +58,9 @@ struct base_table_t { char normalization_steps; char ndigits; - mp_limb base PACK; + mp_limb_t base PACK; #if UDIV_TIME > 2 * UMUL_TIME - mp_limb base_ninv PACK; + mp_limb_t base_ninv PACK; #endif } big; #endif @@ -183,12 +183,12 @@ _itoa (value, buflim, base, upper_case) do \ { \ /* `unsigned long long int' always has 64 bits. */ \ - mp_limb work_hi = value >> (64 - BITS_PER_MP_LIMB); \ + mp_limb_t work_hi = value >> (64 - BITS_PER_MP_LIMB); \ \ if (BITS_PER_MP_LIMB == 32) \ if (work_hi != 0) \ { \ - mp_limb work_lo; \ + mp_limb_t work_lo; \ int cnt; \ \ work_lo = value & 0xfffffffful; \ @@ -228,11 +228,11 @@ _itoa (value, buflim, base, upper_case) default: { #if BITS_PER_MP_LIMB == 64 - mp_limb base_multiplier = brec->base_multiplier; + mp_limb_t base_multiplier = brec->base_multiplier; if (brec->flag) while (value != 0) { - mp_limb quo, rem, x, dummy; + mp_limb_t quo, rem, x, dummy; umul_ppmm (x, dummy, value, base_multiplier); quo = (x + ((value - x) >> 1)) >> (brec->post_shift - 1); @@ -243,7 +243,7 @@ _itoa (value, buflim, base, upper_case) else while (value != 0) { - mp_limb quo, rem, x, dummy; + mp_limb_t quo, rem, x, dummy; umul_ppmm (x, dummy, value, base_multiplier); quo = x >> brec->post_shift; @@ -253,36 +253,36 @@ _itoa (value, buflim, base, upper_case) } #endif #if BITS_PER_MP_LIMB == 32 - mp_limb t[3]; + mp_limb_t t[3]; int n; /* First convert x0 to 1-3 words in base s->big.base. Optimize for frequent cases of 32 bit numbers. */ - if ((mp_limb) (value >> 32) >= 1) + if ((mp_limb_t) (value >> 32) >= 1) { int big_normalization_steps = brec->big.normalization_steps; - mp_limb big_base_norm = brec->big.base << big_normalization_steps; + mp_limb_t big_base_norm = brec->big.base << big_normalization_steps; - if ((mp_limb) (value >> 32) >= brec->big.base) + if ((mp_limb_t) (value >> 32) >= brec->big.base) { - mp_limb x1hi, x1lo, r; + mp_limb_t x1hi, x1lo, r; /* If you want to optimize this, take advantage of that the quotient in the first udiv_qrnnd will always be very small. It might be faster just to subtract in a tight loop. */ #if UDIV_TIME > 2 * UMUL_TIME - mp_limb x, xh, xl; + mp_limb_t x, xh, xl; if (big_normalization_steps == 0) xh = 0; else - xh = (mp_limb) (value >> 64 - big_normalization_steps); - xl = (mp_limb) (value >> 32 - big_normalization_steps); + xh = (mp_limb_t) (value >> 64 - big_normalization_steps); + xl = (mp_limb_t) (value >> 32 - big_normalization_steps); udiv_qrnnd_preinv (x1hi, r, xh, xl, big_base_norm, brec->big.base_ninv); - xl = ((mp_limb) value) << big_normalization_steps; + xl = ((mp_limb_t) value) << big_normalization_steps; udiv_qrnnd_preinv (x1lo, x, r, xl, big_base_norm, big_normalization_steps); t[2] = x >> big_normalization_steps; @@ -297,16 +297,16 @@ _itoa (value, buflim, base, upper_case) big_normalization_steps); t[1] = x >> big_normalization_steps; #elif UDIV_NEEDS_NORMALIZATION - mp_limb x, xh, xl; + mp_limb_t x, xh, xl; if (big_normalization_steps == 0) xh = 0; else - xh = (mp_limb) (value >> 64 - big_normalization_steps); - xl = (mp_limb) (value >> 32 - big_normalization_steps); + xh = (mp_limb_t) (value >> 64 - big_normalization_steps); + xl = (mp_limb_t) (value >> 32 - big_normalization_steps); udiv_qrnnd (x1hi, r, xh, xl, big_base_norm); - xl = ((mp_limb) value) << big_normalization_steps; + xl = ((mp_limb_t) value) << big_normalization_steps; udiv_qrnnd (x1lo, x, r, xl, big_base_norm); t[2] = x >> big_normalization_steps; @@ -319,9 +319,9 @@ _itoa (value, buflim, base, upper_case) udiv_qrnnd (t[0], x, xh, xl, big_base_norm); t[1] = x >> big_normalization_steps; #else - udiv_qrnnd (x1hi, r, 0, (mp_limb) (value >> 32), + udiv_qrnnd (x1hi, r, 0, (mp_limb_t) (value >> 32), brec->big.base); - udiv_qrnnd (x1lo, t[2], r, (mp_limb) value, brec->big.base); + udiv_qrnnd (x1lo, t[2], r, (mp_limb_t) value, brec->big.base); udiv_qrnnd (t[0], t[1], x1hi, x1lo, brec->big.base); #endif n = 3; @@ -329,23 +329,23 @@ _itoa (value, buflim, base, upper_case) else { #if (UDIV_TIME > 2 * UMUL_TIME) - mp_limb x; + mp_limb_t x; value <<= brec->big.normalization_steps; - udiv_qrnnd_preinv (t[0], x, (mp_limb) (value >> 32), - (mp_limb) value, big_base_norm, + udiv_qrnnd_preinv (t[0], x, (mp_limb_t) (value >> 32), + (mp_limb_t) value, big_base_norm, brec->big.base_ninv); t[1] = x >> brec->big.normalization_steps; #elif UDIV_NEEDS_NORMALIZATION - mp_limb x; + mp_limb_t x; value <<= big_normalization_steps; - udiv_qrnnd (t[0], x, (mp_limb) (value >> 32), - (mp_limb) value, big_base_norm); + udiv_qrnnd (t[0], x, (mp_limb_t) (value >> 32), + (mp_limb_t) value, big_base_norm); t[1] = x >> big_normalization_steps; #else - udiv_qrnnd (t[0], t[1], (mp_limb) (value >> 32), - (mp_limb) value, brec->big.base); + udiv_qrnnd (t[0], t[1], (mp_limb_t) (value >> 32), + (mp_limb_t) value, brec->big.base); #endif n = 2; } @@ -359,15 +359,15 @@ _itoa (value, buflim, base, upper_case) /* Convert the 1-3 words in t[], word by word, to ASCII. */ do { - mp_limb ti = t[--n]; + mp_limb_t ti = t[--n]; int ndig_for_this_limb = 0; #if UDIV_TIME > 2 * UMUL_TIME - mp_limb base_multiplier = brec->base_multiplier; + mp_limb_t base_multiplier = brec->base_multiplier; if (brec->flag) while (ti != 0) { - mp_limb quo, rem, x, dummy; + mp_limb_t quo, rem, x, dummy; umul_ppmm (x, dummy, ti, base_multiplier); quo = (x + ((ti - x) >> 1)) >> (brec->post_shift - 1); @@ -379,7 +379,7 @@ _itoa (value, buflim, base, upper_case) else while (ti != 0) { - mp_limb quo, rem, x, dummy; + mp_limb_t quo, rem, x, dummy; umul_ppmm (x, dummy, ti, base_multiplier); quo = x >> brec->post_shift; @@ -391,7 +391,7 @@ _itoa (value, buflim, base, upper_case) #else while (ti != 0) { - mp_limb quo, rem; + mp_limb_t quo, rem; quo = ti / base; rem = ti % base; diff --git a/stdio-common/printf_fp.c b/stdio-common/printf_fp.c index 4e6104a71b..237deb99a5 100644 --- a/stdio-common/printf_fp.c +++ b/stdio-common/printf_fp.c @@ -28,7 +28,6 @@ Cambridge, MA 02139, USA. */ # include #endif #include -#include #include #include #include @@ -69,7 +68,7 @@ ssize_t __printf_pad __P ((FILE *, char pad, int n)); /* In vfprintf.c. */ #define outchar(ch) \ do \ { \ - register CONST int outc = (ch); \ + register const int outc = (ch); \ if (putc (outc, fp) == EOF) \ return -1; \ ++done; \ @@ -107,10 +106,10 @@ ssize_t __printf_pad __P ((FILE *, char pad, int n)); /* In vfprintf.c. */ An MP variable occupies a varying number of entries in its array. We keep track of this number for efficiency reasons. Otherwise we would always have to process the whole array. */ -#define MPN_VAR(name) mp_limb *name; mp_size_t name##size +#define MPN_VAR(name) mp_limb_t *name; mp_size_t name##size #define MPN_ASSIGN(dst,src) \ - memcpy (dst, src, (dst##size = src##size) * sizeof (mp_limb)) + memcpy (dst, src, (dst##size = src##size) * sizeof (mp_limb_t)) #define MPN_GE(u,v) \ (u##size > v##size || (u##size == v##size && __mpn_cmp (u, v, u##size) >= 0)) @@ -139,7 +138,7 @@ __printf_fp (FILE *fp, union { double dbl; - LONG_DOUBLE ldbl; + __long_double_t ldbl; } fpnum; @@ -151,11 +150,11 @@ __printf_fp (FILE *fp, const char *grouping; /* "NaN" or "Inf" for the special cases. */ - CONST char *special = NULL; + const char *special = NULL; /* We need just a few limbs for the input before shifting to the right position. */ - mp_limb fp_input[(LDBL_MANT_DIG + BITS_PER_MP_LIMB - 1) / BITS_PER_MP_LIMB]; + mp_limb_t fp_input[(LDBL_MANT_DIG + BITS_PER_MP_LIMB - 1) / BITS_PER_MP_LIMB]; /* We need to shift the contents of fp_input by this amount of bits. */ int to_shift; @@ -184,11 +183,11 @@ __printf_fp (FILE *fp, int done = 0; /* General helper (carry limb). */ - mp_limb cy; + mp_limb_t cy; char hack_digit (void) { - mp_limb hi; + mp_limb_t hi; if (expsign != 0 && type == 'f' && exponent-- > 0) hi = 0; @@ -337,10 +336,10 @@ __printf_fp (FILE *fp, would be really big it could lead to memory problems. */ { mp_size_t bignum_size = ((ABS (exponent) + BITS_PER_MP_LIMB - 1) - / BITS_PER_MP_LIMB + 4) * sizeof (mp_limb); - frac = (mp_limb *) alloca (bignum_size); - tmp = (mp_limb *) alloca (bignum_size); - scale = (mp_limb *) alloca (bignum_size); + / BITS_PER_MP_LIMB + 4) * sizeof (mp_limb_t); + frac = (mp_limb_t *) alloca (bignum_size); + tmp = (mp_limb_t *) alloca (bignum_size); + scale = (mp_limb_t *) alloca (bignum_size); } /* We now have to distinguish between numbers with positive and negative @@ -515,7 +514,7 @@ __printf_fp (FILE *fp, if (exponent >= tens->m_expo) { int i, incr, cnt_h, cnt_l; - mp_limb topval[2]; + mp_limb_t topval[2]; /* The __mpn_mul function expects the first argument to be bigger than the second. */ @@ -545,11 +544,11 @@ __printf_fp (FILE *fp, { topval[0] = 0; topval[1] - = ((mp_limb) 10) << (BITS_PER_MP_LIMB - 4 - cnt_h); + = ((mp_limb_t) 10) << (BITS_PER_MP_LIMB - 4 - cnt_h); } else { - topval[0] = ((mp_limb) 10) << (BITS_PER_MP_LIMB - 4); + topval[0] = ((mp_limb_t) 10) << (BITS_PER_MP_LIMB - 4); topval[1] = 0; (void) __mpn_lshift (topval, topval, 2, BITS_PER_MP_LIMB - cnt_h); -- cgit v1.2.3