Add syntax keyword contract

2015-07-08 10:15:46 -07:00 · 2015-07-08 10:15:46 -07:00 · ac803ad8f5
commit ac803ad8f5
parent ba7d20446a
1 changed files with 3 additions and 1 deletions
--- a/lens/syntax-keyword.rkt
+++ b/lens/syntax-keyword.rkt
@ -7,7 +7,9 @@
 (module+ test
  (require rackunit))

-(provide syntax-keyword-seq-lens)
+(provide
+ (contract-out
+  [syntax-keyword-seq-lens (-> keyword? lens?)]))


 (define-syntax-rule (syntax-parse/default-noop stx option-or-clause ...)