From 74aaf9fe3f1ea39b527fdbd70e6d79851eeaa3b3 Mon Sep 17 00:00:00 2001
From: Paul Gardner-Stephen <paul@servalproject.org>
Date: Sun, 5 May 2019 00:25:15 +0930
Subject: [PATCH] fix bug in print_integer with digit 9

---
 c64/basic/print_integer.s | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/c64/basic/print_integer.s b/c64/basic/print_integer.s
index 8e1c1f8a..739f8b8b 100644
--- a/c64/basic/print_integer.s
+++ b/c64/basic/print_integer.s
@@ -80,17 +80,21 @@ next_hi_bit:
 	cpy #$7f
 	bcc hi_loop	
 
+fix_carry:
+	
 	;; Deal with any carries
 	ldx #3
 carry_fix_loop:	
 	lda $0101,x
-	cmp #9
+	cmp #10
 	bcc +
 	inc $0100,x
 	sec
 	sbc #10
 	sta $0101,x
-	jmp carry_fix_loop
+
+	jmp carry_fix_loop	
+	
 *	dex	
 	bpl carry_fix_loop