Use MC68010 instead of MC68020.

diff --git a/v7/src/microcode/mul.c b/v7/src/microcode/mul.c
index d7235c44fb937a2ec7552a4f83cc2206e97f454a..eb27343ceaf22edd06ace100270772bb0425cc67 100644 (file)
--- a/v7/src/microcode/mul.c
+++ b/v7/src/microcode/mul.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/mul.c,v 9.29 1990/06/20 17:41:36 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/mul.c,v 9.30 1990/11/14 10:58:49 cph Rel $
 
 Copyright (c) 1987, 1988, 1989, 1990 Massachusetts Institute of Technology
 
@@ -115,7 +115,7 @@ Mul (Arg1, Arg2)
 #include "Error: types changed.  Change assembly language appropriately"
 #endif
 
-#if defined(MC68020)
+#ifndef MC68010 /* MC68020, MC68030, or MC68040 */
 
 static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
 
@@ -136,7 +136,7 @@ static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
        asm("   rts");
        asm("   data");
 
-#else  /* not MC68020, but 68k family */
+#else  /* MC68010 */
 
        /* 20(sp) = arg0; 24(sp) = arg1 because of movem */
 
@@ -196,7 +196,7 @@ static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
        asm("   rts");
        asm("   data");
 
-#endif /* not MC68020 */
+#endif /* MC68010 */
 #endif  /* hp9000s300 */
 \f
 #endif /* (TYPE_CODE_LENGTH == 8) */

diff --git a/v7/src/microcode/unxutl/ymkfile b/v7/src/microcode/unxutl/ymkfile
index 3de09cd11f58060fab0f707fa236feb0deda5094..6059cd0ae293f0128dbfd0097f216f08e372dd88 100644 (file)
--- a/v7/src/microcode/unxutl/ymkfile
+++ b/v7/src/microcode/unxutl/ymkfile
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/unxutl/Attic/ymkfile,v 1.32 1990/11/13 08:45:37 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/unxutl/Attic/ymkfile,v 1.33 1990/11/14 10:59:06 cph Exp $
 
 Copyright (c) 1989, 1990 Massachusetts Institute of Technology
 
@@ -161,12 +161,20 @@ GRAPHICS_LIBS =
 
 #if (PROC_TYPE == PROC_TYPE_68020)
 #define PROC_TYPE_KNOWN
-MACHINE_SWITCHES = -DMC68020 -DHAS_COMPILER_SUPPORT
+MACHINE_SWITCHES = -DHAS_COMPILER_SUPPORT
 MACHINE_SOURCES = cmpint.c cmpaux-mc68k.m4
 MACHINE_OBJECTS = cmpint.o cmpaux-mc68k.o
 GC_HEAD_FILES = gccode.h cmpgc.h cmpint-mc68k.h
 #endif /* PROC_TYPE_68020 */
 
+#if (PROC_TYPE == PROC_TYPE_68000)
+#define PROC_TYPE_KNOWN
+MACHINE_SWITCHES = -DMC68010
+MACHINE_SOURCES = cmpint.c
+MACHINE_OBJECTS = cmpint.o
+GC_HEAD_FILES = gccode.h cmpgc.h
+#endif /* PROC_TYPE_68000 */
+
 #if (PROC_TYPE == PROC_TYPE_VAX)
 #define PROC_TYPE_KNOWN
 MACHINE_SWITCHES = -DHAS_COMPILER_SUPPORT

diff --git a/v8/src/microcode/mul.c b/v8/src/microcode/mul.c
index 04a2843d20c8a8ed743bc09f3ed250dfc3968115..b78cb1cb4b56e021c4dd849d45e0f58a4ff2595f 100644 (file)
--- a/v8/src/microcode/mul.c
+++ b/v8/src/microcode/mul.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/mul.c,v 9.29 1990/06/20 17:41:36 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/microcode/mul.c,v 9.30 1990/11/14 10:58:49 cph Rel $
 
 Copyright (c) 1987, 1988, 1989, 1990 Massachusetts Institute of Technology
 
@@ -115,7 +115,7 @@ Mul (Arg1, Arg2)
 #include "Error: types changed.  Change assembly language appropriately"
 #endif
 
-#if defined(MC68020)
+#ifndef MC68010 /* MC68020, MC68030, or MC68040 */
 
 static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
 
@@ -136,7 +136,7 @@ static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
        asm("   rts");
        asm("   data");
 
-#else  /* not MC68020, but 68k family */
+#else  /* MC68010 */
 
        /* 20(sp) = arg0; 24(sp) = arg1 because of movem */
 
@@ -196,7 +196,7 @@ static long Fixnum_Range[2] = {SMALLEST_FIXNUM , BIGGEST_FIXNUM};
        asm("   rts");
        asm("   data");
 
-#endif /* not MC68020 */
+#endif /* MC68010 */
 #endif  /* hp9000s300 */
 \f
 #endif /* (TYPE_CODE_LENGTH == 8) */