From 2a78cf773cb447ac91c4a23d7e921e091e499134 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=96mer=20Sinan=20A=C4=9Facan?= Date: Thu, 18 Jan 2018 11:06:30 -0500 Subject: Remove unused extern cost centre collection Reviewers: bgamari, simonmar Reviewed By: simonmar Subscribers: alexbiehl, rwbarton, thomie, carter Differential Revision: https://phabricator.haskell.org/D4309 --- compiler/profiling/ProfInit.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/profiling/ProfInit.hs') diff --git a/compiler/profiling/ProfInit.hs b/compiler/profiling/ProfInit.hs index 557bdf0ea4..931299a655 100644 --- a/compiler/profiling/ProfInit.hs +++ b/compiler/profiling/ProfInit.hs @@ -23,7 +23,7 @@ import Module -- module; profilingInitCode :: Module -> CollectedCCs -> SDoc -profilingInitCode this_mod (local_CCs, ___extern_CCs, singleton_CCSs) +profilingInitCode this_mod (local_CCs, singleton_CCSs) = sdocWithDynFlags $ \dflags -> if not (gopt Opt_SccProfilingOn dflags) then empty -- cgit v1.2.1