* *.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.  */
 
+/* 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
@@ -153,8 +156,7 @@ static header *last_alloca_header = NULL;   /* -> last alloca header.  */
    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);