lib/glibc
1
0
Fork 0
mirror of https://sourceware.org/git/glibc.git synced 2025-08-05 19:35:52 +03:00
Code Activity

Update.

Browse Source 
1999-05-26  Jakub Jelinek   <jj@ultra.linux.cz>

	* stdlib/longlong.h (add_ssaaaa, sub_ddmmss, umul_ppmm):
	Optimized sparc64 routines.

	* stdio-common/vfprintf.c (vfprintf): Don't handle long numbers if
	they are the same as ints.
	* stdio-common/vfscanf.c (_IO_vfscanf): Likewise.
This commit is contained in:
Ulrich Drepper
1999-05-25 18:37:11 +00:00
parent 40cbb1a73b
commit 859a09cff1
4 changed files with 57 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
ChangeLog
View File

@@ -1,5 +1,14 @@
1999-05-26 Jakub Jelinek <jj@ultra.linux.cz>
* stdlib/longlong.h (add_ssaaaa, sub_ddmmss, umul_ppmm):
Optimized sparc64 routines.
1999-05-25 Ulrich Drepper <drepper@cygnus.com> 1999-05-25 Ulrich Drepper <drepper@cygnus.com>
* stdio-common/vfprintf.c (vfprintf): Don't handle long numbers if
they are the same as ints.
* stdio-common/vfscanf.c (_IO_vfscanf): Likewise.
* version.h (VERSION): Bump to 2.1.90. * version.h (VERSION): Bump to 2.1.90.
(RELEASE): Mark as development. (RELEASE): Mark as development.

20
stdio-common/vfprintf.c
View File

@@ -189,6 +189,14 @@ extern void __funlockfile (FILE *);
# define is_longlong is_long_double # define is_longlong is_long_double
#endif #endif
/* If `long' and `int' is effectively the same type we don't have to
handle `long separately. */
#if INT_MAX == LONG_MAX
# define is_long_num 0
#else
# define is_long_num is_long
#endif
/* Global variables. */ /* Global variables. */
static const char null[] = "(null)"; static const char null[] = "(null)";
@@ -524,13 +532,13 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
\ \
if (fspec == NULL) \ if (fspec == NULL) \
{ \ { \
if (is_long) \ if (is_long_num) \
signed_number = va_arg (ap, long int); \ signed_number = va_arg (ap, long int); \
else /* `char' and `short int' will be promoted to `int'. */ \ else /* `char' and `short int' will be promoted to `int'. */ \
signed_number = va_arg (ap, int); \ signed_number = va_arg (ap, int); \
} \ } \
else \ else \
if (is_long) \ if (is_long_num) \
signed_number = args_value[fspec->data_arg].pa_long_int; \ signed_number = args_value[fspec->data_arg].pa_long_int; \
else \ else \
signed_number = args_value[fspec->data_arg].pa_int; \ signed_number = args_value[fspec->data_arg].pa_int; \
@@ -608,7 +616,7 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
{ \ { \
if (fspec == NULL) \ if (fspec == NULL) \
{ \ { \
if (is_long) \ if (is_long_num) \
number.word = va_arg (ap, unsigned long int); \ number.word = va_arg (ap, unsigned long int); \
else if (!is_short) \ else if (!is_short) \
number.word = va_arg (ap, unsigned int); \ number.word = va_arg (ap, unsigned int); \
@@ -616,7 +624,7 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
number.word = (unsigned short int) va_arg (ap, unsigned int); \ number.word = (unsigned short int) va_arg (ap, unsigned int); \
} \ } \
else \ else \
if (is_long) \ if (is_long_num) \
number.word = args_value[fspec->data_arg].pa_u_long_int; \ number.word = args_value[fspec->data_arg].pa_u_long_int; \
else if (is_char) \ else if (is_char) \
number.word = (unsigned char) \ number.word = (unsigned char) \
@@ -987,7 +995,7 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
{ \ { \
if (is_longlong) \ if (is_longlong) \
*(long long int *) va_arg (ap, void *) = done; \ *(long long int *) va_arg (ap, void *) = done; \
else if (is_long) \ else if (is_long_num) \
*(long int *) va_arg (ap, void *) = done; \ *(long int *) va_arg (ap, void *) = done; \
else if (!is_short) \ else if (!is_short) \
*(int *) va_arg (ap, void *) = done; \ *(int *) va_arg (ap, void *) = done; \
@@ -997,7 +1005,7 @@ vfprintf (FILE *s, const CHAR_T *format, va_list ap)
else \ else \
if (is_longlong) \ if (is_longlong) \
*(long long int *) args_value[fspec->data_arg].pa_pointer = done; \ *(long long int *) args_value[fspec->data_arg].pa_pointer = done; \
else if (is_long) \ else if (is_long_num) \
*(long int *) args_value[fspec->data_arg].pa_pointer = done; \ *(long int *) args_value[fspec->data_arg].pa_pointer = done; \
else if (!is_short) \ else if (!is_short) \
*(int *) args_value[fspec->data_arg].pa_pointer = done; \ *(int *) args_value[fspec->data_arg].pa_pointer = done; \

34
stdio-common/vfscanf.c
View File

@@ -43,6 +43,13 @@
# define need_longlong 1 # define need_longlong 1
#endif #endif
/* Determine whether we have to handle `long'. */
#if INT_MAX == LONG_MAX
# define need_long 0
#else
# define need_long 1
#endif
/* Those are flags in the conversion format. */ /* Those are flags in the conversion format. */
#define LONG 0x001 /* l: long or double */ #define LONG 0x001 /* l: long or double */
#define LONGDBL 0x002 /* L: long long or long double */ #define LONGDBL 0x002 /* L: long long or long double */
@@ -446,7 +453,7 @@ __vfscanf (FILE *s, const char *format, va_list argptr)
{ {
/* A double `l' is equivalent to an `L'. */ /* A double `l' is equivalent to an `L'. */
++f; ++f;
flags |= need_longlong ? LONGDBL : LONG; flags |= LONGDBL | LONG;
} }
else else
/* ints are long ints. */ /* ints are long ints. */
@@ -455,7 +462,7 @@ __vfscanf (FILE *s, const char *format, va_list argptr)
case 'q': case 'q':
case 'L': case 'L':
/* doubles are long doubles, and ints are long long ints. */ /* doubles are long doubles, and ints are long long ints. */
flags |= need_longlong ? LONGDBL : LONG; flags |= LONGDBL | LONG;
break; break;
case 'a': case 'a':
/* The `a' is used as a flag only if followed by `s', `S' or /* The `a' is used as a flag only if followed by `s', `S' or
@@ -534,12 +541,14 @@ __vfscanf (FILE *s, const char *format, va_list argptr)
/* Don't count the read-ahead. */ /* Don't count the read-ahead. */
if (need_longlong && (flags & LONGDBL)) if (need_longlong && (flags & LONGDBL))
*ARG (long long int *) = read_in; *ARG (long long int *) = read_in;
else if (flags & LONG) else if (need_long && (flags & LONG))
*ARG (long int *) = read_in; *ARG (long int *) = read_in;
else if (flags & SHORT) else if (flags & SHORT)
*ARG (short int *) = read_in; *ARG (short int *) = read_in;
else else if (!(flags & CHAR))
*ARG (int *) = read_in; *ARG (int *) = read_in;
else
*ARG (char *) = read_in;
#ifdef NO_BUG_IN_ISO_C_CORRIGENDUM_1 #ifdef NO_BUG_IN_ISO_C_CORRIGENDUM_1
/* We have a severe problem here. The ISO C standard /* We have a severe problem here. The ISO C standard
@@ -946,28 +955,28 @@ __vfscanf (FILE *s, const char *format, va_list argptr)
{ {
if (need_longlong && (flags & LONGDBL)) if (need_longlong && (flags & LONGDBL))
*ARG (unsigned LONGLONG int *) = num.uq; *ARG (unsigned LONGLONG int *) = num.uq;
else if (flags & LONG) else if (need_long && (flags & LONG))
*ARG (unsigned long int *) = num.ul; *ARG (unsigned long int *) = num.ul;
else if (flags & SHORT) else if (flags & SHORT)
*ARG (unsigned short int *) *ARG (unsigned short int *)
= (unsigned short int) num.ul; = (unsigned short int) num.ul;
else if (flags & CHAR) else if (!(flags & CHAR))
*ARG (unsigned char *) = (unsigned char) num.ul;
else
*ARG (unsigned int *) = (unsigned int) num.ul; *ARG (unsigned int *) = (unsigned int) num.ul;
else
*ARG (unsigned char *) = (unsigned char) num.ul;
} }
else else
{ {
if (need_longlong && (flags & LONGDBL)) if (need_longlong && (flags & LONGDBL))
*ARG (LONGLONG int *) = num.q; *ARG (LONGLONG int *) = num.q;
else if (flags & LONG) else if (need_long && (flags & LONG))
*ARG (long int *) = num.l; *ARG (long int *) = num.l;
else if (flags & SHORT) else if (flags & SHORT)
*ARG (short int *) = (short int) num.l; *ARG (short int *) = (short int) num.l;
else if (flags & CHAR) else if (!(flags & CHAR))
*ARG (signed char *) = (signed char) num.ul;
else
*ARG (int *) = (int) num.l; *ARG (int *) = (int) num.l;
else
*ARG (signed char *) = (signed char) num.ul;
} }
++done; ++done;
} }
@@ -1267,6 +1276,7 @@ __vfscanf (FILE *s, const char *format, va_list argptr)
base = 16; base = 16;
/* A PTR must be the same size as a `long int'. */ /* A PTR must be the same size as a `long int'. */
flags &= ~(SHORT|LONGDBL); flags &= ~(SHORT|LONGDBL);
if (need_long)
flags |= LONG; flags |= LONG;
number_signed = 0; number_signed = 0;
read_pointer = 1; read_pointer = 1;

2
sysdeps/generic/wcstol.c
View File

@@ -20,4 +20,4 @@
#define USE_WIDE_CHAR 1 #define USE_WIDE_CHAR 1
#include <stdlib/strtol.c> #include <sysdeps/generic/strtol.c>