From c583b8ad974eb039312acad83df4c33d10aefaa0 Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sun, 18 Sep 2011 16:59:14 -0700
Subject: [PATCH] see: show stack effects for ALIAS: definitions.  Fixes #120.

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

diff --git a/basis/see/see.factor b/basis/see/see.factor
index 38a8a48934..af874d7e0c 100644
--- a/basis/see/see.factor
+++ b/basis/see/see.factor
@@ -37,7 +37,7 @@ GENERIC: print-stack-effect? ( word -- ? )
 M: parsing-word print-stack-effect? drop f ;
 M: symbol print-stack-effect? drop f ;
 M: constant print-stack-effect? drop f ;
-M: alias print-stack-effect? drop f ;
+M: alias print-stack-effect? drop t ;
 M: word print-stack-effect? drop t ;
 
 : stack-effect. ( word -- )