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

Add id-lens contract

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

3
lens/base/identity.rkt
View File

@ -6,7 +6,8 @@
(require rackunit (require rackunit
"view-set.rkt")) "view-set.rkt"))
(provide identity-lens) (provide
(contract-out [identity-lens lens?]))
(define (second-value _ v) v) (define (second-value _ v) v)