locals.prettyprint: remove "|" as a symbol.

db4
John Benediktsson 2015-08-04 19:04:09 -07:00
parent e9dbb7cf22
commit ec7afb3ea6
1 changed files with 3 additions and 6 deletions

View File

@ -1,12 +1,9 @@
! Copyright (C) 2007, 2008 Slava Pestov, Eduardo Cavazos.
! See http://factorcode.org/license.txt for BSD license.
USING: accessors assocs kernel locals locals.types
prettyprint.backend prettyprint.sections prettyprint.custom
sequences words ;
USING: accessors kernel locals locals.types prettyprint.backend
prettyprint.custom prettyprint.sections sequences words ;
IN: locals.prettyprint
SYMBOL: |
: pprint-var ( var -- )
#! Prettyprint a read/write local as its writer, just like
#! in the input syntax: [| x! | ... x 3 + x! ]
@ -20,7 +17,7 @@ M: lambda pprint*
<flow
\ [| pprint-word
dup vars>> pprint-vars
\ | pprint-word
"|" text
f <inset body>> pprint-elements block>
\ ] pprint-word
block> ;