From 8e35d981420c536096f4fe6061965778eeda4c5d Mon Sep 17 00:00:00 2001
From: Lassi Kortela <lassi@lassi.io>
Date: Fri, 9 Aug 2019 15:53:31 +0300
Subject: [PATCH] Move bootstrap images into a scheme-boot directory

---
 {scheme-core => scheme-boot}/flisp.boot | 0
 scheme-core/mkboot1.scm                 | 2 +-
 scripts/build.sh                        | 5 +++--
 3 files changed, 4 insertions(+), 3 deletions(-)
 rename {scheme-core => scheme-boot}/flisp.boot (100%)

diff --git a/scheme-core/flisp.boot b/scheme-boot/flisp.boot
similarity index 100%
rename from scheme-core/flisp.boot
rename to scheme-boot/flisp.boot
diff --git a/scheme-core/mkboot1.scm b/scheme-core/mkboot1.scm
index 030a2e9..5edd94c 100644
--- a/scheme-core/mkboot1.scm
+++ b/scheme-core/mkboot1.scm
@@ -2,4 +2,4 @@
 
 (load "system.scm")
 (load "compiler.scm")
-(make-system-image "flisp.boot")
+(make-system-image "flisp.boot.new")
diff --git a/scripts/build.sh b/scripts/build.sh
index 0f0c2bc..1e37012 100755
--- a/scripts/build.sh
+++ b/scripts/build.sh
@@ -38,18 +38,19 @@ $CC $LFLAGS -o flisp -lm \
     builtins.o equalhash.o flisp.o flmain.o iostream.o string.o table.o \
     bitvector-ops.o bitvector.o dirpath.o dump.o hashing.o htable.o \
     int2str.o ios.o lltinit.o ptrhash.o random.o socket.o timefuncs.o utf8.o
-ln -s ../scheme-core/flisp.boot flisp.boot
+ln -s ../scheme-boot/flisp.boot flisp.boot
 { set +x; } 2>/dev/null
 cd ../scheme-core
 echo "Entering directory '$PWD'"
 echo "Creating stage 0 boot file..."
 set -x
 ../"$builddir"/flisp mkboot0.scm system.scm compiler.scm >flisp.boot.new
-mv flisp.boot.new flisp.boot
+mv flisp.boot.new ../scheme-boot/flisp.boot
 { set +x; } 2>/dev/null
 echo "Creating stage 1 boot file..."
 set -x
 ../"$builddir"/flisp mkboot1.scm
+mv flisp.boot.new ../scheme-boot/flisp.boot
 { set +x; } 2>/dev/null
 cd ../scheme-tests
 echo "Entering directory '$PWD'"