]> gitweb.factorcode.org Git - factor.git/commitdiff
alien.prettyprint: fix wrapping when prettyprinting pointer:
authorSlava Pestov <slava@factorcode.org>
Wed, 2 Jun 2010 07:11:46 +0000 (03:11 -0400)
committerSlava Pestov <slava@factorcode.org>
Wed, 2 Jun 2010 07:11:46 +0000 (03:11 -0400)
basis/alien/prettyprint/prettyprint.factor

index b0178081dc32540161648a8d0dbc754a0dd4b5ee..2cf90e938dfcf1fd55ae60d5f80d4419b18160f1 100644 (file)
@@ -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 ;