From 0190ce5b488ecdb0507147da95f1bb24b1458eb3 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sun, 7 Dec 2008 01:59:38 -0600
Subject: [PATCH] remove bogus equality

---
 extra/lint/lint.factor | 2 --
 1 file changed, 2 deletions(-)

diff --git a/extra/lint/lint.factor b/extra/lint/lint.factor
index 298bea5c44..a8320c1464 100644
--- a/extra/lint/lint.factor
+++ b/extra/lint/lint.factor
@@ -25,7 +25,6 @@ SYMBOL: def-hash-keys
         { 2nip [ nip nip ] }
         { 2drop [ drop drop ] }
         { 3drop [ drop drop drop ] }
-        { zero? [ 0 = ] }
         { pop* [ pop drop ] }
         { when [ [ ] if ] }
         { >boolean [ f = not ] }
@@ -49,7 +48,6 @@ SYMBOL: def-hash-keys
         [ get ]
         [ t ] [ f ]
         [ { } ]
-        [ 0 = ]
         [ drop ] ! because of declare
         [ drop f ]
         [ "cdecl" ]