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

Try without-limits in mason.report. Fixes #275.

db4
Doug Coleman 2011-10-18 00:52:46 -07:00
parent 24a6895436
commit 5771cafcee
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
extra/mason/report/report.factor
View File

@ -4,7 +4,7 @@ USING: benchmark combinators.smart debugger fry io assocs
io.encodings.utf8 io.files io.sockets io.streams.string kernel
locals mason.common mason.config mason.disk mason.platform math
namespaces prettyprint sequences xml.syntax xml.writer
combinators.short-circuit literals splitting ;
combinators.short-circuit literals splitting prettyprint.config ;
IN: mason.report
: git-link ( id -- link )
@ -31,10 +31,12 @@ IN: mason.report
: with-report ( quot -- )
[ "report" utf8 ] dip
'[
common-report
_ call( -- xml )
[XML <html><body><-><-></body></html> XML]
write-xml
[
common-report
_ call( -- xml )
[XML <html><body><-><-></body></html> XML]
write-xml
] without-limits
] with-file-writer ; inline
: file-tail ( file encoding lines -- seq )