diff options
| author | Andreas Källberg <anka.213@gmail.com> | 2021-10-11 10:33:43 +0800 |
|---|---|---|
| committer | Andreas Källberg <anka.213@gmail.com> | 2022-05-03 13:08:35 +0800 |
| commit | 221597bd79054af47d3d5866d74a03ee9d7cd6e6 (patch) | |
| tree | e84b7edb2349cea0c5748b34809aafea1737e402 | |
| parent | 25dd1354c71ab9267d6fdb8ad7cf8cc7ce30812f (diff) | |
When profiling, don't add cost centres in Data.Binary.Get
This change speeds up profiling by an order of magnitude.
Without it, the >>= function for Get dominates runtime completely during profiling.
| -rw-r--r-- | src/runtime/haskell/Data/Binary/Get.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/runtime/haskell/Data/Binary/Get.hs b/src/runtime/haskell/Data/Binary/Get.hs index 54f17ae95..07a3db40e 100644 --- a/src/runtime/haskell/Data/Binary/Get.hs +++ b/src/runtime/haskell/Data/Binary/Get.hs @@ -1,4 +1,6 @@ {-# LANGUAGE CPP, MagicHash #-} +-- This module makes profiling a lot slower +{-# OPTIONS_GHC -fno-prof-auto #-} -- for unboxed shifts ----------------------------------------------------------------------------- |