From 4fda2230781488c689d5f3f83d79b33691d6d9b7 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Wed, 12 Dec 1990 03:08:46 +0000
Subject: [PATCH] Rewrite for 7.1.0 release.

---
 etc/make_runtime | 4 ++--
 etc/mkband.scm   | 6 ++----
 2 files changed, 4 insertions(+), 6 deletions(-)

diff --git a/etc/make_runtime b/etc/make_runtime
index be550e8ff..1d1b20260 100755
--- a/etc/make_runtime
+++ b/etc/make_runtime
@@ -1,5 +1,5 @@
 #!/bin/csh -f
 # Script to generate standard runtime band from binaries.
-# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/make_runtime,v 1.1 1989/07/26 22:52:10 cph Rel $
+# $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/make_runtime,v 1.2 1990/12/12 03:08:46 cph Exp $
 cd runtime
-exec ../microcode/scheme -utabmd ../lib/utabmd.bin -fasl make.bin < ../etc/mkband.scm
+exec ../microcode/scheme -library ../lib -fasl make.bin < ../etc/mkband.scm
diff --git a/etc/mkband.scm b/etc/mkband.scm
index 1de660303..0b43b5de6 100644
--- a/etc/mkband.scm
+++ b/etc/mkband.scm
@@ -1,10 +1,8 @@
-n;;; -*- Scheme -*-
-;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/mkband.scm,v 1.4 1989/07/26 23:14:57 cph Rel $
+;;; -*- Scheme -*-
+;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/mkband.scm,v 1.5 1990/12/12 03:07:58 cph Exp $
 ;;; Input file to build standard bands.
-;;; NOTE: The `n' at the beginning of this file is not a typo!
 
 (set-working-directory-pathname! "../sf")
 (load "make")
-n
 (disk-save "../lib/runtime.com")
 (%exit)
\ No newline at end of file
-- 
2.25.1