Mercurial > gnulib

annotate lib/obstack.h @ 40231:9b3c79fdfe0b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
strtod: fix clash with strtold Problem reported for RHEL 5 by Jesse Caldwell (Bug#34817). * lib/strtod.c (compute_minus_zero, minus_zero): Simplify by remving the macro / external variable, and having just a function. User changed. This avoids the need for an external variable that might clash.
author Paul Eggert <eggert@cs.ucla.edu>
date Mon, 11 Mar 2019 16:40:29 -0700
parents b06060465f09
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
1 /* obstack.h - object stack macros
40057
b06060465f09 maint: Run 'make update-copyright'
Paul Eggert <eggert@cs.ucla.edu>
parents: 40036
diff changeset
2 Copyright (C) 1988-2019 Free Software Foundation, Inc.
6376
56829cd68e67 * config/srclist.txt: Add glibc bug 321 for obstack.c, obstack.h.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5848
diff changeset
3 This file is part of the GNU C Library.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
4
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
5 The GNU C Library is free software; you can redistribute it and/or
17533
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
6 modify it under the terms of the GNU Lesser General Public
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
7 License as published by the Free Software Foundation; either
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
8 version 2.1 of the License, or (at your option) any later version.
1112
13d9cd0b3ac0 update from GNU libc
Jim Meyering <jim@meyering.net>
parents: 995
diff changeset
9
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
10 The GNU C Library is distributed in the hope that it will be useful,
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
17533
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
13 Lesser General Public License for more details.
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
14
17533
6d4e36653a40 obstack: pacify HP C
Paul Eggert <eggert@cs.ucla.edu>
parents: 17518
diff changeset
15 You should have received a copy of the GNU Lesser General Public
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
16 License along with the GNU C Library; if not, see
19190
9759915b2aca all: prefer https: URLs
Paul Eggert <eggert@cs.ucla.edu>
parents: 18626
diff changeset
17 <https://www.gnu.org/licenses/>. */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
18
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
19 /* Summary:
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
20
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
21 All the apparent functions defined here are macros. The idea
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
22 is that you would use these pre-tested macros to solve a
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
23 very specific set of problems, and they would run fast.
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
24 Caution: no side-effects in arguments please!! They may be
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
25 evaluated MANY times!!
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
26
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
27 These macros operate a stack of objects. Each object starts life
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
28 small, and may grow to maturity. (Consider building a word syllable
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
29 by syllable.) An object can move while it is growing. Once it has
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
30 been "finished" it never changes address again. So the "top of the
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
31 stack" is typically an immature growing object, while the rest of the
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
32 stack is of mature, fixed size and fixed address objects.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
33
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
34 These routines grab large chunks of memory, using a function you
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
35 supply, called 'obstack_chunk_alloc'. On occasion, they free chunks,
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
36 by calling 'obstack_chunk_free'. You must define them and declare
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
37 them before using any obstack macros.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
38
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
39 Each independent stack is represented by a 'struct obstack'.
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
40 Each of the obstack macros expects a pointer to such a structure
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
41 as the first argument.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
42
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
43 One motivation for this package is the problem of growing char strings
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
44 in symbol tables. Unless you are "fascist pig with a read-only mind"
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
45 --Gosper's immortal quote from HAKMEM item 154, out of context--you
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
46 would not like to put any arbitrary upper limit on the length of your
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
47 symbols.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
48
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
49 In practice this often means you will build many short symbols and a
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
50 few long symbols. At the time you are reading a symbol you don't know
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
51 how long it is. One traditional method is to read a symbol into a
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
52 buffer, realloc()ating the buffer every time you try to read a symbol
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
53 that is longer than the buffer. This is beaut, but you still will
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
54 want to copy the symbol from the buffer to a more permanent
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
55 symbol-table entry say about half the time.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
56
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
57 With obstacks, you can work differently. Use one obstack for all symbol
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
58 names. As you read a symbol, grow the name in the obstack gradually.
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
59 When the name is complete, finalize it. Then, if the symbol exists already,
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
60 free the newly read name.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
61
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
62 The way we do this is to take a large chunk, allocating memory from
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
63 low addresses. When you want to build a symbol in the chunk you just
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
64 add chars above the current "high water mark" in the chunk. When you
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
65 have finished adding chars, because you got to the end of the symbol,
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
66 you know how long the chars are, and you can create a new object.
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
67 Mostly the chars will not burst over the highest address of the chunk,
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
68 because you would typically expect a chunk to be (say) 100 times as
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
69 long as an average object.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
70
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
71 In case that isn't clear, when we have enough chars to make up
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
72 the object, THEY ARE ALREADY CONTIGUOUS IN THE CHUNK (guaranteed)
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
73 so we just point to it where it lies. No moving of chars is
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
74 needed and this is the second win: potentially long strings need
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
75 never be explicitly shuffled. Once an object is formed, it does not
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
76 change its address during its lifetime.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
77
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
78 When the chars burst over a chunk boundary, we allocate a larger
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
79 chunk, and then copy the partly formed object from the end of the old
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
80 chunk to the beginning of the new larger chunk. We then carry on
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
81 accreting characters to the end of the object as we normally would.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
82
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
83 A special macro is provided to add a single char at a time to a
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
84 growing object. This allows the use of register variables, which
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
85 break the ordinary 'growth' macro.
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
86
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
87 Summary:
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
88 We allocate large chunks.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
89 We carve out one object at a time from the current chunk.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
90 Once carved, an object never moves.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
91 We are free to append data of any size to the currently
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
92 growing object.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
93 Exactly one object is growing in an obstack at any one time.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
94 You can run one obstack per control block.
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
95 You may have as many control blocks as you dare.
16235
18a38c9615f0 In commentary, do not use ` to quote.
Paul Eggert <eggert@cs.ucla.edu>
parents: 16201
diff changeset
96 Because of the way we do it, you can "unwind" an obstack
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
97 back to a previous state. (You may remove objects much
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
98 as you would with a stack.)
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
99 */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
100
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
101
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
102 /* Don't do the contents of this file more than once. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
103
1112
13d9cd0b3ac0 update from GNU libc
Jim Meyering <jim@meyering.net>
parents: 995
diff changeset
104 #ifndef _OBSTACK_H
13d9cd0b3ac0 update from GNU libc
Jim Meyering <jim@meyering.net>
parents: 995
diff changeset
105 #define _OBSTACK_H 1
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
106
17779
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
107 #ifndef _OBSTACK_INTERFACE_VERSION
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
108 # define _OBSTACK_INTERFACE_VERSION 2
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
109 #endif
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
110
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
111 #include <stddef.h> /* For size_t and ptrdiff_t. */
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
112 #include <string.h> /* For __GNU_LIBRARY__, and memcpy. */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
113
40036
ebff5813108e obstack, libc-config: Support HP-UX cc in C99 mode.
Bruno Haible <bruno@clisp.org>
parents: 19484
diff changeset
114 #if __STDC_VERSION__ < 199901L || defined __HP_cc
18504
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
115 # define __FLEXIBLE_ARRAY_MEMBER 1
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
116 #else
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
117 # define __FLEXIBLE_ARRAY_MEMBER
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
118 #endif
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
119
17779
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
120 #if _OBSTACK_INTERFACE_VERSION == 1
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
121 /* For binary compatibility with obstack version 1, which used "int"
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
122 and "long" for these two types. */
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
123 # define _OBSTACK_SIZE_T unsigned int
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
124 # define _CHUNK_SIZE_T unsigned long
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
125 # define _OBSTACK_CAST(type, expr) ((type) (expr))
17779
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
126 #else
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
127 /* Version 2 with sane types, especially for 64-bit hosts. */
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
128 # define _OBSTACK_SIZE_T size_t
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
129 # define _CHUNK_SIZE_T size_t
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
130 # define _OBSTACK_CAST(type, expr) (expr)
17779
8ba63d29429e obstack: 64-bit obstack support, part 3
Alan Modra <amodra@gmail.com>
parents: 17778
diff changeset
131 #endif
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
132
5065
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
133 /* If B is the base of an object addressed by P, return the result of
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
134 aligning P to the next multiple of A + 1. B and P must be of type
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
135 char *. A + 1 must be a power of 2. */
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
136
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
137 #define __BPTR_ALIGN(B, P, A) ((B) + (((P) - (B) + (A)) & ~(A)))
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
138
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
139 /* Similar to __BPTR_ALIGN (B, P, A), except optimize the common case
5065
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
140 where pointers can be converted to integers, aligned as integers,
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
141 and converted back again. If ptrdiff_t is narrower than a
5065
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
142 pointer (e.g., the AS/400), play it safe and compute the alignment
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
143 relative to B. Otherwise, use the faster strategy of computing the
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
144 alignment relative to 0. */
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
145
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
146 #define __PTR_ALIGN(B, P, A) \
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
147 __BPTR_ALIGN (sizeof (ptrdiff_t) < sizeof (void *) ? (B) : (char *) 0, \
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
148 P, A)
5065
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
149
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
150 #ifndef __attribute_pure__
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
151 # define __attribute_pure__ _GL_ATTRIBUTE_PURE
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
152 #endif
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
153
18344
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
154 /* Not the same as _Noreturn, since it also works with function pointers. */
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
155 #ifndef __attribute_noreturn__
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
156 # if 2 < __GNUC__ + (8 <= __GNUC_MINOR__) || 0x5110 <= __SUNPRO_C
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
157 # define __attribute_noreturn__ __attribute__ ((__noreturn__))
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
158 # else
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
159 # define __attribute_noreturn__
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
160 # endif
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
161 #endif
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
162
13021
239c17119e60 Ensure no #include statements inside extern "C" { ... }.
Bruno Haible <bruno@clisp.org>
parents: 12559
diff changeset
163 #ifdef __cplusplus
239c17119e60 Ensure no #include statements inside extern "C" { ... }.
Bruno Haible <bruno@clisp.org>
parents: 12559
diff changeset
164 extern "C" {
239c17119e60 Ensure no #include statements inside extern "C" { ... }.
Bruno Haible <bruno@clisp.org>
parents: 12559
diff changeset
165 #endif
239c17119e60 Ensure no #include statements inside extern "C" { ... }.
Bruno Haible <bruno@clisp.org>
parents: 12559
diff changeset
166
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
167 struct _obstack_chunk /* Lives at front of each chunk. */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
168 {
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
169 char *limit; /* 1 past end of this chunk */
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
170 struct _obstack_chunk *prev; /* address of prior chunk or NULL */
18504
eac1ff606131 obstack: port to gcc -fcheck-pointer-bounds
Paul Eggert <eggert@cs.ucla.edu>
parents: 18344
diff changeset
171 char contents[__FLEXIBLE_ARRAY_MEMBER]; /* objects begin here */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
172 };
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
173
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
174 struct obstack /* control current object in current chunk */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
175 {
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
176 _CHUNK_SIZE_T chunk_size; /* preferred size to allocate chunks in */
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
177 struct _obstack_chunk *chunk; /* address of current struct obstack_chunk */
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
178 char *object_base; /* address of object we are building */
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
179 char *next_free; /* where to add next char to current object */
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
180 char *chunk_limit; /* address of char after current chunk */
5065
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
181 union
4ce8ff7e5f06 Port obstack to the AS/400.
Paul Eggert <eggert@cs.ucla.edu>
parents: 5057
diff changeset
182 {
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
183 _OBSTACK_SIZE_T i;
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
184 void *p;
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
185 } temp; /* Temporary for some macros. */
17780
4fbd46593c56 obstack: use size_t alignments and check for overflow
Paul Eggert <eggert@cs.ucla.edu>
parents: 17779
diff changeset
186 _OBSTACK_SIZE_T alignment_mask; /* Mask of alignment for each object. */
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
187
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
188 /* These prototypes vary based on 'use_extra_arg'. */
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
189 union
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
190 {
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
191 void *(*plain) (size_t);
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
192 void *(*extra) (void *, size_t);
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
193 } chunkfun;
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
194 union
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
195 {
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
196 void (*plain) (void *);
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
197 void (*extra) (void *, void *);
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
198 } freefun;
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
199
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
200 void *extra_arg; /* first arg for chunk alloc/dealloc funcs */
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
201 unsigned use_extra_arg : 1; /* chunk alloc/dealloc funcs take extra arg */
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
202 unsigned maybe_empty_object : 1; /* There is a possibility that the current
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
203 chunk contains a zero-length object. This
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
204 prevents freeing the chunk if we allocate
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
205 a bigger chunk to replace it. */
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
206 unsigned alloc_failed : 1; /* No longer used, as we now call the failed
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
207 handler on error, but retained for binary
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
208 compatibility. */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
209 };
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
210
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
211 /* Declare the external functions we use; they are in obstack.c. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
212
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
213 extern void _obstack_newchunk (struct obstack *, _OBSTACK_SIZE_T);
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
214 extern void _obstack_free (struct obstack *, void *);
17780
4fbd46593c56 obstack: use size_t alignments and check for overflow
Paul Eggert <eggert@cs.ucla.edu>
parents: 17779
diff changeset
215 extern int _obstack_begin (struct obstack *,
4fbd46593c56 obstack: use size_t alignments and check for overflow
Paul Eggert <eggert@cs.ucla.edu>
parents: 17779
diff changeset
216 _OBSTACK_SIZE_T, _OBSTACK_SIZE_T,
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
217 void *(*) (size_t), void (*) (void *));
17780
4fbd46593c56 obstack: use size_t alignments and check for overflow
Paul Eggert <eggert@cs.ucla.edu>
parents: 17779
diff changeset
218 extern int _obstack_begin_1 (struct obstack *,
4fbd46593c56 obstack: use size_t alignments and check for overflow
Paul Eggert <eggert@cs.ucla.edu>
parents: 17779
diff changeset
219 _OBSTACK_SIZE_T, _OBSTACK_SIZE_T,
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
220 void *(*) (void *, size_t),
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
221 void (*) (void *, void *), void *);
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
222 extern _OBSTACK_SIZE_T _obstack_memory_used (struct obstack *)
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
223 __attribute_pure__;
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
224
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
225
16235
18a38c9615f0 In commentary, do not use ` to quote.
Paul Eggert <eggert@cs.ucla.edu>
parents: 16201
diff changeset
226 /* Error handler called when 'obstack_chunk_alloc' failed to allocate
2477
27aa55bf95b7 update from glibc -- solely white space changes
Jim Meyering <jim@meyering.net>
parents: 1112
diff changeset
227 more memory. This can be set to a user defined function which
27aa55bf95b7 update from glibc -- solely white space changes
Jim Meyering <jim@meyering.net>
parents: 1112
diff changeset
228 should either abort gracefully or use longjump - but shouldn't
27aa55bf95b7 update from glibc -- solely white space changes
Jim Meyering <jim@meyering.net>
parents: 1112
diff changeset
229 return. The default action is to print a message and abort. */
18344
e78bf6526393 obstack: pacify GCC 6 with -Wnull-dereference
Paul Eggert <eggert@cs.ucla.edu>
parents: 18189
diff changeset
230 extern __attribute_noreturn__ void (*obstack_alloc_failed_handler) (void);
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
231
16235
18a38c9615f0 In commentary, do not use ` to quote.
Paul Eggert <eggert@cs.ucla.edu>
parents: 16201
diff changeset
232 /* Exit value used when 'print_and_abort' is used. */
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
233 extern int obstack_exit_failure;
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
234
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
235 /* Pointer to beginning of object being allocated or to be allocated next.
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
236 Note that this might not be the final address of the object
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
237 because a new chunk might be needed to hold the final size. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
238
5095
0afa9dc2bdfc (obstack_base): Cast to (void *), per documentation.
Jim Meyering <jim@meyering.net>
parents: 5070
diff changeset
239 #define obstack_base(h) ((void *) (h)->object_base)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
240
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
241 /* Size for allocating ordinary chunks. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
242
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
243 #define obstack_chunk_size(h) ((h)->chunk_size)
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
244
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
245 /* Pointer to next byte not yet allocated in current chunk. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
246
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
247 #define obstack_next_free(h) ((void *) (h)->next_free)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
248
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
249 /* Mask specifying low bits that should be clear in address of an object. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
250
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
251 #define obstack_alignment_mask(h) ((h)->alignment_mask)
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
252
4667
117a6d2af03b Remove K&R cruft.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4550
diff changeset
253 /* To prevent prototype warnings provide complete argument list. */
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
254 #define obstack_init(h) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
255 _obstack_begin ((h), 0, 0, \
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
256 _OBSTACK_CAST (void *(*) (size_t), obstack_chunk_alloc), \
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
257 _OBSTACK_CAST (void (*) (void *), obstack_chunk_free))
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
258
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
259 #define obstack_begin(h, size) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
260 _obstack_begin ((h), (size), 0, \
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
261 _OBSTACK_CAST (void *(*) (size_t), obstack_chunk_alloc), \
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
262 _OBSTACK_CAST (void (*) (void *), obstack_chunk_free))
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
263
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
264 #define obstack_specify_allocation(h, size, alignment, chunkfun, freefun) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
265 _obstack_begin ((h), (size), (alignment), \
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
266 _OBSTACK_CAST (void *(*) (size_t), chunkfun), \
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
267 _OBSTACK_CAST (void (*) (void *), freefun))
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
268
4805
8f430f14ff21 Merge changes from glibc obstack; minor cleanups to make it easier to
Paul Eggert <eggert@cs.ucla.edu>
parents: 4804
diff changeset
269 #define obstack_specify_allocation_with_arg(h, size, alignment, chunkfun, freefun, arg) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
270 _obstack_begin_1 ((h), (size), (alignment), \
17792
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
271 _OBSTACK_CAST (void *(*) (void *, size_t), chunkfun), \
7497a1d1d497 obstack: avoid potentially-nonportable function casts
Paul Eggert <eggert@cs.ucla.edu>
parents: 17791
diff changeset
272 _OBSTACK_CAST (void (*) (void *, void *), freefun), arg)
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
273
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
274 #define obstack_chunkfun(h, newchunkfun) \
17795
5c5dad428438 obstack: do not reject malloc-style obstack_chunkfun, obstack_freefun
Paul Eggert <eggert@cs.ucla.edu>
parents: 17792
diff changeset
275 ((void) ((h)->chunkfun.extra = (void *(*) (void *, size_t)) (newchunkfun)))
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
276
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
277 #define obstack_freefun(h, newfreefun) \
17795
5c5dad428438 obstack: do not reject malloc-style obstack_chunkfun, obstack_freefun
Paul Eggert <eggert@cs.ucla.edu>
parents: 17792
diff changeset
278 ((void) ((h)->freefun.extra = (void *(*) (void *, void *)) (newfreefun)))
779
d183d24934d4 from franc,ois
Jim Meyering <jim@meyering.net>
parents: 650
diff changeset
279
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
280 #define obstack_1grow_fast(h, achar) ((void) (*((h)->next_free)++ = (achar)))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
281
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
282 #define obstack_blank_fast(h, n) ((void) ((h)->next_free += (n)))
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
283
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
284 #define obstack_memory_used(h) _obstack_memory_used (h)
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
285
16311
ca5972990d4f obstack: remove __STDC__ conditionals
Paul Eggert <eggert@cs.ucla.edu>
parents: 16235
diff changeset
286 #if defined __GNUC__
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
287 # if !defined __GNUC_MINOR__ || __GNUC__ * 1000 + __GNUC_MINOR__ < 2008
2477
27aa55bf95b7 update from glibc -- solely white space changes
Jim Meyering <jim@meyering.net>
parents: 1112
diff changeset
288 # define __extension__
27aa55bf95b7 update from glibc -- solely white space changes
Jim Meyering <jim@meyering.net>
parents: 1112
diff changeset
289 # endif
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
290
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
291 /* For GNU C, if not -traditional,
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
292 we can define these macros to compute all args only once
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
293 without using a global variable.
16235
18a38c9615f0 In commentary, do not use ` to quote.
Paul Eggert <eggert@cs.ucla.edu>
parents: 16201
diff changeset
294 Also, we can avoid using the 'temp' slot, to make faster code. */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
295
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
296 # define obstack_object_size(OBSTACK) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
297 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
298 ({ struct obstack const *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
299 (_OBSTACK_SIZE_T) (__o->next_free - __o->object_base); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
300
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
301 /* The local variable is named __o1 to avoid a shadowed variable
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
302 warning when invoked from other obstack macros. */
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
303 # define obstack_room(OBSTACK) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
304 __extension__ \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
305 ({ struct obstack const *__o1 = (OBSTACK); \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
306 (_OBSTACK_SIZE_T) (__o1->chunk_limit - __o1->next_free); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
307
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
308 # define obstack_make_room(OBSTACK, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
309 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
310 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
311 _OBSTACK_SIZE_T __len = (length); \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
312 if (obstack_room (__o) < __len) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
313 _obstack_newchunk (__o, __len); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
314 (void) 0; })
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
315
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
316 # define obstack_empty_p(OBSTACK) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
317 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
318 ({ struct obstack const *__o = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
319 (__o->chunk->prev == 0 \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
320 && __o->next_free == __PTR_ALIGN ((char *) __o->chunk, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
321 __o->chunk->contents, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
322 __o->alignment_mask)); })
1112
13d9cd0b3ac0 update from GNU libc
Jim Meyering <jim@meyering.net>
parents: 995
diff changeset
323
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
324 # define obstack_grow(OBSTACK, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
325 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
326 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
327 _OBSTACK_SIZE_T __len = (length); \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
328 if (obstack_room (__o) < __len) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
329 _obstack_newchunk (__o, __len); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
330 memcpy (__o->next_free, where, __len); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
331 __o->next_free += __len; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
332 (void) 0; })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
333
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
334 # define obstack_grow0(OBSTACK, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
335 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
336 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
337 _OBSTACK_SIZE_T __len = (length); \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
338 if (obstack_room (__o) < __len + 1) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
339 _obstack_newchunk (__o, __len + 1); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
340 memcpy (__o->next_free, where, __len); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
341 __o->next_free += __len; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
342 *(__o->next_free)++ = 0; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
343 (void) 0; })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
344
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
345 # define obstack_1grow(OBSTACK, datum) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
346 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
347 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
348 if (obstack_room (__o) < 1) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
349 _obstack_newchunk (__o, 1); \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
350 obstack_1grow_fast (__o, datum); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
351
2990
30966a6478bc Formatting changes.
Jim Meyering <jim@meyering.net>
parents: 2979
diff changeset
352 /* These assume that the obstack alignment is good enough for pointers
30966a6478bc Formatting changes.
Jim Meyering <jim@meyering.net>
parents: 2979
diff changeset
353 or ints, and that the data added so far to the current object
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
354 shares that much alignment. */
479
df93ab9a5de7 Include config.h.
Jim Meyering <jim@meyering.net>
parents: 353
diff changeset
355
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
356 # define obstack_ptr_grow(OBSTACK, datum) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
357 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
358 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
359 if (obstack_room (__o) < sizeof (void *)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
360 _obstack_newchunk (__o, sizeof (void *)); \
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
361 obstack_ptr_grow_fast (__o, datum); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
362
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
363 # define obstack_int_grow(OBSTACK, datum) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
364 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
365 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
366 if (obstack_room (__o) < sizeof (int)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
367 _obstack_newchunk (__o, sizeof (int)); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
368 obstack_int_grow_fast (__o, datum); })
4804
d0a345595720 Don't use lvalue casts, as GCC plans to remove support for them in GCC 3.5.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4667
diff changeset
369
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
370 # define obstack_ptr_grow_fast(OBSTACK, aptr) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
371 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
372 ({ struct obstack *__o1 = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
373 void *__p1 = __o1->next_free; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
374 *(const void **) __p1 = (aptr); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
375 __o1->next_free += sizeof (const void *); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
376 (void) 0; })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
377
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
378 # define obstack_int_grow_fast(OBSTACK, aint) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
379 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
380 ({ struct obstack *__o1 = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
381 void *__p1 = __o1->next_free; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
382 *(int *) __p1 = (aint); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
383 __o1->next_free += sizeof (int); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
384 (void) 0; })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
385
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
386 # define obstack_blank(OBSTACK, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
387 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
388 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
389 _OBSTACK_SIZE_T __len = (length); \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
390 if (obstack_room (__o) < __len) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
391 _obstack_newchunk (__o, __len); \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
392 obstack_blank_fast (__o, __len); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
393
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
394 # define obstack_alloc(OBSTACK, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
395 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
396 ({ struct obstack *__h = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
397 obstack_blank (__h, (length)); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
398 obstack_finish (__h); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
399
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
400 # define obstack_copy(OBSTACK, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
401 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
402 ({ struct obstack *__h = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
403 obstack_grow (__h, (where), (length)); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
404 obstack_finish (__h); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
405
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
406 # define obstack_copy0(OBSTACK, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
407 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
408 ({ struct obstack *__h = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
409 obstack_grow0 (__h, (where), (length)); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
410 obstack_finish (__h); })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
411
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
412 /* The local variable is named __o1 to avoid a shadowed variable
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
413 warning when invoked from other obstack macros, typically obstack_free. */
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
414 # define obstack_finish(OBSTACK) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
415 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
416 ({ struct obstack *__o1 = (OBSTACK); \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
417 void *__value = (void *) __o1->object_base; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
418 if (__o1->next_free == __value) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
419 __o1->maybe_empty_object = 1; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
420 __o1->next_free \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
421 = __PTR_ALIGN (__o1->object_base, __o1->next_free, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
422 __o1->alignment_mask); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
423 if ((size_t) (__o1->next_free - (char *) __o1->chunk) \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
424 > (size_t) (__o1->chunk_limit - (char *) __o1->chunk)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
425 __o1->next_free = __o1->chunk_limit; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
426 __o1->object_base = __o1->next_free; \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
427 __value; })
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
428
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
429 # define obstack_free(OBSTACK, OBJ) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
430 __extension__ \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
431 ({ struct obstack *__o = (OBSTACK); \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
432 void *__obj = (void *) (OBJ); \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
433 if (__obj > (void *) __o->chunk && __obj < (void *) __o->chunk_limit) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
434 __o->next_free = __o->object_base = (char *) __obj; \
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
435 else \
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
436 _obstack_free (__o, __obj); })
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
437
16311
ca5972990d4f obstack: remove __STDC__ conditionals
Paul Eggert <eggert@cs.ucla.edu>
parents: 16235
diff changeset
438 #else /* not __GNUC__ */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
439
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
440 # define obstack_object_size(h) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
441 ((_OBSTACK_SIZE_T) ((h)->next_free - (h)->object_base))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
442
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
443 # define obstack_room(h) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
444 ((_OBSTACK_SIZE_T) ((h)->chunk_limit - (h)->next_free))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
445
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
446 # define obstack_empty_p(h) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
447 ((h)->chunk->prev == 0 \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
448 && (h)->next_free == __PTR_ALIGN ((char *) (h)->chunk, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
449 (h)->chunk->contents, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
450 (h)->alignment_mask))
1112
13d9cd0b3ac0 update from GNU libc
Jim Meyering <jim@meyering.net>
parents: 995
diff changeset
451
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
452 /* Note that the call to _obstack_newchunk is enclosed in (..., 0)
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
453 so that we can avoid having void expressions
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
454 in the arms of the conditional expression.
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
455 Casting the third operand to void was tried before,
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
456 but some compilers won't accept it. */
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
457
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
458 # define obstack_make_room(h, length) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
459 ((h)->temp.i = (length), \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
460 ((obstack_room (h) < (h)->temp.i) \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
461 ? (_obstack_newchunk (h, (h)->temp.i), 0) : 0), \
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
462 (void) 0)
881
bdd51dfe45e2 new obstack from libc
Jim Meyering <jim@meyering.net>
parents: 807
diff changeset
463
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
464 # define obstack_grow(h, where, length) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
465 ((h)->temp.i = (length), \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
466 ((obstack_room (h) < (h)->temp.i) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
467 ? (_obstack_newchunk ((h), (h)->temp.i), 0) : 0), \
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
468 memcpy ((h)->next_free, where, (h)->temp.i), \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
469 (h)->next_free += (h)->temp.i, \
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
470 (void) 0)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
471
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
472 # define obstack_grow0(h, where, length) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
473 ((h)->temp.i = (length), \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
474 ((obstack_room (h) < (h)->temp.i + 1) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
475 ? (_obstack_newchunk ((h), (h)->temp.i + 1), 0) : 0), \
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
476 memcpy ((h)->next_free, where, (h)->temp.i), \
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
477 (h)->next_free += (h)->temp.i, \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
478 *((h)->next_free)++ = 0, \
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
479 (void) 0)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
480
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
481 # define obstack_1grow(h, datum) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
482 (((obstack_room (h) < 1) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
483 ? (_obstack_newchunk ((h), 1), 0) : 0), \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
484 obstack_1grow_fast (h, datum))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
485
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
486 # define obstack_ptr_grow(h, datum) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
487 (((obstack_room (h) < sizeof (char *)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
488 ? (_obstack_newchunk ((h), sizeof (char *)), 0) : 0), \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
489 obstack_ptr_grow_fast (h, datum))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
490
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
491 # define obstack_int_grow(h, datum) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
492 (((obstack_room (h) < sizeof (int)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
493 ? (_obstack_newchunk ((h), sizeof (int)), 0) : 0), \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
494 obstack_int_grow_fast (h, datum))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
495
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
496 # define obstack_ptr_grow_fast(h, aptr) \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
497 (((const void **) ((h)->next_free += sizeof (void *)))[-1] = (aptr), \
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
498 (void) 0)
2990
30966a6478bc Formatting changes.
Jim Meyering <jim@meyering.net>
parents: 2979
diff changeset
499
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
500 # define obstack_int_grow_fast(h, aint) \
17791
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
501 (((int *) ((h)->next_free += sizeof (int)))[-1] = (aint), \
bfa82dd4206c obstack: fix macro return values
Alan Modra <amodra@gmail.com>
parents: 17780
diff changeset
502 (void) 0)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
503
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
504 # define obstack_blank(h, length) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
505 ((h)->temp.i = (length), \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
506 ((obstack_room (h) < (h)->temp.i) \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
507 ? (_obstack_newchunk ((h), (h)->temp.i), 0) : 0), \
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
508 obstack_blank_fast (h, (h)->temp.i))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
509
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
510 # define obstack_alloc(h, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
511 (obstack_blank ((h), (length)), obstack_finish ((h)))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
512
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
513 # define obstack_copy(h, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
514 (obstack_grow ((h), (where), (length)), obstack_finish ((h)))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
515
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
516 # define obstack_copy0(h, where, length) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
517 (obstack_grow0 ((h), (where), (length)), obstack_finish ((h)))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
518
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
519 # define obstack_finish(h) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
520 (((h)->next_free == (h)->object_base \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
521 ? (((h)->maybe_empty_object = 1), 0) \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
522 : 0), \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
523 (h)->temp.p = (h)->object_base, \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
524 (h)->next_free \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
525 = __PTR_ALIGN ((h)->object_base, (h)->next_free, \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
526 (h)->alignment_mask), \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
527 (((size_t) ((h)->next_free - (char *) (h)->chunk) \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
528 > (size_t) ((h)->chunk_limit - (char *) (h)->chunk)) \
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
529 ? ((h)->next_free = (h)->chunk_limit) : 0), \
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
530 (h)->object_base = (h)->next_free, \
17775
742b00324c9b obstack: tidy part 1
Alan Modra <amodra@gmail.com>
parents: 17637
diff changeset
531 (h)->temp.p)
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
532
17636
ae63f4dd18f3 obstack: merge with glibc changes
Paul Eggert <eggert@cs.ucla.edu>
parents: 17576
diff changeset
533 # define obstack_free(h, obj) \
17778
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
534 ((h)->temp.p = (void *) (obj), \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
535 (((h)->temp.p > (void *) (h)->chunk \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
536 && (h)->temp.p < (void *) (h)->chunk_limit) \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
537 ? (void) ((h)->next_free = (h)->object_base = (char *) (h)->temp.p) \
589ffca43f9b obstack: 64-bit obstack support, part 2
Alan Modra <amodra@gmail.com>
parents: 17777
diff changeset
538 : _obstack_free ((h), (h)->temp.p)))
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
539
16311
ca5972990d4f obstack: remove __STDC__ conditionals
Paul Eggert <eggert@cs.ucla.edu>
parents: 16235
diff changeset
540 #endif /* not __GNUC__ */
334
0f8efd187be0 Initial revision
Jim Meyering <jim@meyering.net>
parents:
diff changeset
541
995
f98b28e4e063 update from glibc
Jim Meyering <jim@meyering.net>
parents: 881
diff changeset
542 #ifdef __cplusplus
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 9309
diff changeset
543 } /* C++ */
995
f98b28e4e063 update from glibc
Jim Meyering <jim@meyering.net>
parents: 881
diff changeset
544 #endif
f98b28e4e063 update from glibc
Jim Meyering <jim@meyering.net>
parents: 881
diff changeset
545
17776
4c0240f82735 obstack: tidy part 2
Alan Modra <amodra@gmail.com>
parents: 17775
diff changeset
546 #endif /* _OBSTACK_H */