summaryrefslogtreecommitdiff
path: root/ghc/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/Main.hs')
-rw-r--r--ghc/Main.hs3
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