X-Git-Url: https://git.saurik.com/bison.git/blobdiff_plain/b7226022b07fac385defbf2297892d8c3dc3cd18..75ae8299840bbd854fa2474d38402bbb933c6511:/src/system.h?ds=inline diff --git a/src/system.h b/src/system.h index 3a82e7f3..3267f2d2 100644 --- a/src/system.h +++ b/src/system.h @@ -1,6 +1,6 @@ /* System-dependent definitions for Bison. - Copyright (C) 2000-2007, 2009-2012 Free Software Foundation, Inc. + Copyright (C) 2000-2007, 2009-2013 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 @@ -38,20 +38,30 @@ # include # include # include + +# define ARRAY_CARDINALITY(Array) (sizeof (Array) / sizeof *(Array)) +# define STREQ(L, R) (strcmp(L, R) == 0) +# define STRNEQ(L, R) (!STREQ(L, R)) + +/* Just like strncmp, but the second argument must be a literal string + and you don't specify the length. */ +# define STRNCMP_LIT(S, Literal) \ + strncmp (S, "" Literal "", sizeof (Literal) - 1) + +/* Whether Literal is a prefix of S. */ +# define STRPREFIX_LIT(Literal, S) \ + (STRNCMP_LIT (S, Literal) == 0) + # include # include -#define ARRAY_CARDINALITY(Array) (sizeof (Array) / sizeof *(Array)) -#define STREQ(L, R) (strcmp(L, R) == 0) -#define STRNEQ(L, R) (!STREQ(L, R)) - # ifndef UINTPTR_MAX /* This isn't perfect, but it's good enough for Bison, which needs only to hash pointers. */ typedef size_t uintptr_t; # endif -// Version mismatch. +/* Version mismatch. */ # define EX_MISMATCH 63 /*---------. @@ -89,7 +99,7 @@ typedef size_t uintptr_t; # endif # endif -/* The __-protected variants of `format' and `printf' attributes +/* 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 @@ -158,7 +168,9 @@ typedef size_t uintptr_t; # define obstack_chunk_free free # include -# define obstack_sgrow(Obs, Str) \ +/* String-grow: append Str to Obs. */ + +# define obstack_sgrow(Obs, Str) \ obstack_grow (Obs, Str, strlen (Str)) /* Output Str escaped for our postprocessing (i.e., escape M4 special @@ -168,15 +180,15 @@ typedef size_t uintptr_t; # define obstack_escape(Obs, Str) \ do { \ - char const *p; \ - for (p = Str; *p; p++) \ - switch (*p) \ + char const *p__; \ + for (p__ = Str; *p__; p__++) \ + switch (*p__) \ { \ case '$': obstack_sgrow (Obs, "$]["); break; \ case '@': obstack_sgrow (Obs, "@@" ); break; \ case '[': obstack_sgrow (Obs, "@{" ); break; \ case ']': obstack_sgrow (Obs, "@}" ); break; \ - default: obstack_1grow (Obs, *p ); break; \ + default: obstack_1grow (Obs, *p__ ); break; \ } \ } while (0) @@ -204,7 +216,7 @@ typedef size_t uintptr_t; /* Append the ending 0, finish Obs, and return the string. */ -# define obstack_finish0(Obs) \ +# define obstack_finish0(Obs) \ (obstack_1grow (Obs, '\0'), (char *) obstack_finish (Obs))