From c20838117de550d4aba5062fb7f6ba1dc09df910 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Tue, 10 Jun 2014 17:18:37 -0700
Subject: [PATCH] heaps: fix stack effect for >max-heap.

---
 basis/heaps/heaps.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/heaps/heaps.factor b/basis/heaps/heaps.factor
index db275b0741..170e33595d 100644
--- a/basis/heaps/heaps.factor
+++ b/basis/heaps/heaps.factor
@@ -198,5 +198,5 @@ ERROR: not-a-heap obj ;
 : >min-heap ( assoc -- min-heap )
     <min-heap> [ heap-push-all ] keep ;
 
-: >max-heap ( assoc -- min-heap )
+: >max-heap ( assoc -- max-heap )
     <max-heap> [ heap-push-all ] keep ;