HCoop
/
bpt
/
guile.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* *.c: Finish replacing K&R style prototypes with ANSI C
[bpt/guile.git]
/
libguile
/
alloca.c
diff --git
a/libguile/alloca.c
b/libguile/alloca.c
index
0980dd7
..
55e2a86
100644
(file)
--- a/
libguile/alloca.c
+++ b/
libguile/alloca.c
@@
-21,6
+21,9
@@
allocating any. It is a good idea to use alloca(0) in
your main control loop, etc. to force garbage collection. */
allocating any. It is a good idea to use alloca(0) in
your main control loop, etc. to force garbage collection. */
+/* Software engineering face-lift by Greg J. Badros, 11-Dec-1999,
+ gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */
+
#ifdef HAVE_CONFIG_H
#include <scmconfig.h>
#endif
#ifdef HAVE_CONFIG_H
#include <scmconfig.h>
#endif
@@
-153,8
+156,7
@@
static header *last_alloca_header = NULL; /* -> last alloca header. */
implementations of C, for example under Gould's UTX/32. */
pointer
implementations of C, for example under Gould's UTX/32. */
pointer
-alloca (size)
- unsigned size;
+alloca (unsigned size)
{
auto char probe; /* Probes stack depth: */
register char *depth = ADDRESS_FUNCTION (probe);
{
auto char probe; /* Probes stack depth: */
register char *depth = ADDRESS_FUNCTION (probe);