www

commit 55e5934598b2399956d3ac9b00f0d6eb6a3243a5
parent d64058ce51bfeaf54bd68dc766f091cb0f3c48c6
Author: Georges Dupéron <georges.duperon@gmail.com>
Date:   Wed, 25 Jan 2017 17:00:21 +0100

Fixed docs for (define-pvars (pvar ...)), should be (define-pvars pvar ...)

Diffstat:
M
main.rkt
 | 
8
+++++---
M
scribblings/stxparse-info.scrbl
 | 
6
+++---

2 files changed, 8 insertions(+), 6 deletions(-)
diff --git a/main.rkt b/main.rkt
@@ -1,3 +1,5 @@
 #lang racket/base
-(require "parse.rkt")
-(provide (all-from-out "parse.rkt"))
-\ No newline at end of file
+(require "parse.rkt"
+         "case.rkt")
+(provide (all-from-out "parse.rkt"
+                       "case.rkt"))
+\ No newline at end of file
diff --git a/scribblings/stxparse-info.scrbl b/scribblings/stxparse-info.scrbl
@@ -98,7 +98,7 @@ track which syntax or datum pattern variables are bound.
                           [v₂ (make-syntax-mapping depth (quote-syntax valvar))])
                code))]}
 
-@defform[(define-pvars (pvar ...))
+@defform[(define-pvars pvar ...)
          #:contracts ([pvar identifier?])]{
                                            
  Prepends the given @racket[pvar ...] to the list of pattern variables which
@@ -117,7 +117,7 @@ track which syntax or datum pattern variables are bound.
     @RACKETBLOCK[
  (let ()
    (code:comment "Alternate version of define/syntax-parse which")
-   (code:comment "contains (define-pvars (x)) in its expanded form.")
+   (code:comment "contains (define-pvars x) in its expanded form.")
    (define/syntax-parse x #'1)
    (define/syntax-parse y #'2)
    (define-syntax (get-pvars stx)
@@ -139,7 +139,7 @@ track which syntax or datum pattern variables are bound.
  (eval:check
   (let ()
     (code:comment "Alternate version of define/syntax-parse which")
-    (code:comment "contains (define-pvars (x)) in its expanded form.")
+    (code:comment "contains (define-pvars x) in its expanded form.")
     (define/syntax-parse x #'1)
     (define/syntax-parse y #'2)
     (define-syntax (get-pvars stx)