From d9dc24857461e136af7d7ef8604ea729316cfff9 Mon Sep 17 00:00:00 2001
From: Jacques Comeaux <jacquesrcomeaux@gmail.com>
Date: Thu, 15 Sep 2022 18:13:32 -0500
Subject: Change print buffer address

---
 print.s | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'print.s')

diff --git a/print.s b/print.s
index 14d1439..e2b091e 100644
--- a/print.s
+++ b/print.s
@@ -1,6 +1,6 @@
 print:
-004000 012705 MOV #6000, R5         ; store print buffer address in R5
-004002 006000
+004000 012705 MOV #7000, R5         ; store print buffer address in R5
+004002 007000
 004004 032710 BIT #1, (R0)          ; test if sexp is cons or atom
 004006 000001
 004010 001005 BNE 10
@@ -55,8 +55,8 @@ handle_atom:
 004214 000207 RTS PC          ;
 
 print_buffer:
-004300 012705 MOV #6000, R5       ; restore print buffer pointer
-004302 006000
+004300 012705 MOV #7000, R5       ; restore print buffer pointer
+004302 007000
 004304 000404 BR 12
 004306 105737 TSTB @#177564       ; test if console ready
 004310 177564
-- 
cgit v1.2.3