X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/499daa504f93cef3d1d2054634f021d63761c6f9..e91ff6ce3d2653b41265591dafd4bdb32ae114c2:/src/system.h diff --git a/src/system.h b/src/system.h index 56a0ba0e..6dd83bcf 100644 --- a/src/system.h +++ b/src/system.h @@ -1,5 +1,5 @@ /* system-dependent definitions for Bison. - Copyright (C) 2000 Free Software Foundation, Inc. + Copyright 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 @@ -24,18 +24,22 @@ #include -#ifdef MSDOS -# include -#endif +#include -#ifdef _MSC_VER +#if HAVE_STDLIB_H # include -# include -# define getpid _getpid #endif -#if HAVE_STDLIB_H -# include +/* 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 + +#ifndef EXIT_SUCCESS +# define EXIT_SUCCESS 0 #endif #if HAVE_UNISTD_H @@ -48,9 +52,6 @@ # 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. */ @@ -65,19 +66,82 @@ extern int errno; #endif -#if PROTOTYPES -# define PARAMS(p) p -#else -# define PARAMS(p) () +/* AIX requires this to be the first thing in the file. */ +#ifndef __GNUC__ +# if HAVE_ALLOCA_H +# include +# else +# ifdef _AIX + #pragma alloca +# else +# ifndef alloca /* predefined by HP cc +Olibcalls */ +char *alloca (); +# endif +# endif +# endif +#endif + +#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)); + +/*---------------------. +| 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 /* The __-protected variants of `format' and `printf' attributes @@ -100,17 +164,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) /*-------------------------------. @@ -121,30 +177,113 @@ extern int errno; # define LOCALEDIR "/usr/local/share/locale" #endif -#endif /* BISON_SYSTEM_H */ - -/*---------------------------------. -| Machine-dependencies for Bison. | -`---------------------------------*/ +/*-----------. +| Booleans. | +`-----------*/ -#ifdef eta10 -# define MAXSHORT 2147483647 -# define MINSHORT -2147483648 -#else -# define MAXSHORT 32767 -# define MINSHORT -32768 +#ifndef TRUE +# define TRUE (1) +# define FALSE (0) #endif +typedef int bool; + + +/*-----------. +| Obstacks. | +`-----------*/ + +# define obstack_chunk_alloc xmalloc +# define obstack_chunk_free free +# include "obstack.h" + +#define obstack_sgrow(Obs, Str) \ + obstack_grow (Obs, Str, strlen (Str)) + +#define obstack_fgrow1(Obs, Format, Arg1) \ +do { \ + char buf[4096]; \ + sprintf (buf, Format, Arg1); \ + obstack_grow (Obs, buf, strlen (buf)); \ +} while (0) + +#define obstack_fgrow2(Obs, Format, Arg1, Arg2) \ +do { \ + char buf[4096]; \ + sprintf (buf, Format, Arg1, Arg2); \ + obstack_grow (Obs, buf, strlen (buf)); \ +} while (0) -#if defined (MSDOS) && !defined (__GO32__) -# define BITS_PER_WORD 16 -# define MAXTABLE 16383 -#else -# define BITS_PER_WORD 32 -# define MAXTABLE 32767 +#define obstack_fgrow3(Obs, Format, Arg1, Arg2, Arg3) \ +do { \ + char buf[4096]; \ + 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" +# define EXT_STYPE_H "_stype" +# define EXT_GUARD_C "_guard" +#else /* ! VMS */ +# ifdef MSDOS + /* MS DOS. */ +# define EXT_TAB "_tab" +# define EXT_OUTPUT ".out" +# define EXT_STYPE_H ".sth" +# define EXT_GUARD_C ".guc" +# else /* ! MSDOS */ + /* Standard. */ +# define EXT_TAB ".tab" +# define EXT_OUTPUT ".output" +# define EXT_STYPE_H ".stype" +# define EXT_GUARD_C ".guard" +# endif /* ! MSDOS */ +#endif /* ! VMS */ + +#ifndef DEFAULT_TMPDIR +# define DEFAULT_TMPDIR "/tmp" #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) + + +/*---------------------. +| 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 */