on master help sign in
Mark variables as unused in Type.Environment
commit5f057de5d0081e51b4dc9f6b2e6c15872bbd2cc8 authorEvan Czaplicki <info@elm-lang.org> dateSat 7 Mar 2015, 17:00 (12 years ago) parent5e8dfa4
1 file changed+2−2
src/Type/Environment.hs+2−2
src/Type/Environment.hs+2−2
@@ -197,14 +197,14 @@ instantiatorHelp env aliasVars sourceType =
197197 case maybeSubAlias of
198198 Nothing ->
199199 return (VarN (Just (name,args')) v)
200− Just subAlias ->
200+ Just _subAlias ->
201201 return (TermN (Just (name,args')) (Var1 aliasedType'))
202202
203203 TermN maybeSubAlias t ->
204204 case maybeSubAlias of
205205 Nothing ->
206206 return (TermN (Just (name, args')) t)
207− Just subAlias ->
207+ Just _subAlias ->
208208 return (TermN (Just (name,args')) (Var1 aliasedType'))
209209
210210 T.Type name ->