From 32b420b19c538a101d0d753b7a83e0c4ed0d5d16 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Sat, 4 Apr 2020 14:26:41 -0400
Subject: [PATCH] readln: fix typo

---
 forth/readln.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/forth/readln.fs b/forth/readln.fs
index a270482..9955185 100644
--- a/forth/readln.fs
+++ b/forth/readln.fs
@@ -76,5 +76,5 @@
     ( not EOL? good, inc and return )
     DUP IF 1 IN> +! EXIT THEN   ( c )
     ( EOL ? readline. we still return typed char though )
-    (rdln) (<c)                 ( c )
+    (rdln) (c<)                 ( c )
 ;