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

add contracts for mapper-lens and vector-mapper-lens

Browse Source
This commit is contained in:
AlexKnauth 2015-08-18 16:26:13 -04:00
parent 42abda35f2
commit 5a55f59580
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
unstable/lens/mapper.rkt
View File

@ -1,10 +1,15 @@
#lang racket/base #lang racket/base
(provide mapper-lens (require racket/contract/base)
vector-mapper-lens (provide (contract-out
) [mapper-lens
(-> lens? (lens/c list? list?))]
[vector-mapper-lens
(-> lens? (lens/c immutable-vector? immutable-vector?))]
))
(require lens/base/main (require lens/base/main
lens/util/immutable
racket/vector racket/vector
fancy-app fancy-app
) )