From c2646764acbe603a6bd8bf1f5df2560d56a5e403 Mon Sep 17 00:00:00 2001
From: "Guillermo J. Rozas" <edu/mit/csail/zurich/gjr>
Date: Thu, 18 Jun 1987 19:54:28 +0000
Subject: [PATCH] Add main_type for VMS.

---
 v7/src/microcode/default.h | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/v7/src/microcode/default.h b/v7/src/microcode/default.h
index 65f5b7c8a..c5d6f53be 100644
--- a/v7/src/microcode/default.h
+++ b/v7/src/microcode/default.h
@@ -30,7 +30,7 @@ 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/Attic/default.h,v 9.23 1987/06/18 19:18:57 jinx Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/Attic/default.h,v 9.24 1987/06/18 19:54:28 jinx Exp $
  *
  * This file contains default definitions for some hooks which 
  * various machines require.  These machines define these hooks
@@ -116,6 +116,10 @@ extern Pointer Swap_Temp;
 
 /* Used in BOOT.C */
 
+#ifndef main_type
+#define main_type void
+#endif
+
 #ifndef term_type
 #define term_type void
 #endif
-- 
2.25.1