diff options
Diffstat (limited to 'utils.scm')
| -rw-r--r-- | utils.scm | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/utils.scm b/utils.scm deleted file mode 100644 index 4647c07..0000000 --- a/utils.scm +++ /dev/null @@ -1,15 +0,0 @@ -(module utils (*should-run-inline-tests?* inline-tests) - (import (scheme) - (chicken process-context)) - - (define *should-run-inline-tests?* - (let ((v (get-environment-variable "INLINE_TESTS"))) - (and (string? v) - (string=? v "1")))) - - (define-syntax inline-tests - (syntax-rules () - ((_ expr ...) - (if *should-run-inline-tests?* - (begin expr ...)))))) - |