From: Chris Hanson <org/chris-hanson/cph>
Date: Mon, 25 Sep 2006 04:36:56 +0000 (+0000)
Subject: If <stdlib.h> is available, use that rather than explicitly declaring
X-Git-Tag: 20090517-FFI~930
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=838ff74e6538e918692bd9177dce505641fe30f0;p=mit-scheme.git

If <stdlib.h> is available, use that rather than explicitly declaring
malloc and realloc.
---

diff --git a/v7/src/microcode/cmpauxmd/c.c b/v7/src/microcode/cmpauxmd/c.c
index c412cd910..90a4ad102 100644
--- a/v7/src/microcode/cmpauxmd/c.c
+++ b/v7/src/microcode/cmpauxmd/c.c
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Id: c.c,v 1.16 2006/09/16 11:19:09 gjr Exp $
+$Id: c.c,v 1.17 2006/09/25 04:36:56 cph Exp $
 
-Copyright (c) 1992-1999, 2002, 2006 Massachusetts Institute of Technology
+Copyright 1993,2002,2006 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -30,6 +30,13 @@ USA.
 #include "bignum.h"
 #include "bitstr.h"
 #include "avltree.h"
+
+#ifdef HAVE_STDLIB_H
+#  include <stdlib.h>
+#else
+   extern PTR EXFUN (malloc, (unsigned long));
+   extern PTR EXFUN (realloc, (PTR, unsigned long));
+#endif
 
 #ifdef BUG_GCC_LONG_CALLS
 
@@ -171,9 +178,6 @@ DEFUN (unspecified_code, (entry, dispatch),
   return (&dummy_entry);
 }
 
-extern PTR EXFUN (malloc, (unsigned long));
-extern PTR EXFUN (realloc, (PTR, unsigned long));
-
 PTR
 DEFUN (lrealloc, (ptr, size), PTR ptr AND unsigned long size)
 {