X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/499daa504f93cef3d1d2054634f021d63761c6f9..e9f87b5b7df2e328d2e4196d276c0d96594c906b:/src/system.h diff --git a/src/system.h b/src/system.h index 56a0ba0e..b1d15424 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 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,12 +66,62 @@ extern int errno; #endif +/* 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 + #if PROTOTYPES # define PARAMS(p) p #else # define PARAMS(p) () #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_STRNDUP +char *strndup PARAMS ((const char *s, size_t size)); +#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(const void *s, int c, size_t n); +#endif + + + /*-----------------. | GCC extensions. | `-----------------*/ @@ -100,17 +151,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 "libgettext.h" +#define _(Msgid) gettext (Msgid) +#define N_(Msgid) (Msgid) /*-------------------------------. @@ -121,7 +164,56 @@ extern int errno; # define LOCALEDIR "/usr/local/share/locale" #endif -#endif /* BISON_SYSTEM_H */ + +/*-----------. +| Booleans. | +`-----------*/ + +#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) + +#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) /*---------------------------------. @@ -148,3 +240,73 @@ extern int errno; #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) + + +/* 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 */ + +#if defined (VMS) & !defined (__VMS_POSIX) +# ifndef BISON_SIMPLE +# define BISON_SIMPLE "GNU_BISON:[000000]BISON.SIMPLE" +# endif +# ifndef BISON_HAIRY +# define BISON_HARIRY "GNU_BISON:[000000]BISON.HAIRY" +# endif +#endif + +#if defined (_MSC_VER) +# ifndef BISON_SIMPLE +# define BISON_SIMPLE "c:/usr/local/lib/bison.simple" +# endif +# ifndef BISON_HAIRY +# define BISON_HAIRY "c:/usr/local/lib/bison.hairy" +# endif +#endif + + +/* As memcpy, but for shorts. */ +#define shortcpy(Dest, Src, Num) \ + memcpy (Dest, Src, Num * sizeof (short)) + +/* 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 the memory allocator. | +`---------------------------------*/ + +# if WITH_DMALLOC +# define DMALLOC_FUNC_CHECK +# include +# endif /* WITH_DMALLOC */ + +#endif /* ! BISON_SYSTEM_H */