main: Move the first instance of module+ after provide.
This commit is contained in:
parent
9335e1498e
commit
24a0611c8e
6
main.rkt
6
main.rkt
|
@ -20,13 +20,13 @@
|
||||||
|
|
||||||
(require (for-syntax syntax/parse))
|
(require (for-syntax syntax/parse))
|
||||||
|
|
||||||
(module+ test
|
|
||||||
(require typed/rackunit))
|
|
||||||
|
|
||||||
(provide compose-n
|
(provide compose-n
|
||||||
compose-3 compose-4 compose-5 compose-6 compose-7 compose-8 compose-9
|
compose-3 compose-4 compose-5 compose-6 compose-7 compose-8 compose-9
|
||||||
multi-compose multi-chain)
|
multi-compose multi-chain)
|
||||||
|
|
||||||
|
(module+ test
|
||||||
|
(require typed/rackunit))
|
||||||
|
|
||||||
(: compose-n (All (a) (-> (-> a a) * (-> a a))))
|
(: compose-n (All (a) (-> (-> a a) * (-> a a))))
|
||||||
(define (compose-n . funcs)
|
(define (compose-n . funcs)
|
||||||
(λ (x)
|
(λ (x)
|
||||||
|
|
Loading…
Reference in New Issue