From 052f58b58f72532445b4f076570b964d9a2bb4f9 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 14 Nov 1990 10:59:06 +0000
Subject: [PATCH] Use MC68010 instead of MC68020.

---
 v7/src/microcode/mul.c          |  8 ++++----
 v7/src/microcode/unxutl/ymkfile | 12 ++++++++++--
 v8/src/microcode/mul.c          |  8 ++++----
 3 files changed, 18 insertions(+), 10 deletions(-)

diff --git a/v7/src/microcode/mul.c b/v7/src/microcode/mul.c
index d7235c44f..eb27343ce 100644
--- 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 */
 
 #endif /* (TYPE_CODE_LENGTH == 8) */
diff --git a/v7/src/microcode/unxutl/ymkfile b/v7/src/microcode/unxutl/ymkfile
index 3de09cd11..6059cd0ae 100644
--- 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 04a2843d2..b78cb1cb4 100644
--- 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 */
 
 #endif /* (TYPE_CODE_LENGTH == 8) */
-- 
2.25.1