diff options
| author |  Peter McGoron
| 2025-09-21 23:57:14 -0400 |
|---|---|---|
| committer | Peter McGoron
| 2025-09-21 23:57:14 -0400 |
| commit | 65156de526ff7b1e9dd93bba43084a2654f63b0f (patch) | |
| tree | d3d5b550560aac6923739a6967dccc3538a25d49 /README.md | |
| parent | replace with-test-assert with test-assert for better compat with SRFI-64 (diff) | |
test-application: add forms as they are evaluated, and only store the whole evaluated expression quoted
Diffstat (limited to 'README.md')
| -rw-r--r-- | README.md | 11 |
1 files changed, 2 insertions, 9 deletions
@@ -133,8 +133,8 @@ Runs a test with `test-name` that evaluates `(expr ...)`. The test will set (in addition to `call-as-test`): -* `name`: To be the passed `expr` quoted. -* `application`: A list `(expr ...)`, where each is evaluated. +* `form`: To be `(expr ...)`, quoted. +* `name ...`: To be the passed `expr ...` evaluated. * `success?`: If `(expr ...)` evaluates to not false. (with-test-assert test-name body ...) @@ -161,14 +161,7 @@ Tests that |X - Y| <= eps -The test will set (in addition to `call-as-test`): -* `procedure`: to be `%test-approximate` (this is an implementation detail). -* `expected`: to be `X`, quoted. -* `actual`: to be `Y`, quoted. -* `error`: to be `eps`, quoted. -* `application`: The `car` is `%test-approximate`, and the `cdr` is - `expected`, `actual`, and `error,` evaluated. (with-test-error name error-predicate body ...) |