diff --git a/6502/C64/Makefile b/6502/C64/Makefile index 0694782..8217311 100644 --- a/6502/C64/Makefile +++ b/6502/C64/Makefile @@ -47,7 +47,7 @@ run-testbase16: emulator/testbase16.T64 # Targetcompiler targets cbmfiles/tcbase: emulator/c64-testbase.T64 emulator/build-tcbase.sh \ - disks/vforth4_2.d64 disks/tc38q.d64 cbmfiles/mk-tcbase.fth + disks/tc38q.d64 cbmfiles/tc-base.fth emulator/build-tcbase.sh cbmfiles/c64-vf-latest: emulator/tcbase.T64 emulator/build-c64forth.sh \ diff --git a/6502/C64/cbmfiles/tcbase b/6502/C64/cbmfiles/tcbase index 0ff1c57..cdbdb8d 100644 Binary files a/6502/C64/cbmfiles/tcbase and b/6502/C64/cbmfiles/tcbase differ diff --git a/6502/C64/emulator/build-tcbase.sh b/6502/C64/emulator/build-tcbase.sh index 01cac95..45bf1a6 100755 --- a/6502/C64/emulator/build-tcbase.sh +++ b/6502/C64/emulator/build-tcbase.sh @@ -1,4 +1,7 @@ #!/bin/bash +# build script for the resident part of the target compiler running +# on the C64. + set -e emulatordir="$(dirname "${BASH_SOURCE[0]}")" @@ -6,8 +9,8 @@ basedir="$(realpath --relative-to="$PWD" "${emulatordir}/..")" rm -f "${basedir}/cbmfiles/tcbase" -keybuf="2 drive 4 load\ninclude mk-tcbase.fth\n\ +keybuf="2 drive 4 load\ninclude tc-base.fth\n\ savesystem tcbase\ndos s0:notdone\n" -DISK9=vforth4_2 DISK10=tc38q "${emulatordir}/run-in-vice.sh" \ +DISK10=tc38q "${emulatordir}/run-in-vice.sh" \ "c64-testbase" "${keybuf}" diff --git a/6502/C64/src/mk-tcbase.fth b/6502/C64/src/tc-base.fth similarity index 56% rename from 6502/C64/src/mk-tcbase.fth rename to 6502/C64/src/tc-base.fth index 54a605f..ba4e7e2 100644 --- a/6502/C64/src/mk-tcbase.fth +++ b/6502/C64/src/tc-base.fth @@ -1,5 +1,7 @@ -: edit list ; +\ loadfile for the resident part of the target compiler. + +' list alias edit : .blk ( -) blk @ ?dup IF ." Blk " u. ?cr THEN ;