prettyprint.backend: don't bomb if printing length-limited sequence which doesn't like being resized itself. Instead convert to array of elements first
parent
7d39499d86
commit
3d4ce094d2
|
@ -173,6 +173,7 @@ M: tuple pprint*
|
||||||
] when ;
|
] when ;
|
||||||
|
|
||||||
: pprint-elements ( seq -- )
|
: pprint-elements ( seq -- )
|
||||||
|
>array
|
||||||
do-length-limit
|
do-length-limit
|
||||||
[ [ pprint* ] each ] dip
|
[ [ pprint* ] each ] dip
|
||||||
[ "~" swap number>string " more~" 3append text ] when* ;
|
[ "~" swap number>string " more~" 3append text ] when* ;
|
||||||
|
|
Loading…
Reference in New Issue