From 04a353a3de524eec071fe009d75df0b065033db4 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20L=C3=B6fgren?= <henrik.lofgren@gmail.com>
Date: Sat, 6 Sep 2025 19:23:29 +0200
Subject: [PATCH 1/2] Change CR word to emit both CR and LF

---
 third_party/lbforth/lbforth.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/third_party/lbforth/lbforth.c b/third_party/lbforth/lbforth.c
index 6e472c17..a98f5d63 100644
--- a/third_party/lbforth/lbforth.c
+++ b/third_party/lbforth/lbforth.c
@@ -120,7 +120,7 @@ const char *initScript =
     ": / /MOD NIP ;\n"
     ": MOD /MOD DROP ;\n"
     ": BL 32 ;\n"
-    ": CR 10 EMIT ;\n"
+    ": CR 13 EMIT 10 EMIT ;\n"
     ": SPACE BL EMIT ;\n"
     ": NEGATE 0 SWAP - ;\n"
     ": DNEGATE 0. 2SWAP D- ;\n"

From e95137e838c2f6d21e901da13f0ce9ea37aea31a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20L=C3=B6fgren?= <henrik.lofgren@gmail.com>
Date: Sat, 6 Sep 2025 20:24:53 +0200
Subject: [PATCH 2/2] Add CR/LF in a few static strings

---
 third_party/lbforth/lbforth.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/third_party/lbforth/lbforth.c b/third_party/lbforth/lbforth.c
index a98f5d63..7dfb80f1 100644
--- a/third_party/lbforth/lbforth.c
+++ b/third_party/lbforth/lbforth.c
@@ -677,6 +677,7 @@ BUILTIN(38, "QUIT", quit, 0)
                 tell("Unknown word: ");
                 for (i=0; i<memory[0]; i++)
                     putkey(memory[i+1]);
+                putkey('\r');
                 putkey('\n');
 
                 *sp = *rsp = 1;
@@ -886,7 +887,7 @@ BUILTIN(58, "*/", timesDivide, 0)
     push((cell)r);
     if ((cell)r != r)
     {
-        tell("Arithmetic overflow\n");
+        tell("Arithmetic overflow\r\n");
         errorFlag = 1;
     }
 }
@@ -902,7 +903,7 @@ BUILTIN(59, "*/MOD", timesDivideMod, 0)
     push((cell)r);
     if ((cell)r != r)
     {
-        tell("Arithmetic overflow\n");
+        tell("Arithmetic overflow\r\n");
         errorFlag = 1;
     }
 }