From c2261c05fd0df9fccd96e664f9e904a5d328b8c2 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 29 Nov 2014 21:46:26 -0800
Subject: [PATCH] definitions: removing unused "new-word?" word.

---
 core/definitions/definitions.factor | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/core/definitions/definitions.factor b/core/definitions/definitions.factor
index 95c452d55b..350268630c 100644
--- a/core/definitions/definitions.factor
+++ b/core/definitions/definitions.factor
@@ -29,9 +29,6 @@ SYMBOL: new-words
 : new-word ( word -- )
     new-words get add-to-unit ;
 
-: new-word? ( word -- ? )
-    new-words get in? ;
-
 GENERIC: where ( defspec -- loc )
 
 M: object where drop f ;
@@ -45,7 +42,8 @@ SYMBOL: forgotten-definitions
 : forgotten-definition ( defspec -- )
     forgotten-definitions get add-to-unit ;
 
-: forget ( defspec -- ) [ forgotten-definition ] [ forget* ] bi ;
+: forget ( defspec -- )
+    [ forgotten-definition ] [ forget* ] bi ;
 
 M: f forget* drop ;