From 3b8db813a8c296dbae5de807acf8f6b1624ac01f Mon Sep 17 00:00:00 2001
From: Philip Zembrod <pzembrod@google.com>
Date: Wed, 4 Nov 2020 16:35:54 +0100
Subject: [PATCH] Move platform-specific (bye from fv-sys-cbm.fth to
 platform-specific files.

---
 6502/C64/src/vf-sys-c16.fth | 4 ++++
 6502/C64/src/vf-sys-c64.fth | 2 ++
 6502/C64/src/vf-sys-cbm.fth | 6 ------
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/6502/C64/src/vf-sys-c16.fth b/6502/C64/src/vf-sys-c16.fth
index dd4624d..eab3bdd 100644
--- a/6502/C64/src/vf-sys-c16.fth
+++ b/6502/C64/src/vf-sys-c16.fth
@@ -126,3 +126,7 @@ Code C64fkeys \ Pushkeys a la C64
   [[ dex  0>= ?[[
     InitPKs ,X lda PKeys ,x sta ]]?
   xyNext jmp end-code
+
+(C16- | Create (bye  $FFF6  here 2- ! )
+
+(C16+ | CODE   (bye  rom $FFF6 jmp  end-code )
diff --git a/6502/C64/src/vf-sys-c64.fth b/6502/C64/src/vf-sys-c64.fth
index 5d24e0b..cce6648 100644
--- a/6502/C64/src/vf-sys-c64.fth
+++ b/6502/C64/src/vf-sys-c64.fth
@@ -121,3 +121,5 @@ first-init dup bootsystem 1+ !
                warmboot   1+ !
 Code c64init first-init jsr
  xyNext jmp end-code
+
+| Create (bye  $FCE2  here 2- !
diff --git a/6502/C64/src/vf-sys-cbm.fth b/6502/C64/src/vf-sys-cbm.fth
index d5babd4..96cb736 100644
--- a/6502/C64/src/vf-sys-cbm.fth
+++ b/6502/C64/src/vf-sys-cbm.fth
@@ -95,12 +95,6 @@ Output: display   [ here output ! ]
  c64emit c64cr c64type c64del c64page
  c64at c64at? ;
 
-(C64  | Create (bye  $FCE2  here 2- ! )
-
-(C16- | Create (bye  $FFF6  here 2- ! )
-
-(C16+ | CODE   (bye  rom $FFF6 jmp  end-code )
-
 
 \ *** Block No. 135, Hexblock 87
 87 fthpage