From be1b5e66278253cc79b53654471480870276ecce Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@factorcode.org>
Date: Wed, 2 Jun 2010 03:11:46 -0400
Subject: [PATCH] alien.prettyprint: fix wrapping when prettyprinting pointer:

---
 basis/alien/prettyprint/prettyprint.factor | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/basis/alien/prettyprint/prettyprint.factor b/basis/alien/prettyprint/prettyprint.factor
index b0178081dc..2cf90e938d 100644
--- a/basis/alien/prettyprint/prettyprint.factor
+++ b/basis/alien/prettyprint/prettyprint.factor
@@ -41,7 +41,8 @@ PRIVATE>
 : pprint-c-type ( c-type -- )
     [ c-type-string ] keep present-text ;
 
-M: pointer pprint* \ pointer: pprint-word to>> pprint-c-type ;
+M: pointer pprint*
+    <flow \ pointer: pprint-word to>> pprint* block> ;
 
 M: typedef-word definer drop \ TYPEDEF: f ;