diff options
| author | Guillermo Ramos | 2014-07-02 22:15:26 +0200 |
|---|---|---|
| committer | Guillermo Ramos | 2014-07-02 22:15:26 +0200 |
| commit | 4022f2401399c0911103eaf7988fde4372b7f727 (patch) | |
| tree | cfe2aa02063aea02f5e5790778d4e4fd2f6fdeed /factor/examples/test-suite/test-suite.factor | |
| parent | f3c354d396a38033dac28ece6f6220e75cef5aec (diff) | |
| download | 7l-4022f2401399c0911103eaf7988fde4372b7f727.tar.gz | |
[Factor] Día 2 (sin terminar)
Diffstat (limited to 'factor/examples/test-suite/test-suite.factor')
| -rw-r--r-- | factor/examples/test-suite/test-suite.factor | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/factor/examples/test-suite/test-suite.factor b/factor/examples/test-suite/test-suite.factor new file mode 100644 index 0000000..42d0f28 --- /dev/null +++ b/factor/examples/test-suite/test-suite.factor @@ -0,0 +1,13 @@ +USING: tools.test io io.streams.null kernel namespaces sequences ; + +USE: examples.greeter +USE: examples.strings + +IN: examples.test-suite + +: test-all-examples ( -- ) + [ "examples" test ] with-null-writer + test-failures get empty? + [ "All tests passed" print ] [ :test-failures ] if ; + +MAIN: test-all-examples |