sequences: bound -> index-or-length

[factor.git] / extra / mason / report / report.factor

diff --git a/extra/mason/report/report.factor b/extra/mason/report/report.factor
index 0ec1e4bf48170d52244e7b41ce0b234336b51278..3dffe3d54bf678a2bc11052af71a16206e14fd14 100644 (file)
--- a/extra/mason/report/report.factor
+++ b/extra/mason/report/report.factor
@@ -37,7 +37,7 @@ IN: mason.report
     ] with-file-writer ; inline
 
 : file-tail ( file encoding lines -- seq )
-    [ file-lines ] dip bound tail* join-lines ;
+    [ file-lines ] dip index-or-length tail* join-lines ;
 
 :: failed-report ( error file what -- status )
     [