X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Fxstrtol.h;h=7a9a024457f5c40a56d689c074eebd6d994dc66f;hb=40e284d3f1e643410c06559522183b1c4eff1030;hp=cc8eddf061f1d2b5d228835057c5ee75413b2ae5;hpb=e8bca88ccce51c40fc5d67ebbc434f8f225b03cd;p=gnulib.git diff --git a/lib/xstrtol.h b/lib/xstrtol.h index cc8eddf06..7a9a02445 100644 --- a/lib/xstrtol.h +++ b/lib/xstrtol.h @@ -1,34 +1,33 @@ -#ifndef _xstrtol_h_ -# define _xstrtol_h_ 1 +#ifndef XSTRTOL_H_ +# define XSTRTOL_H_ 1 -# if STRING_TO_UNSIGNED -# define __xstrtol xstrtoul -# define __strtol strtoul -# define __unsigned unsigned -# define __ZLONG_MAX ULONG_MAX -# else -# define __xstrtol xstrtol -# define __strtol strtol -# define __unsigned /* empty */ -# define __ZLONG_MAX LONG_MAX +# if HAVE_INTTYPES_H +# include /* for uintmax_t */ # endif -# undef PARAMS -# if defined (__STDC__) && __STDC__ -# define PARAMS(Args) Args -# else -# define PARAMS(Args) () +# ifndef PARAMS +# if defined PROTOTYPES || (defined __STDC__ && __STDC__) +# define PARAMS(Args) Args +# else +# define PARAMS(Args) () +# endif # endif +# ifndef _STRTOL_ERROR enum strtol_error { LONGINT_OK, LONGINT_INVALID, LONGINT_INVALID_SUFFIX_CHAR, LONGINT_OVERFLOW }; typedef enum strtol_error strtol_error; +# endif -strtol_error - __xstrtol PARAMS ((const char *s, char **ptr, int base, - __unsigned long int *val, const char *valid_suffixes)); +# define _DECLARE_XSTRTOL(name, type) \ + strtol_error \ + name PARAMS ((const char *s, char **ptr, int base, \ + type *val, const char *valid_suffixes)); +_DECLARE_XSTRTOL (xstrtol, long int) +_DECLARE_XSTRTOL (xstrtoul, unsigned long int) +_DECLARE_XSTRTOL (xstrtoumax, uintmax_t) # define _STRTOL_ERROR(Exit_code, Str, Argument_type_string, Err) \ do \ @@ -49,8 +48,7 @@ strtol_error break; \ \ case LONGINT_OVERFLOW: \ - /* FIXME: make this message dependent on STRING_TO_UNSIGNED */\ - error ((Exit_code), 0, "%s `%s' larger than maximum long int",\ + error ((Exit_code), 0, "%s `%s' too large", \ (Argument_type_string), (Str)); \ break; \ } \ @@ -63,4 +61,4 @@ strtol_error # define STRTOL_FAIL_WARN(Str, Argument_type_string, Err) \ _STRTOL_ERROR (0, Str, Argument_type_string, Err) -#endif /* _xstrtol_h_ */ +#endif /* not XSTRTOL_H_ */