From 8cef6e56d941d20db1d7ada0dd67923c4bb80b95 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Sat, 29 Jun 2019 19:49:15 +0200
Subject: [PATCH] Make a KLDCP front end directory.

Having the .KLFE.; KLDCP (DIR) file first on the tape practically
guarantees SALV will make store it in contiguous sectors on disk,
which is required by the front end.
---
 Makefile   | 16 +++++++++++++---
 tools/dasm |  2 +-
 2 files changed, 14 insertions(+), 4 deletions(-)

diff --git a/Makefile b/Makefile
index 1bd35bfc..0380c91f 100644
--- a/Makefile
+++ b/Makefile
@@ -64,6 +64,7 @@ MAGFRM=tools/dasm/magfrm
 GT40=tools/simh/BIN/pdp11 $(OUT)/bootvt.img
 TV11=tools/tv11/tv11
 PDP6=tools/pdp6/emu/pdp6
+KLFEDR=tools/dasm/klfedr
 
 H3TEXT=$(shell cd build; ls h3text.*)
 DDT=$(shell cd src; ls sysen1/ddt.* syseng/lsrtns.* syseng/msgs.* syseng/datime.* syseng/ntsddt.*)
@@ -119,11 +120,20 @@ $(OUT)/ka-minsys.tape: $(ITSTAR) $(OUT)/system
 	$(ITSTAR) -cf $@ -C bin/ka10 _ sys
 	$(ITSTAR) -rf $@ -C bin/minsys sys
 
-$(OUT)/kl-minsys.tape: $(ITSTAR) $(OUT)/system
+leftparen:=(
+rightparen:=)
+KLDCPDIR=$(OUT)/_klfe_/kldcp.$(leftparen)dir$(rightparen)
+
+$(OUT)/kl-minsys.tape: $(ITSTAR) $(OUT)/system $(KLDCPDIR)
 	$(MKDIR) $(OUT)
-	$(ITSTAR) -cf $@ -C bin/kl10 _ sys
+	$(ITSTAR) -cf $@ -C $(OUT) _klfe_
+	$(ITSTAR) -rf $@ -C bin/kl10 _ sys
 	$(ITSTAR) -rf $@ -C bin/minsys sys
 
+$(KLDCPDIR): $(KLFEDR)
+	$(MKDIR) $(OUT)/_klfe_
+	$(KLFEDR) > "$(OUT)/_klfe_/kldcp.$(leftparen)dir$(rightparen)"
+
 $(OUT)/sources.tape: $(ITSTAR) build/$(EMULATOR)/stamp $(OUT)/syshst/$(H3TEXT)
 	$(MKDIR) $(OUT)
 	$(RM) -f src/*/*~
@@ -238,7 +248,7 @@ $(ITSTAR):
 $(WRITETAPE):
 	$(MAKE) -C tools/tapeutils
 
-$(MAGFRM):
+$(MAGFRM) $(KLFEDR):
 	$(MAKE) -C tools/dasm
 
 $(TV11):
diff --git a/tools/dasm b/tools/dasm
index 16ce6ecb..9d5d4a3f 160000
--- a/tools/dasm
+++ b/tools/dasm
@@ -1 +1 @@
-Subproject commit 16ce6ecb6353f8fb5efc6e5f6fdcd547f45323e4
+Subproject commit 9d5d4a3f89a322f22bbabc49555a975b449d1b9b