From de78ee6fb77e7505160ab23e6e1b4e66dc87f698 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=96mer=20Sinan=20A=C4=9Facan?= Date: Sat, 28 Jan 2017 14:59:30 +0300 Subject: Document GHC.Profiling functions [ci skip] --- libraries/base/GHC/Profiling.hs | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/libraries/base/GHC/Profiling.hs b/libraries/base/GHC/Profiling.hs index 732917684d..917a208b30 100644 --- a/libraries/base/GHC/Profiling.hs +++ b/libraries/base/GHC/Profiling.hs @@ -6,5 +6,14 @@ module GHC.Profiling where import GHC.Base -foreign import ccall startProfTimer :: IO () +-- | Stop attributing ticks to cost centres. Allocations will still be +-- attributed. +-- +-- @since 4.7.0.0 foreign import ccall stopProfTimer :: IO () + +-- | Start attributing ticks to cost centres. This is called by the RTS on +-- startup. +-- +-- @since 4.7.0.0 +foreign import ccall startProfTimer :: IO () -- cgit v1.2.1