aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/source/luxc/lang/analysis/structure.lux
diff options
context:
space:
mode:
authorEduardo Julian2017-12-02 13:55:48 -0400
committerEduardo Julian2017-12-02 13:55:48 -0400
commit5c4a26c9344898c4fa958946b47b55e1c84818bd (patch)
treefe599294cc3d08ca1995a7cd58a51baa18689944 /new-luxc/source/luxc/lang/analysis/structure.lux
parent1651d847ba70ee36171f3809a25bece325fd5715 (diff)
- "gensym" went back to producing Code, instead of Ident.
Diffstat (limited to 'new-luxc/source/luxc/lang/analysis/structure.lux')
-rw-r--r--new-luxc/source/luxc/lang/analysis/structure.lux7
1 files changed, 3 insertions, 4 deletions
diff --git a/new-luxc/source/luxc/lang/analysis/structure.lux b/new-luxc/source/luxc/lang/analysis/structure.lux
index 4561388c9..ce678837e 100644
--- a/new-luxc/source/luxc/lang/analysis/structure.lux
+++ b/new-luxc/source/luxc/lang/analysis/structure.lux
@@ -156,12 +156,11 @@
## blurring the line between what was wanted (the separation)
## and what was analysed.
[tailT tailC]
- (do @
- [g!tail (macro.gensym "tail")]
+ (macro.with-gensyms [g!tail]
(&.with-type tailT
(analyse (` ("lux case" [(~+ tailC)]
- (~@ g!tail)
- (~@ g!tail))))))
+ (~ g!tail)
+ (~ g!tail))))))
))))
(def: #export (analyse-product analyse membersC)