]> gitweb.factorcode.org Git - factor.git/commitdiff
prettyprint.backend: don't bomb if printing length-limited sequence which doesn't...
authorSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Wed, 23 Sep 2009 07:48:23 +0000 (02:48 -0500)
committerSlava Pestov <slava@slava-pestovs-macbook-pro.local>
Wed, 23 Sep 2009 07:48:23 +0000 (02:48 -0500)
basis/prettyprint/backend/backend.factor

index cba40bbff1faa84573b46c29b90baa32c41a472a..fb47c50fbe3500a1550230913824dd26cce1d524 100644 (file)
@@ -173,6 +173,7 @@ M: tuple pprint*
     ] when ;
 
 : pprint-elements ( seq -- )
+    >array
     do-length-limit
     [ [ pprint* ] each ] dip
     [ "~" swap number>string " more~" 3append text ] when* ;