From d3ec0e3a6c3c47e363e2dca6e85899fdabc54d13 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Wed, 28 Oct 2020 15:47:49 -0400
Subject: [PATCH] Use SYSVARS instead of RAM+ in core switches defs

RAM+ is the host's setup! Use SYSVARS instead, which is the guest's
value.
---
 blk/381 | 2 +-
 blk/394 | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/blk/381 b/blk/381
index 22419f5..12767c1 100644
--- a/blk/381
+++ b/blk/381
@@ -4,7 +4,7 @@
 : (print) C@+ ( a len ) 0 DO C@+ EMIT LOOP DROP ;
 : BS 8 EMIT ; : LF 10 EMIT ; : CR 13 EMIT ;
 : CRLF CR LF ; : SPC 32 EMIT ;
-0x0a RAM+ :** NL
+SYSVARS 0x0a + :** NL
 : (uflw) LIT" stack underflow" ERR ;
 XCURRENT @ _xapply ORG @ 0x06 ( stable ABI uflw ) + !
 : (oflw) LIT" stack overflow" ERR ;
diff --git a/blk/394 b/blk/394
index 27c83a8..2bc6057 100644
--- a/blk/394
+++ b/blk/394
@@ -3,8 +3,8 @@
 : LOADR 1+ SWAP DO I DUP . NL LOAD LOOP ;
 : LOADR+ BLK> @ + SWAP BLK> @ + SWAP LOADR ;
 ( Now, adev stuff )
-0x3e RAM+ :** A@
-0x40 RAM+ :** A!
+SYSVARS 0x3e + :** A@
+SYSVARS 0x40 + :** A!
 
 ( src dst u -- )
 : AMOVE