www

commit 27380a232db8b964cf4782891de035ecf04533ae
parent e71857df5d31d93dc412db1a13ea6e99a3a70c4e
Author: Georges Dupéron <georges.duperon@gmail.com>
Date:   Tue, 14 Mar 2017 23:51:53 +0100

Bugfix

Diffstat:
M
private/copy-attribute.rkt
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/private/copy-attribute.rkt b/private/copy-attribute.rkt
@@ -72,7 +72,8 @@
               (make-attribute-mapping (quote-syntax vtmp)
                                       'name 'ellipsis-depth 'syntax?))
             (define-syntax name
-              (make-auto-pvar 'ellipsis-depth (quote-syntax stmp)))))
+              (make-auto-pvar 'ellipsis-depth (quote-syntax stmp)))
+            (define-pvars name)))
       ;; TODO ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ vvvvvvvvvvvvvvvvvvvvvvvvvv
       #'(begin
           (define-syntax-class extract-non-syntax