From: Guillermo J. Rozas <edu/mit/csail/zurich/gjr>
Date: Tue, 15 Jun 1993 19:04:55 +0000 (+0000)
Subject: Add support for C back end.
X-Git-Tag: 20090517-FFI~8330
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=813c81ab37be7766a911ce9b21d1e07783c7b825;p=mit-scheme.git

Add support for C back end.
---

diff --git a/v7/src/microcode/config.h b/v7/src/microcode/config.h
index 90d03f920..e843ff78a 100644
--- a/v7/src/microcode/config.h
+++ b/v7/src/microcode/config.h
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: config.h,v 9.78 1993/02/06 05:33:20 gjr Exp $
+$Id: config.h,v 9.79 1993/06/15 19:04:55 gjr Exp $
 
 Copyright (c) 1987-1993 Massachusetts Institute of Technology
 
@@ -590,6 +590,13 @@ extern void * alpha_heap_malloc (long);
 #define HAS_FREXP
 #endif /* apollo */
 
+#ifdef NATIVE_CODE_IS_C
+#  define HAS_COMPILER_SUPPORT
+#  ifndef TYPE_CODE_LENGTH
+#    define TYPE_CODE_LENGTH 6
+#  endif
+#endif
+
 /* Make sure that some definition applies.  If this error occurs, and
    the parameters of the configuration are unknown, try the Wsize
    program.  */
@@ -604,7 +611,7 @@ extern void * alpha_heap_malloc (long);
 #endif
 
 #ifndef TYPE_CODE_LENGTH
-#define TYPE_CODE_LENGTH 8
+#  define TYPE_CODE_LENGTH 8
 #endif
 
 /* The GNU C compiler does not have any of these bugs. */