From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Wed, 15 Jan 1992 17:34:23 +0000 (+0000)
Subject: Protoize headers.
X-Git-Tag: 20090517-FFI~9980
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=6d0d9798ee8c4fc097553967e4e740b15b879cd3;p=mit-scheme.git

Protoize headers.
---

diff --git a/v7/src/microcode/prim.h b/v7/src/microcode/prim.h
index fc8457b69..89b78715a 100644
--- a/v7/src/microcode/prim.h
+++ b/v7/src/microcode/prim.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/prim.h,v 9.41 1989/09/20 23:10:39 cph Rel $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/prim.h,v 9.42 1992/01/15 17:29:50 jinx Exp $
 
-Copyright (c) 1987, 1988, 1989 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -36,7 +36,7 @@ MIT in each case. */
    Note that the following cannot be changed without changing
    Findprim.c. */
 
-extern SCHEME_OBJECT (*(Primitive_Procedure_Table[]))();
+extern SCHEME_OBJECT EXFUN ((*(Primitive_Procedure_Table[])), (void));
 extern int Primitive_Arity_Table[];
 extern int Primitive_Count_Table[];
 extern char *Primitive_Name_Table[];
diff --git a/v7/src/microcode/psbmap.h b/v7/src/microcode/psbmap.h
index 435f15224..17811a8ef 100644
--- a/v7/src/microcode/psbmap.h
+++ b/v7/src/microcode/psbmap.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/psbmap.h,v 9.33 1991/07/03 01:32:18 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/psbmap.h,v 9.34 1992/01/15 17:31:41 jinx Exp $
 
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -35,6 +35,9 @@ MIT in each case. */
 /* This file contains macros and declarations for "Bintopsb.c"
    and "Psbtobin.c". */
 
+#ifndef PSBMAP_H_INCLUDED
+#define PSBMAP_H_INCLUDED
+
 /* These definitions insure that the appropriate code is extracted
    from the included files.
 */
@@ -52,7 +55,9 @@ MIT in each case. */
 #include "const.h"
 #include "gccode.h"
 
-extern double frexp(), ldexp();
+extern double
+  EXFUN (frexp, (double, int *)),
+  EXFUN (ldexp, (double, int));
 
 #define PORTABLE_VERSION	5
 
@@ -254,3 +259,5 @@ KEYWORD("input", &input_file_name, STRING_KYWRD, SFRMT, NULL)
 
 #define OUTPUT_KEYWORD()					\
 KEYWORD("output", &output_file_name, STRING_KYWRD, SFRMT, NULL)
+
+#endif /* PSBMAP_H_INCLUDED */
diff --git a/v7/src/microcode/usrdef.h b/v7/src/microcode/usrdef.h
index 4d6b6c678..d7016aaed 100644
--- a/v7/src/microcode/usrdef.h
+++ b/v7/src/microcode/usrdef.h
@@ -1,6 +1,8 @@
 /* -*-C-*-
 
-Copyright (c) 1987, 1988 Massachusetts Institute of Technology
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/usrdef.h,v 9.38 1992/01/15 17:34:23 jinx Exp $
+
+Copyright (c) 1987-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -30,10 +32,9 @@ Technology nor of any adaptation thereof in any advertising,
 promotional, or sales literature without prior written consent from
 MIT in each case. */
 
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/usrdef.h,v 9.37 1988/08/15 20:57:37 cph Rel $ */
-
 /* Macros and header for usrdef.c and variants. */
 
+#include "ansidecl.h"
 #include "config.h"
 #include "object.h"
 #include "errors.h"
@@ -41,5 +42,5 @@ MIT in each case. */
 #include "prims.h"
 
 extern void
-  Microcode_Termination(),
-  signal_error_from_primitive();
+  EXFUN (Microcode_Termination, (int)),
+  EXFUN (signal_error_from_primitive, (long));
diff --git a/v8/src/microcode/psbmap.h b/v8/src/microcode/psbmap.h
index 4d868deb7..312b0249a 100644
--- a/v8/src/microcode/psbmap.h
+++ b/v8/src/microcode/psbmap.h
@@ -1,8 +1,8 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/psbmap.h,v 9.33 1991/07/03 01:32:18 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/psbmap.h,v 9.34 1992/01/15 17:31:41 jinx Exp $
 
-Copyright (c) 1987-91 Massachusetts Institute of Technology
+Copyright (c) 1987-92 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -35,6 +35,9 @@ MIT in each case. */
 /* This file contains macros and declarations for "Bintopsb.c"
    and "Psbtobin.c". */
 
+#ifndef PSBMAP_H_INCLUDED
+#define PSBMAP_H_INCLUDED
+
 /* These definitions insure that the appropriate code is extracted
    from the included files.
 */
@@ -52,7 +55,9 @@ MIT in each case. */
 #include "const.h"
 #include "gccode.h"
 
-extern double frexp(), ldexp();
+extern double
+  EXFUN (frexp, (double, int *)),
+  EXFUN (ldexp, (double, int));
 
 #define PORTABLE_VERSION	5
 
@@ -254,3 +259,5 @@ KEYWORD("input", &input_file_name, STRING_KYWRD, SFRMT, NULL)
 
 #define OUTPUT_KEYWORD()					\
 KEYWORD("output", &output_file_name, STRING_KYWRD, SFRMT, NULL)
+
+#endif /* PSBMAP_H_INCLUDED */