From 36a61da3883e8baca45a80c703211ae71be4c6ff Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 19 Aug 2015 07:01:36 -0700
Subject: Fix broken @@@<n>/@@@rest references in quasiliterals.

* parser.y (quasi_meta_helper): When obj is a sys:var,
leave it alone; don't add another layer of var. Also,
do the same if it is a sys:expr.

* tests/012/quasi.tl: Added test case.
---
 tests/012/quasi.tl | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'tests/012/quasi.tl')

diff --git a/tests/012/quasi.tl b/tests/012/quasi.tl
index 7511d4bd..1c4092e2 100644
--- a/tests/012/quasi.tl
+++ b/tests/012/quasi.tl
@@ -21,3 +21,7 @@
 (test
   [(ret `@1-@@rest`) 1 2 3 4]
   "1-2 3 4")
+
+(test
+  [(ret [(ret `@1 @rest @@1 @@rest @@@rest @@@1`) 1 10]) 2 20]
+  "1 10 1 10 20 2")
-- 
cgit v1.2.3