From f6facffe7a6111905a67b28a3f7ce651011d538d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Georges=20Dup=C3=A9ron?= <georges.duperon@gmail.com>
Date: Mon, 1 Aug 2016 18:58:27 +0200
Subject: [PATCH] =?UTF-8?q?Fixes=20bug=20with=20=E2=80=A6=20(again)?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 private/lp.rkt | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/private/lp.rkt b/private/lp.rkt
index 2b7d410f..581997d7 100644
--- a/private/lp.rkt
+++ b/private/lp.rkt
@@ -55,7 +55,8 @@
                              (syntax-local-introduce #'here)))
                   (define intr (make-syntax-delta-introducer b a))
                   (syntax-local-lift-expression
-                   (intr #`(quote-syntax (a-chunk (... name) (... expr) ...))
+                   (intr #`(quote-syntax (a-chunk ((... ...) name)
+                                                  ((... ...) expr) ...))
                          'flip))
                   #'(begin))
                 (macro-to-expand-unsyntax)))