bennn / rackunit-abbrevs

98%

master: 100%

push

travis-ci

let-bind the check-* functions

In the olden days,

```
(check-true* (λ (x) (not x))
 [#true]
 [#false])
```

would expand to:

```
(begin
 (check-true ((λ (x) (not x)) #true))
 (check-true ((λ (x) (not x)) #false)))
```

(No problem if there's an identifier instead of the λ. But that's silly.)

Now we use a let to bind the function, so the expansion is more like:

```
(let ([f (λ (x) (not x))])
 (check-true ( #true))
 (check-true ((λ (x) (not x)) #false)))
```

(Where `f` is gensym'd --- either from the function's "name" or an arbitrary symbol.)

36 of 36 new or added lines in 1 file covered. (100.0%)

175 of 179 relevant lines covered (97.77%)

1.77 hits per line