Add main_type for VMS.

diff --git a/v7/src/microcode/default.h b/v7/src/microcode/default.h
index 65f5b7c8ab7ff4a6e48b74baaed7d539804ffa2a..c5d6f53be635067ab60cf65291cc12ec55f50d98 100644 (file)
--- 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