First automated targetcompiler run

6502/C64/Makefile

@@ -34,6 +34,17 @@ run-testbase16: emulator/testbase16.T64
 	VICE=xplus4 emulator/run-in-vice.sh testbase16
 
 
+# Targetcompiler targets
+
+cbmfiles/tcbase: emulator/testbase.T64 emulator/build-tcbase.sh \
+    disks/vforth4_2.d64  disks/tc38q.d64 cbmfiles/mk-tcbase.fth
+	emulator/build-tcbase.sh
+
+cbmfiles/vf83-c64: emulator/tcbase.T64 emulator/build-c64forth.sh \
+    disks/vforth4_2.d64  disks/tc38q.d64 cbmfiles/mk-c64forth.fth
+	emulator/build-c64forth.sh
+
+
 # Core test targets
 
 test-c64.result: emulator/testbase.T64 $(test_files_petscii) \
@@ -78,6 +89,9 @@ emulator/%.T64: cbmfiles/%
 
 # Generic rule for populating cbmfiles/ with PETSCII text files
 
+cbmfiles/%.fth: src/%.fth
+	ascii2petscii $< $@
+
 cbmfiles/%.fth: tests/%.fth
 	ascii2petscii $< $@
 

6502/C64/emulator/build-c64forth.sh

@@ -0,0 +1,13 @@
+#!/bin/bash
+set -e
+
+emulatordir="$(dirname "${BASH_SOURCE[0]}")"
+basedir="$(realpath --relative-to="$PWD" "${emulatordir}/..")"
+
+rm -f "${basedir}/cbmfiles/vf83-c64"
+
+keybuf="include mk-c64forth.fth\n\
+save-target vf83-c64\ndos s0:notdone\n"
+
+DISK9=vforth4_2 DISK10=tc38q "${emulatordir}/run-in-vice.sh" \
+  "tcbase" "${keybuf}"

6502/C64/emulator/build-tcbase.sh

@@ -0,0 +1,13 @@
+#!/bin/bash
+set -e
+
+emulatordir="$(dirname "${BASH_SOURCE[0]}")"
+basedir="$(realpath --relative-to="$PWD" "${emulatordir}/..")"
+
+rm -f "${basedir}/cbmfiles/tcbase"
+
+keybuf="2 drive 4 load\ninclude mk-tcbase.fth\n\
+savesystem tcbase\ndos s0:notdone\n"
+
+DISK9=vforth4_2 DISK10=tc38q "${emulatordir}/run-in-vice.sh" \
+  "testbase" "${keybuf}"

6502/C64/src/mk-c64forth.fth

@@ -0,0 +1,6 @@
+
+hex
+
+2 drive 27 30 thru
+
+1 drive f load

6502/C64/src/mk-tcbase.fth

@@ -0,0 +1,12 @@
+
+: edit  list ;
+
+: .blk  ( -)
+ blk @ ?dup IF  ."  Blk " u. ?cr  THEN ;
+
+' .blk is .status
+
+hex
+
+2 drive 10 load
+