* src/bison.simple (YYSTACK_REALLOC): Fix typo that caused us to

[bison.git] / src / system.h

diff --git a/src/system.h b/src/system.h
index 83e2b0a51f0bde196afc8ac3bb2636f9b4e7b458..70605c499fe5d76023d818e4e5293ca059807066 100644 (file)
--- a/src/system.h
+++ b/src/system.h
@@ -40,6 +40,18 @@
 # include <stdlib.h>
 #endif
 
 # include <stdlib.h>
 #endif
 

+/* 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
 # include <unistd.h>
 #endif
 #if HAVE_UNISTD_H
 # include <unistd.h>
 #endif


@@ -67,12 +79,47 @@
 extern int errno;
 #endif
 
 extern int errno;
 #endif
 

+/* AIX requires this to be the first thing in the file.  */
+#ifndef __GNUC__
+# if HAVE_ALLOCA_H
+#  include <alloca.h>
+# 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
 
 #if PROTOTYPES
 # define PARAMS(p) p
 #else
 # define PARAMS(p) ()
 #endif
 

+# include "xalloc.h"
+
+/*---------------------.
+| Missing prototypes.  |
+`---------------------*/
+
+#if !HAVE_DECL_STPCPY
+char *stpcpy PARAMS ((char *dest, const char *src));
+#endif
+
+#if !HAVE_DECL_STRNDUP
+char *strndup PARAMS ((const char *s, size_t size));
+#endif
+
+#if !HAVE_DECL_STRNLEN
+size_t strnlen PARAMS ((const char *s, size_t maxlen));
+#endif
+
+
+

 /*-----------------.
 | GCC extensions.  |
 `-----------------*/
 /*-----------------.
 | GCC extensions.  |
 `-----------------*/


@@ -102,17 +149,9 @@ extern int errno;
 # define setlocale(Category, Locale)
 #endif
 
 # define setlocale(Category, Locale)
 #endif
 

-#ifdef ENABLE_NLS
-# include <libintl.h>
-# 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 "intl/libgettext.h"
+#define _(Msgid)  gettext (Msgid)
+#define N_(Msgid) (Msgid)

 
 
 /*-------------------------------.
 
 
 /*-------------------------------.


@@ -123,8 +162,6 @@ extern int errno;
 # define LOCALEDIR "/usr/local/share/locale"
 #endif
 
 # define LOCALEDIR "/usr/local/share/locale"
 #endif
 

-#endif  /* BISON_SYSTEM_H */
-

 
 /*-----------.
 | Booleans.  |
 
 /*-----------.
 | Booleans.  |


@@ -141,9 +178,9 @@ typedef int bool;
 | Obstacks.  |
 `-----------*/
 
 | 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_sgrow(Obs, Str) \
   obstack_grow (Obs, Str, strlen (Str))
 
 #define obstack_sgrow(Obs, Str) \
   obstack_grow (Obs, Str, strlen (Str))


@@ -244,3 +281,30 @@ do {                                                               \
 #  define BISON_HAIRY "c:/usr/local/lib/bison.hairy"
 # endif
 #endif
 #  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 <dmalloc.h>
+# endif /* WITH_DMALLOC */
+
+#endif  /* BISON_SYSTEM_H */