Add lens-view* contract

2015-07-08 10:00:29 -07:00 · 2015-07-08 10:00:29 -07:00 · 31e52b7697
commit 31e52b7697
parent db0b7ad6f2
1 changed files with 1 additions and 1 deletions
--- a/lens/base/view-set.rkt
+++ b/lens/base/view-set.rkt
@ -7,9 +7,9 @@
  (require rackunit))

 (provide
- lens-view*
 lens-set*
 (contract-out [lens-view (-> lens? any/c any/c)]
+               [lens-view* (->* [any/c] #:rest (listof lens?) any/c)]
               [lens-set (-> lens? any/c any/c any/c)]))