From e49c3d17b5bba463241655107ca91370843db51d Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Sat, 24 Sep 2011 17:55:13 -0700
Subject: [PATCH] classes.struct: Fix prettyprint for PACKED-STRUCT. Fixes
 #162.

---
 basis/classes/struct/prettyprint/prettyprint.factor | 1 -
 1 file changed, 1 deletion(-)

diff --git a/basis/classes/struct/prettyprint/prettyprint.factor b/basis/classes/struct/prettyprint/prettyprint.factor
index 57b6b4fca5..8e75c85ad6 100644
--- a/basis/classes/struct/prettyprint/prettyprint.factor
+++ b/basis/classes/struct/prettyprint/prettyprint.factor
@@ -12,7 +12,6 @@ IN: classes.struct.prettyprint
 : struct-definer-word ( class -- word )
     struct-slots
     {
-        { [ dup length 1 <= ] [ drop \ STRUCT: ] }
         { [ dup [ offset>> 0 = ] all? ] [ drop \ UNION-STRUCT: ] }
         { [ dup [ packed?>> ] all? ] [ drop \ PACKED-STRUCT: ] }
         [ drop \ STRUCT: ]