suzanne.soy/lens
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix compose contract

Browse Source
This commit is contained in:
Jack Firth 2015-07-08 01:29:03 -07:00
parent 5c681189f0
commit 6fe10f3ec4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lens/base/compose.rkt
View File

@ -9,8 +9,8 @@
(require rackunit))
(provide
(contract-out [lens-compose (->* () () #:rest lens? lens?)]
[lens-thrush (->* () () #:rest lens? lens?)]))
(contract-out [lens-compose (->* () () #:rest (listof lens?) lens?)]
[lens-thrush (->* () () #:rest (listof lens?) lens?)]))
(define (lens-compose2 sub-lens super-lens)