X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/aa7815f5c6e8e07a85e47df9cd7b579468969efb..20c1e2ad9841d06212465ce0b81c771d08c9ec51:/src/system.h?ds=sidebyside diff --git a/src/system.h b/src/system.h index 797ae545..18b13779 100644 --- a/src/system.h +++ b/src/system.h @@ -1,5 +1,5 @@ /* system-dependent definitions for Bison. - Copyright 2000 Free Software Foundation, Inc. + Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -22,22 +22,41 @@ # include #endif +/* AIX requires this to be the first thing in the file. */ +#ifdef __GNUC__ +# define alloca(Size) __builtin_alloca (Size) +#else +# if HAVE_ALLOCA_H +# include +# else +# ifdef _AIX + #pragma alloca +# else +# ifndef alloca /* predefined by HP cc +Olibcalls */ +char *alloca (); +# endif +# endif +# endif +#endif + #include #include -#ifdef MSDOS -# include +#if HAVE_STDLIB_H +# include #endif -#ifdef _MSC_VER -# include -# include -# define getpid _getpid +/* The following test is to work around the gross typo in + systems like Sony NEWS-OS Release 4.0C, whereby EXIT_FAILURE + is defined to 0, not 1. */ +#if !EXIT_FAILURE +# undef EXIT_FAILURE +# define EXIT_FAILURE 1 #endif -#if HAVE_STDLIB_H -# include +#ifndef EXIT_SUCCESS +# define EXIT_SUCCESS 0 #endif #if HAVE_UNISTD_H @@ -50,46 +69,104 @@ # if !defined(STDC_HEADERS) && defined(HAVE_MEMORY_H) # include # endif /* not STDC_HEADERS and HAVE_MEMORY_H */ -# ifndef bcopy -# define bcopy(src, dst, num) memcpy((dst), (src), (num)) -# endif #else /* not STDC_HEADERS and not HAVE_STRING_H */ # include /* memory.h and strings.h conflict on some systems. */ #endif /* not STDC_HEADERS and not HAVE_STRING_H */ -#if defined(STDC_HEADERS) || defined(HAVE_CTYPE_H) -# include -#endif - #include #ifndef errno extern int errno; #endif -#if PROTOTYPES -# define PARAMS(p) p -#else -# define PARAMS(p) () +#ifndef PARAMS +# if defined PROTOTYPES || defined __STDC__ +# define PARAMS(Args) Args +# else +# define PARAMS(Args) () +# endif +#endif + +#if HAVE_LIMITS_H +# include +#endif +#ifndef SHRT_MIN +# define SHRT_MIN (-32768) +#endif +#ifndef SHRT_MAX +# define SHRT_MAX 32767 +#endif + +# include "xalloc.h" + +/* From xstrndup.c. */ +char *xstrndup PARAMS ((const char *s, size_t n)); + + +/*----------------. +| Using timevar. | +`----------------*/ + +#include "timevar.h" +extern int time_report; + + +/*---------------------. +| Missing prototypes. | +`---------------------*/ + +#if !HAVE_DECL_STPCPY +char *stpcpy PARAMS ((char *dest, const char *src)); +#endif + +#if !HAVE_DECL_STRCHR +char *strchr(const char *s, int c); +#endif + +#if !HAVE_DECL_STRSPN +size_t strspn(const char *s, const char *accept); +#endif + +#if !HAVE_DECL_STRNLEN +size_t strnlen PARAMS ((const char *s, size_t maxlen)); +#endif + +#if !HAVE_DECL_MEMCHR +void *memchr PARAMS ((const void *s, int c, size_t n)); +#endif + +#if !HAVE_DECL_MEMRCHR +void *memrchr PARAMS ((const void *s, int c, size_t n)); #endif + + /*-----------------. | GCC extensions. | `-----------------*/ #ifndef __attribute__ /* This feature is available in gcc versions 2.5 and later. */ -# if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 5) || __STRICT_ANSI__ +# if !defined (__GNUC__) || __GNUC__ < 2 || \ +(__GNUC__ == 2 && __GNUC_MINOR__ < 5) || __STRICT_ANSI__ # define __attribute__(Spec) /* empty */ # endif +#endif + /* The __-protected variants of `format' and `printf' attributes are accepted by gcc versions 2.6.4 (effectively 2.7) and later. */ -# if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 7) -# define __format__ format -# define __printf__ printf -# endif +#if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 7) +# define __format__ format +# define __printf__ printf #endif +#ifndef ATTRIBUTE_NORETURN +# define ATTRIBUTE_NORETURN __attribute__ ((__noreturn__)) +#endif + +#ifndef ATTRIBUTE_UNUSED +# define ATTRIBUTE_UNUSED __attribute__ ((__unused__)) +#endif /*------. | NLS. | @@ -102,17 +179,9 @@ extern int errno; # define setlocale(Category, Locale) #endif -#ifdef ENABLE_NLS -# include -# define _(Text) gettext (Text) -#else -# undef bindtextdomain -# define bindtextdomain(Domain, Directory) -# undef textdomain -# define textdomain(Domain) -# define _(Text) Text -#endif -#define N_(Text) Text +#include "gettext.h" +#define _(Msgid) gettext (Msgid) +#define N_(Msgid) (Msgid) /*-------------------------------. @@ -123,34 +192,6 @@ extern int errno; # define LOCALEDIR "/usr/local/share/locale" #endif -#endif /* BISON_SYSTEM_H */ - - -/*---------------------------------. -| Machine-dependencies for Bison. | -`---------------------------------*/ - -#ifdef eta10 -# define MAXSHORT 2147483647 -# define MINSHORT -2147483648 -#else -# define MAXSHORT 32767 -# define MINSHORT -32768 -#endif - -#if defined (MSDOS) && !defined (__GO32__) -# define BITS_PER_WORD 16 -# define MAXTABLE 16383 -#else -# define BITS_PER_WORD 32 -# define MAXTABLE 32767 -#endif - -#define WORDSIZE(n) (((n) + BITS_PER_WORD - 1) / BITS_PER_WORD) -#define SETBIT(x, i) ((x)[(i)/BITS_PER_WORD] |= (1<<((i) % BITS_PER_WORD))) -#define RESETBIT(x, i) ((x)[(i)/BITS_PER_WORD] &= ~(1<<((i) % BITS_PER_WORD))) -#define BITISSET(x, i) (((x)[(i)/BITS_PER_WORD] & (1<<((i) % BITS_PER_WORD))) != 0) - /*-----------. | Booleans. | @@ -167,12 +208,12 @@ typedef int bool; | Obstacks. | `-----------*/ -#define obstack_chunk_alloc xmalloc -#define obstack_chunk_free free -#include "obstack.h" +# define obstack_chunk_alloc xmalloc +# define obstack_chunk_free free +# include "obstack.h" -#define obstack_grow_literal_string(Obs, Str) \ - obstack_grow (Obs, Str, sizeof (Str) - 1) +#define obstack_sgrow(Obs, Str) \ + obstack_grow (Obs, Str, strlen (Str)) #define obstack_fgrow1(Obs, Format, Arg1) \ do { \ @@ -194,3 +235,64 @@ do { \ sprintf (buf, Format, Arg1, Arg2, Arg3); \ obstack_grow (Obs, buf, strlen (buf)); \ } while (0) + +#define obstack_fgrow4(Obs, Format, Arg1, Arg2, Arg3, Arg4) \ +do { \ + char buf[4096]; \ + sprintf (buf, Format, Arg1, Arg2, Arg3, Arg4); \ + obstack_grow (Obs, buf, strlen (buf)); \ +} while (0) + + + +/*-----------------------------------------. +| Extensions to use for the output files. | +`-----------------------------------------*/ + +#ifdef VMS + /* VMS. */ +# define EXT_TAB "_tab" +# define EXT_OUTPUT ".output" +#else /* ! VMS */ +# ifdef MSDOS + /* MS DOS. */ +# define EXT_TAB "_tab" +# define EXT_OUTPUT ".out" +# else /* ! MSDOS */ + /* Standard. */ +# define EXT_TAB ".tab" +# define EXT_OUTPUT ".output" +# endif /* ! MSDOS */ +#endif /* ! VMS */ + +#ifndef DEFAULT_TMPDIR +# define DEFAULT_TMPDIR "/tmp" +#endif + + + +/*---------------------. +| Free a linked list. | +`---------------------*/ + +#define LIST_FREE(Type, List) \ +do { \ + Type *_node, *_next; \ + for (_node = List; _node; _node = _next) \ + { \ + _next = _node->next; \ + XFREE (_node); \ + } \ +} while (0) + + +/*---------------------------------------------. +| Debugging memory allocation (must be last). | +`---------------------------------------------*/ + +# if WITH_DMALLOC +# define DMALLOC_FUNC_CHECK +# include +# endif /* WITH_DMALLOC */ + +#endif /* ! BISON_SYSTEM_H */