From e6089cfc1a3bcb9805b8832a11a1d3ac21a34c63 Mon Sep 17 00:00:00 2001
From: Koichi Nakamura <koichi@idein.jp>
Date: Wed, 30 Dec 2020 22:41:49 +0900
Subject: [PATCH] minor fix

---
 core.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/core.fs b/core.fs
index 59a7bb1..f9276d1 100644
--- a/core.fs
+++ b/core.fs
@@ -90,7 +90,7 @@ l!
 \ --
 \ h@                            ( save addr of new entry )
 \ l@ h@!h@C+h!                  ( set link pointer. *here++ = latest )
-\ k1k0-h@$ k\h@k1k0-+! h@C+h!   ( write the name '\' and its length )
+\ k1k0-h@$ k\h@k1k0-+$ h@C+h!   ( write the name '\' and its length )
 \ i       h@!h@C+h!             ( docol )
 \ kkf     h@!h@C+h!             ( key )
 \ kLf     h@!h@C+h!             ( lit )