From 6f2a435498db0b6fee1cbafa65a3c983f6d52ef5 Mon Sep 17 00:00:00 2001 From: Eduardo Cavazos Date: Sun, 9 Mar 2008 04:49:35 -0600 Subject: [PATCH] builder: Include help-lint results in report --- extra/builder/builder.factor | 1 + extra/builder/test/test.factor | 5 +++++ 2 files changed, 6 insertions(+) diff --git a/extra/builder/builder.factor b/extra/builder/builder.factor index 747f0cd1e5..68f525ec6c 100644 --- a/extra/builder/builder.factor +++ b/extra/builder/builder.factor @@ -132,6 +132,7 @@ SYMBOL: build-status "Did not pass load-everything: " print "load-everything-vocabs" cat "Did not pass test-all: " print "test-all-vocabs" cat + "help-lint results:" print "help-lint" cat "Benchmarks: " print "benchmarks" eval-file benchmarks. diff --git a/extra/builder/test/test.factor b/extra/builder/test/test.factor index e92efaf8fc..dd3c640a84 100644 --- a/extra/builder/test/test.factor +++ b/extra/builder/test/test.factor @@ -8,6 +8,7 @@ USING: kernel namespaces sequences assocs builder continuations tools.test io.encodings.utf8 combinators.cleave + help.lint bootstrap.stage2 benchmark builder.util ; IN: builder.test @@ -28,6 +29,9 @@ IN: builder.test ] with-file-writer ; +: do-help-lint ( -- ) + "" run-help-lint "../help-lint" utf8 [ typos. ] with-file-writer ; + : do-benchmarks ( -- ) run-benchmarks "../benchmarks" utf8 [ . ] with-file-writer ; @@ -35,6 +39,7 @@ IN: builder.test bootstrap-time get "../boot-time" utf8 [ . ] with-file-writer [ do-load ] runtime "../load-time" utf8 [ . ] with-file-writer [ do-tests ] runtime "../test-time" utf8 [ . ] with-file-writer + do-help-lint do-benchmarks ; MAIN: do-all \ No newline at end of file