From 521ff84ca4b6d9dbe07b08716ec2cf763626cf6a Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Tue, 7 Apr 2020 17:32:04 -0400
Subject: [PATCH] Reserve some RAM for future features

---
 emul/forth/z80c.bin    | Bin 1720 -> 1719 bytes
 forth/icore.fs         |  10 +++++-----
 forth/z80c.fs          |   3 +--
 notes.txt              |   9 +++++----
 recipes/rc2014/conf.fs |   2 +-
 5 files changed, 12 insertions(+), 12 deletions(-)

diff --git a/emul/forth/z80c.bin b/emul/forth/z80c.bin
index 5ce15923ea2dcb536124ecb3f1edfd0f1767809f..59f0d3ad6255bc269d7c3d66e6afa862266a55d5 100644
GIT binary patch
delta 795
zcmYL{L2DCH5Xb*-_wC!Hn2m~+7<<@6geFwfgNP<t>@#3MlDcka4uTP_M_F1adJ2jM
z*@HR6lk^~7^db~I=t&4t`U#{U1ia;D`~Zb@W?$69E^q!bZ{{~M?@R7;Zs(0~zke%2
zm-3(9iC4n?u;64rX5!&RyWF=Ojm7BR#^!ppaugX4KIXvUjYiP$AX$*9pgTd(XoW}M
zvSy{)txhwX1p)JpwmY(nW-Dw2t3e~gww#IqG_I|*gYYyQ4=b`qxvyj)JUo{pE6}LV
z3?E7Inw(d2#_2<VZA15<a*XN5V#^+jkrfe?Cd<be3W`v~l+FVC*50rxOY?6@o5Ll`
z2WD|u><oMIl-L@+kfr{fV{*Kt0=j+}7WZ_BdJ1g@Udl5=jVx{RpZndnYSbWwFBLhQ
z<%csT*EP<y+sh|mbFvckXNX3YM%Z3!2iFTw9-gSN=<lk(JxoOxzY-1hFPM3I#PL(*
zElqVfHQ(4(5ruI>?4_x!KYG0Jv~rfW!6=FPDh;W?#2O36IS>=V3hg$16DwBlm9eya
zNB`f_GO`{LwJjqQh+Cw49MH*Zw2KU?lwg1^eh}y4{d(n`;q0aJ;*}f-L+XRHVd50}
zy!t9JaP3s3b2+`7z6vvJmYS_5Ka_~da0x|=+;lZ=HpAAcDdQtnvC_Dl!!r-(T^>QK
o4DoS#11J7nmZW!S?^UPFz<$Oc*DmlypY|H7-}Y2!+@<~g0YZSA6951J

delta 779
zcmYLHL1+^}6n(QhJDU`<t)el+9ySr7F_nU#phk<10Rxhx>(=I0iWYCO)I#YgNKdk0
z4vQC|hu%Di;z4f`gwm_0f{=p;$w4r9ug3p(q8@gc|Nfu<-}`Ug=RV}#ycC)5-#!(g
zOEd5G#B<^PnpN4?nK-#@m%Gx@n2Xjno~)m*oIu8dk0~&CrykTjNCspI=;a`&H^bv_
z8M9JsX}J+jih#VM?fbHfMl-Aj?VuiFSB^vv8aHpXg76$14_dBK@9S9z4?D7N1sb(U
z;A1>~LCG6Alk_3Lv0?YHa+28%#Fjk}eJdhTnj#+;s3<}aBRUHlS_er*mQL*vHiave
z4@~N^c$=)svtldRk)`f|V|qNJ0lGE=i!~i1O`*+%=ck!NjUsLHpY<MEH4;eW^F=Oa
z_|YWEb4_yP-r^b9+^j_U45PlK5w=!Z!R-Q+hix?w-F@{}!$@@SW30jXS+j52sPk1#
zTbkx_Yre6sA}V7+oTaU-Ki=Hft}L({Oa<;oX_yKOt$|=VM`B2{Lc2}h(2CV7Wg=}a
z=>IM)BI^O}u8dG1-Xis}M<?TG2N_h8&rbgIQo0^?;7Ax^J_t*GJB2PgU8RvcDn;pB
z#@vHiC4B^Dw+uC!4Sp99b?u=8MZRsi8h0CEvu)J-h*hjKuIBL6!$p@B$I1}QljX&K
jmnGpHvbpM%*|t)qgD<qnYnS+<Pd3Ktr#%uHt7PXN1y`0m

diff --git a/forth/icore.fs b/forth/icore.fs
index a072c86..afc0a88 100644
--- a/forth/icore.fs
+++ b/forth/icore.fs
@@ -196,17 +196,17 @@
 ( system c< simply reads source from binary, starting at
   LATEST. Convenient way to bootstrap a new system. )
 : (c<)
-    ( 51 == SYSTEM SCRATCHPAD )
-    0x51 _c RAM+ _c @   ( a )
+    ( 60 == SYSTEM SCRATCHPAD )
+    0x60 _c RAM+ _c @   ( a )
     _c DUP _c C@        ( a c )
     _c SWAP 1 _c +      ( c a+1 )
-    0x51 _c RAM+ _c !   ( c )
+    0x60 _c RAM+ _c !   ( c )
 ;
 
 : BOOT
     LIT< (parse) _c (find) _c DROP _c (parse*) _c !
-    ( 51 == SYSTEM SCRATCHPAD )
-    _c CURRENT _c @ 0x51 _c RAM+ _c !
+    ( 60 == SYSTEM SCRATCHPAD )
+    _c CURRENT _c @ 0x60 _c RAM+ _c !
     ( 0c == CINPTR )
     LIT< (c<) _c (find) _c DROP 0x0c _c RAM+ _c !
     LIT< INIT _c (find)
diff --git a/forth/z80c.fs b/forth/z80c.fs
index 46489c6..d12b224 100644
--- a/forth/z80c.fs
+++ b/forth/z80c.fs
@@ -247,8 +247,7 @@ CODE @
     E (HL) LDrr,
     HL INCss,
     D (HL) LDrr,
-    EXDEHL,
-    HL PUSHqq,
+    DE PUSHqq,
 ;CODE
 
 CODE C!
diff --git a/notes.txt b/notes.txt
index e0aa599..2d16513 100644
--- a/notes.txt
+++ b/notes.txt
@@ -88,8 +88,9 @@ RAMSTART   INITIAL_SP
 +0e        WORDBUF
 +2e        SYSVNXT
 +4e        INTJUMP
-+51        SYSTEM SCRATCHPAD
-+60        RAMEND
++51        RESERVED
++60        SYSTEM SCRATCHPAD
++80        RAMEND
 
 INITIAL_SP holds the initial Stack Pointer value so that we know where to reset
 it on ABORT
@@ -119,8 +120,8 @@ SYSTEM SCRATCHPAD is reserved for temporary system storage or can be reserved
 by low-level drivers. These are the current usages of this space throughout the
 project:
 
-* 0x51-0x53: (c<) pointer during in-memory initialization (see below)
-* 0x53-0x5b: ACIA buffer pointers in RC2014 recipes.
+* 0x60-0x62: (c<) pointer during in-memory initialization (see below)
+* 0x62-0x6a: ACIA buffer pointers in RC2014 recipes.
 
 *** Initialization sequence
 
diff --git a/recipes/rc2014/conf.fs b/recipes/rc2014/conf.fs
index 72fd928..e78eb9f 100644
--- a/recipes/rc2014/conf.fs
+++ b/recipes/rc2014/conf.fs
@@ -2,5 +2,5 @@
 0xf000 CONSTANT RS_ADDR
 0x80   CONSTANT ACIA_CTL
 0x81   CONSTANT ACIA_IO
-RAMSTART 0x53 + CONSTANT ACIA_MEM
+RAMSTART 0x62 + CONSTANT ACIA_MEM