summaryrefslogtreecommitdiff
path: root/compiler/specialise/SpecConstr.hs
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2016-09-05 16:52:35 +0100
committerSimon Peyton Jones <simonpj@microsoft.com>2016-09-13 14:38:20 +0100
commit876b00ba25a615423f48b0cf9d443a9fd5dbd6f4 (patch)
tree2fbb1ffeac9c1dec95acd7f40c74925409e159f9 /compiler/specialise/SpecConstr.hs
parent8074e037c098b407e735af7fa3209fdb8943d666 (diff)
downloadhaskell-876b00ba25a615423f48b0cf9d443a9fd5dbd6f4.tar.gz
Comments and white space
Diffstat (limited to 'compiler/specialise/SpecConstr.hs')
-rw-r--r--compiler/specialise/SpecConstr.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/specialise/SpecConstr.hs b/compiler/specialise/SpecConstr.hs
index 1cf3d448bf..b485f750e4 100644
--- a/compiler/specialise/SpecConstr.hs
+++ b/compiler/specialise/SpecConstr.hs
@@ -1539,7 +1539,7 @@ specialise env bind_calls (RI { ri_fn = fn, ri_lam_bndrs = arg_bndrs
is_small_enough vars = isWorkerSmallEnough (sc_dflags env) vars
-- We are about to construct w/w pair in 'spec_one'.
-- Omit specialisation leading to high arity workers.
- -- See Note [Limit w/w arity]
+ -- See Note [Limit w/w arity] in WwLib
n_pats = length pats
spec_count' = n_pats + spec_count
; case sc_count env of