steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

prettyprint.backend: make +nil+ render as L{ }.

flac
John Benediktsson 2020-02-29 07:16:46 -08:00 committed by Steve Ayerhart
parent c439960a17
commit 4e97e9a8fb
No known key found for this signature in database
GPG Key ID: 5BFD39C5359E967D
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/prettyprint/backend/backend.factor
View File

@ -214,6 +214,7 @@ M: byte-array pprint-delims drop \ B{ \ } ;
M: byte-vector pprint-delims drop \ BV{ \ } ;
M: vector pprint-delims drop \ V{ \ } ;
M: cons-state pprint-delims drop \ L{ \ } ;
M: +nil+ pprint-delims drop \ L{ \ } ;
M: hashtable pprint-delims drop \ H{ \ } ;
M: tuple pprint-delims drop \ T{ \ } ;
M: wrapper pprint-delims drop \ W{ \ } ;
@ -287,6 +288,9 @@ M: cons-state pprint*
] dip pprint-word block>
] check-recursion ;
M: +nil+ pprint*
<flow pprint-delims [ pprint-word ] bi@ block> ;
: with-extra-nesting-level ( quot -- )
nesting-limit [ dup [ 1 + ] [ f ] if* ] change
[ nesting-limit set ] curry finally ; inline