www

commit dcc3f1d758e9377c3ad096fe6fe2db1497495395
parent bb7b5e9a7db94e7f9d2db356c807bdf5e6435342
Author: Georges Dupéron <georges.duperon@gmail.com>
Date:   Thu,  8 Jun 2017 23:46:39 +0200

Fixed error message

Diffstat:
M
current-pvars.rkt
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/current-pvars.rkt b/current-pvars.rkt
@@ -171,7 +171,7 @@
                     (syntax*->list (stx-cdr stx))
                     (andmap identifier?
                             (syntax*->list (stx-cdr stx)))))
-          (raise-syntax-error 'with-pvars "bad syntax" stx)
+          (raise-syntax-error 'define-pvars "bad syntax" stx)
           (void))
       (let* ([pvars (reverse (syntax*->list (stx-cdr stx)))]
              [unique-at-runtime (map gensym (map syntax-e pvars))]