3
100%
master: 100%

Ran 14 Feb 2017 11:36PM UTC

Files 9

Run time 0s

Badge

Embed ▾

Committed 14 Feb 2017 11:10PM UTC coverage: 100.0%. Remained the same

Job # RACKET_VERSION=6.3

Build Type

push

travis-ci

Committed by

bennn

Commit Message

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.)

Run Details

154 of 154 relevant lines covered (100.0%)

1.0 hits per line

bennn / rackunit-abbrevs / 28 / 3
100%
master: 100%

README BADGES
x

Markdown

Textile

RDoc

HTML

Rst

Source Files on job 28.3 (RACKET_VERSION=6.3)

bennn / rackunit-abbrevs / 28 / 3 100% master: 100%

README BADGES x

Markdown

Textile

RDoc

HTML

Rst

Source Files on job 28.3 (RACKET_VERSION=6.3)

bennn / rackunit-abbrevs / 28 / 3
100%
master: 100%

README BADGES
x