From c2a3c35db1c528a5af37c358a474427ca9f3bf37 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Thu, 17 Sep 2015 11:12:54 -0400 Subject: [PATCH] Correct typo in contract --- ast.rkt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ast.rkt b/ast.rkt index 6b632df..36054e6 100644 --- a/ast.rkt +++ b/ast.rkt @@ -7,8 +7,8 @@ (list/c any/c (or/c exact-positive-integer? #f) (or/c exact-nonnegative-integer? #f) - (or/c exact-nonnegative-integer? #f) - (or/c exact-positive-integer? #f)))) + (or/c exact-positive-integer? #f) + (or/c exact-nonnegative-integer? #f)))) (define-struct predicate-sym (srcloc sym) #:prefab) (define datum/c (or/c string? symbol? predicate-sym?))