From d1547a0d1ce5cf98bfb7d2b158ce3f5c5ab9029e Mon Sep 17 00:00:00 2001
From: crc <crc@noemail.net>
Date: Mon, 22 Jul 2019 21:04:44 +0000
Subject: [PATCH] fix a typo

FossilOrigin-Name: 803b037141e0d575e7838b23daec09e47c6a9b6d18d1a452006d58c332d41405
---
 RETRO-Book.md | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/RETRO-Book.md b/RETRO-Book.md
index 9084a77..f6641f7 100644
--- a/RETRO-Book.md
+++ b/RETRO-Book.md
@@ -378,7 +378,7 @@ This yields -1 (`TRUE`) as expected. So we can easily
 name it:
 
 ```
-:palindrome dup s:reverse s:eq? ;
+:palindrome? dup s:reverse s:eq? ;
 ```
 
 Naming uses the `:` prefix to add a new word to the dictionary.