6ee6a3e · elk · git.iko.soy

Fix #772, make case expression variable names safe

commit6ee6a3e175aa7fce28c62239c36cab273f3d1fc3 authorEvan Czaplicki <info@elm-lang.org> dateThu 28 Aug 2014, 01:23 (12 years ago) parent50f2878

1 file changed+1−1

unifiedsplit

compiler/Generate/JavaScript.hs+1−1

@@ -163,7 +163,7 @@ expression (A region expr) =

163163 (revisedMatch, stmt) <-

164164 case e of

165165 A _ (Var (Var.Canonical Var.Local x)) ->

166− return (Case.matchSubst [(tempVar,x)] initialMatch, [])

166+ return (Case.matchSubst [(tempVar, Var.varName x)] initialMatch, [])

167167 _ ->

168168 do e' <- expression e

169169 return (initialMatch, [VarDeclStmt () [varDecl tempVar e']])