]> gitweb.factorcode.org Git - factor.git/commitdiff
locals.prettyprint: remove "|" as a symbol.
authorJohn Benediktsson <mrjbq7@gmail.com>
Wed, 5 Aug 2015 02:04:09 +0000 (19:04 -0700)
committerJohn Benediktsson <mrjbq7@gmail.com>
Wed, 5 Aug 2015 02:04:47 +0000 (19:04 -0700)
basis/locals/prettyprint/prettyprint.factor

index b0fbebbf31a8cf892d1a4dba322f1c6a853fe182..bd4bedad6a4f53f76fb61aadb3ba376e56e828f2 100644 (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> ;