diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2020-04-24 08:45:25 +0100 |
|---|---|---|
| committer | Matthew Pickering <matthewtpickering@gmail.com> | 2020-04-24 08:45:25 +0100 |
| commit | 00a8ad780165bceca2e4268f67efe0667e5922bf (patch) | |
| tree | 187170227b9b4ecf391e30d2020ef219d0437e3c /ghc/Main.hs | |
| parent | eaed0a3289e4c24ff1a70c6fc4b7f8bae6cd2dd3 (diff) | |
| download | haskell-wip/open-telemetry.tar.gz | |
Open telemwip/open-telemetry
Diffstat (limited to 'ghc/Main.hs')
| -rw-r--r-- | ghc/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ghc/Main.hs b/ghc/Main.hs index 7a356b920a..2a441bfb22 100644 --- a/ghc/Main.hs +++ b/ghc/Main.hs @@ -63,6 +63,7 @@ import Util import Panic import GHC.Types.Unique.Supply import MonadUtils ( liftIO ) +import OpenTelemetry -- Imports for --abi-hash import GHC.Iface.Load ( loadUserInterface ) @@ -98,7 +99,7 @@ import Prelude -- GHC's command-line interface main :: IO () -main = do +main = withSpan "main" $ do initGCStatistics -- See Note [-Bsymbolic and hooks] hSetBuffering stdout LineBuffering hSetBuffering stderr LineBuffering |