aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
authorJim Blandy1993-04-10 07:57:21 +0000
committerJim Blandy1993-04-10 07:57:21 +0000
commitb0846f520d496bcd9e8abd9e65e6587e933aedde (patch)
tree7cbc71ef2ceb1b5f921f0d145283c67318d658b0 /src/alloc.c
parent5f1a4d4164565cca7958f606e88bf94ac70424a5 (diff)
downloademacs-b0846f520d496bcd9e8abd9e65e6587e933aedde.tar.gz
emacs-b0846f520d496bcd9e8abd9e65e6587e933aedde.zip
* alloc.c (__malloc_hook, __realloc_hook, __free_hook): Declare
these extern, not static. (!) * alloc.c (__malloc_hook, old_malloc_hook, __realloc_hook, old_realloc_hook): Declare that the functions these point to return void *, not void.
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c23
1 files changed, 13 insertions, 10 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 46941e58181..b0c120bad81 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -207,9 +207,12 @@ xfree (block)
207 GNU malloc. */ 207 GNU malloc. */
208 208
209#ifndef SYSTEM_MALLOC 209#ifndef SYSTEM_MALLOC
210static void (*__malloc_hook) (), (*old_malloc_hook) (); 210extern void * (*__malloc_hook) ();
211static void (*__realloc_hook) (), (*old_realloc_hook) (); 211static void * (*old_malloc_hook) ();
212static void (*__free_hook) (), (*old_free_hook) (); 212extern void * (*__realloc_hook) ();
213static void * (*old_realloc_hook) ();
214extern void (*__free_hook) ();
215static void (*old_free_hook) ();
213 216
214static void 217static void
215emacs_blocked_free (ptr) 218emacs_blocked_free (ptr)
@@ -218,7 +221,7 @@ emacs_blocked_free (ptr)
218 BLOCK_INPUT; 221 BLOCK_INPUT;
219 __free_hook = old_free_hook; 222 __free_hook = old_free_hook;
220 free (ptr); 223 free (ptr);
221 __free_hook = &emacs_blocked_free; 224 __free_hook = emacs_blocked_free;
222 UNBLOCK_INPUT; 225 UNBLOCK_INPUT;
223} 226}
224 227
@@ -231,7 +234,7 @@ emacs_blocked_malloc (size)
231 BLOCK_INPUT; 234 BLOCK_INPUT;
232 __malloc_hook = old_malloc_hook; 235 __malloc_hook = old_malloc_hook;
233 value = malloc (size); 236 value = malloc (size);
234 __malloc_hook = &emacs_blocked_malloc; 237 __malloc_hook = emacs_blocked_malloc;
235 UNBLOCK_INPUT; 238 UNBLOCK_INPUT;
236 239
237 return value; 240 return value;
@@ -247,7 +250,7 @@ emacs_blocked_realloc (ptr, size)
247 BLOCK_INPUT; 250 BLOCK_INPUT;
248 __realloc_hook = old_realloc_hook; 251 __realloc_hook = old_realloc_hook;
249 value = realloc (ptr, size); 252 value = realloc (ptr, size);
250 __realloc_hook = &emacs_blocked_realloc; 253 __realloc_hook = emacs_blocked_realloc;
251 UNBLOCK_INPUT; 254 UNBLOCK_INPUT;
252 255
253 return value; 256 return value;
@@ -257,13 +260,13 @@ void
257uninterrupt_malloc () 260uninterrupt_malloc ()
258{ 261{
259 old_free_hook = __free_hook; 262 old_free_hook = __free_hook;
260 __free_hook = &emacs_blocked_free; 263 __free_hook = emacs_blocked_free;
261 264
262 old_malloc_hook = __malloc_hook; 265 old_malloc_hook = __malloc_hook;
263 __malloc_hook = &emacs_blocked_malloc; 266 __malloc_hook = emacs_blocked_malloc;
264 267
265 old_realloc_hook = __realloc_hook; 268 old_realloc_hook = __realloc_hook;
266 __realloc_hook = &emacs_blocked_realloc; 269 __realloc_hook = emacs_blocked_realloc;
267} 270}
268#endif 271#endif
269 272
@@ -1589,7 +1592,7 @@ mark_object (objptr)
1589 ptr = ptr->next; 1592 ptr = ptr->next;
1590 if (ptr) 1593 if (ptr)
1591 { 1594 {
1592 ptrx = ptr; /* Use pf ptrx avoids compiler bug on Sun */ 1595 ptrx = ptr; /* Use of ptrx avoids compiler bug on Sun */
1593 XSETSYMBOL (obj, ptrx); 1596 XSETSYMBOL (obj, ptrx);
1594 goto loop; 1597 goto loop;
1595 } 1598 }