GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-22 17:42:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

When profiling, don't add cost centres in Data.Binary.Get

Browse Source 
This change speeds up profiling by an order of magnitude.
Without it, the >>= function for Get dominates runtime completely during profiling.
This commit is contained in:
Andreas Källberg
2021-10-11 10:33:43 +08:00
parent 25dd1354c7
commit 221597bd79
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/runtime/haskell/Data/Binary/Get.hs
View File

@@ -1,4 +1,6 @@
{-# LANGUAGE CPP, MagicHash #-} {-# LANGUAGE CPP, MagicHash #-}
-- This module makes profiling a lot slower
{-# OPTIONS_GHC -fno-prof-auto #-}
-- for unboxed shifts -- for unboxed shifts
----------------------------------------------------------------------------- -----------------------------------------------------------------------------