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

mason.common: Don't put a limit on prettyprinter output. Fixes #607.

db4
Doug Coleman 2012-08-03 14:18:59 -07:00
parent f52195b0c8
commit 16de2794de
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/mason/common/common.factor
View File

@ -5,7 +5,7 @@ math.functions make io io.files io.pathnames io.directories
io.directories.hierarchy io.launcher io.encodings.utf8 prettyprint io.directories.hierarchy io.launcher io.encodings.utf8 prettyprint
combinators.short-circuit parser combinators math calendar combinators.short-circuit parser combinators math calendar
calendar.format arrays mason.config locals debugger fry calendar.format arrays mason.config locals debugger fry
continuations strings io.sockets ; continuations strings io.sockets prettyprint.config ;
IN: mason.common IN: mason.common
: print-timestamp ( string -- ) : print-timestamp ( string -- )
@ -50,7 +50,7 @@ SYMBOL: current-git-id
dup utf8 file-lines parse-fresh dup utf8 file-lines parse-fresh
[ "Empty file: " swap append throw ] [ nip first ] if-empty ; [ "Empty file: " swap append throw ] [ nip first ] if-empty ;
: to-file ( object file -- ) utf8 [ . ] with-file-writer ; : to-file ( object file -- ) utf8 [ [ . ] without-limits ] with-file-writer ;
: datestamp ( timestamp -- string ) : datestamp ( timestamp -- string )
[ [