テストが通りませんね。
FAIL in (test-as-url) (run-test8216378348289441833.clj:44)
expected: (= (URL. "file:/foo") (as-url (File. "/foo")))
actual: (not (= #<URL file:/foo> #<URL file:/D:/foo>))
FAIL in (test-relative-path-string) (run-test8216378348289441833.clj:44)
absolute path strings are forbidden
expected: (thrown? IllegalArgumentException (relative-path-string (str File/separator "baz")))
actual: nil
FAIL in (test-relative-path-string) (run-test8216378348289441833.clj:44)
absolute File paths are forbidden
expected: (thrown? IllegalArgumentException (relative-path-string (File. (str File/separator "quux"))))
actual: nil
FAIL in (test-print-summary) (run-test8216378348289441833.clj:44)
doesn't blow up with no data (assembla #31)
expected: (= "Name mean min max count sum\n" (with-out-str (print-summary {})))
actual: (not (= "Name mean min max count sum\n" "Name mean min max count sum\r\n"))
