diff options
| author | Jan Tuomi <jans.tuomi@gmail.com> | 2024-01-24 16:57:56 +0200 |
|---|---|---|
| committer | Jan Tuomi <jans.tuomi@gmail.com> | 2024-01-24 17:12:45 +0200 |
| commit | 0bc80beb699000826b8e9415a7b254c92dc86a5a (patch) | |
| tree | c67c5ea7e06447339e811ef2c177bcf920d68fc5 /utils.scm | |
| parent | b5ddfdc53cf1cf2197adf8718ea405acfa2fe6f7 (diff) | |
Do things
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 ...)))))) - |