Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Don't use both define/contract and provide/contract

  • Loading branch information...
commit 57462ce435fdca5e9a4bc8bf40ccfd2fe2a2322e 1 parent 4495f14
@greghendershott authored
Showing with 2 additions and 2 deletions.
  1. +2 −2 util.rkt
View
4 util.rkt
@@ -13,11 +13,11 @@
[(_ (id . args) contract body ...)
(begin
(define/contract (id . args) contract body ...)
- (provide/contract [id contract]))]
+ (provide id))]
[(_ id contract expr)
(begin
(define/contract id contract expr)
- (provide/contract [id contract]))] ))
+ (provide id))]))
(define-syntax define/provide
(syntax-rules ()
Please sign in to comment.
Something went wrong with that request. Please try again.