Skip to content
This repository
Fetching contributors…

Octocat-spinner-32-eaf2f5

Cannot retrieve contributors at this time

file 30 lines (18 sloc) 0.723 kb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
IN: logging.tests
USING: tools.test logging logging.analysis logging.server io
io.files.temp math ;

: input-logging-test ( a b -- c ) + ;

\ input-logging-test NOTICE add-input-logging

: output-logging-test ( a b -- c ) + ;

\ output-logging-test DEBUG add-output-logging

: error-logging-test ( a b -- c ) / ;

\ error-logging-test ERROR add-error-logging

temp-directory [
"logging-test" [
[ 4 ] [ 1 3 input-logging-test ] unit-test

[ 4 ] [ 1 3 output-logging-test ] unit-test

[ 4/3 ] [ 4 3 error-logging-test ] unit-test

[ f ] [ 1 0 error-logging-test ] unit-test
] with-logging

[ ] [ "logging-test" { "input-logging-test" } analyze-log-file ] unit-test
] with-log-root
Something went wrong with that request. Please try again.