remove debugging output from test

This commit is contained in:
Matthew Flatt 2018-07-16 21:11:48 -06:00
parent 91d059c817
commit bfa08e40b1

View File

@ -633,7 +633,7 @@
(test (if fail-rel? 'correct-error 'worked)
'unrelative-dir
(with-handlers ([exn:fail:contract?
(λ (e) (log-error "~s" e) 'correct-error)])
(λ (e) 'correct-error)])
(and (deserialize s)
'worked))))
(delete-file fn))