From ff89b67fc0e815c99bf5bba925f878c1b8368f35 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Thu, 31 Mar 1988 04:39:47 +0000 Subject: [PATCH] Save standard runtime system in "runtime.bin" instead of "scheme.bin". --- etc/mkband.scm | 14 ++++---------- 1 file changed, 4 insertions(+), 10 deletions(-) diff --git a/etc/mkband.scm b/etc/mkband.scm index 24f8ee2fe..60201752a 100644 --- a/etc/mkband.scm +++ b/etc/mkband.scm @@ -1,17 +1,11 @@ ;;; -*- Scheme -*- - +;;; $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/etc/mkband.scm,v 1.2 1988/03/31 04:39:47 cph Exp $ +;;; Input file to build standard bands. ((access finish-load runtime-system)) - (set-working-directory-pathname! "../sf") - (load "make.bin" system-global-environment) - (set-working-directory-pathname! "../runtime") - -(disk-save "scheme.bin") - +(disk-save "runtime.bin") (load "sbuild.bin" system-global-environment) - (disk-save "sicp.bin") - -(%exit) +(%exit) \ No newline at end of file -- 2.25.1