summaryrefslogtreecommitdiff
path: root/compiler/deSugar/Match.hs
diff options
context:
space:
mode:
authorAustin Seipp <austin@well-typed.com>2015-05-06 10:20:26 -0500
committerAustin Seipp <austin@well-typed.com>2015-05-06 10:20:26 -0500
commit97d320f56b5848d6ba2c723c6e7f04f98e349a86 (patch)
tree0470a73a6b5934ddbd24593262f55b5bc36c34a5 /compiler/deSugar/Match.hs
parentf34c072820f617f09c3d1c4e539c41fb2ab645b1 (diff)
downloadhaskell-97d320f56b5848d6ba2c723c6e7f04f98e349a86.tar.gz
Revert "API Annotations : add Locations in hsSyn were layout occurs"
This reverts commit fb54b2c11cc7f2cfbafa35b6a1819d7443aa5494. As Alan pointed out, this will make cherry picking a lot harder until 7.10.2, so lets back it out until after the release.
Diffstat (limited to 'compiler/deSugar/Match.hs')
-rw-r--r--compiler/deSugar/Match.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/deSugar/Match.hs b/compiler/deSugar/Match.hs
index 5ea18a4470..c8e30f18a7 100644
--- a/compiler/deSugar/Match.hs
+++ b/compiler/deSugar/Match.hs
@@ -791,7 +791,7 @@ one pattern, and match simply only accepts one pattern.
JJQC 30-Nov-1997
-}
-matchWrapper ctxt (MG { mg_alts = L _ matches
+matchWrapper ctxt (MG { mg_alts = matches
, mg_arg_tys = arg_tys
, mg_res_ty = rhs_ty
, mg_origin = origin })