thin-provisioning-tools/functional-tests/fail.scm
2017-10-06 15:26:10 +01:00

8 lines
134 B
Scheme

(library
(fail)
(define (fail msg)
(raise (condition
(make-error)
(make-message-condition msg)))))