summaryrefslogtreecommitdiff
path: root/compiler/main/HscStats.hs
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2017-11-07 11:50:36 -0500
committerBen Gamari <ben@smart-cactus.org>2017-11-07 13:13:16 -0500
commit93b4820607aed1ab633e836084c5e39f5e631f87 (patch)
treecd1b51c1ff088e9ff25747875bd12e963ae1ec40 /compiler/main/HscStats.hs
parentc1bc923b08860101d0b74795ff42f6022c7fec0b (diff)
downloadhaskell-93b4820607aed1ab633e836084c5e39f5e631f87.tar.gz
Revert "WIP on combining Step 1 and 3 of Trees That Grow"
This reverts commit 0ff152c9e633accca48815e26e59d1af1fe44ceb. Sadly this broke when bootstrapping with 8.0.2 due to #14396. Reverts haddock submodule.
Diffstat (limited to 'compiler/main/HscStats.hs')
-rw-r--r--compiler/main/HscStats.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/main/HscStats.hs b/compiler/main/HscStats.hs
index 23e5c9289a..48b8eccaca 100644
--- a/compiler/main/HscStats.hs
+++ b/compiler/main/HscStats.hs
@@ -102,7 +102,7 @@ ppSourceStats short (L _ (HsModule _ exports imports ldecls _ _))
(inst_method_ds, method_specs, method_inlines, inst_type_ds, inst_data_ds)
= sum5 (map inst_info inst_decls)
- count_bind (PatBind { pat_lhs = L _ (VarPat{}) }) = (1,0,0)
+ count_bind (PatBind { pat_lhs = L _ (VarPat _) }) = (1,0,0)
count_bind (PatBind {}) = (0,1,0)
count_bind (FunBind {}) = (0,1,0)
count_bind (PatSynBind {}) = (0,0,1)