“ traceEvent”和“ traceMarker”有什么区别？

Question

该Debug.Trace模块具有traceEvent向事件日志发出消息的功能。最近，traceMarker添加了一个功能似乎相同的功能。例如，使用以下程序：

module Main where

import Debug.Trace

main :: IO ()
main = do
    traceEventIO "This is an event"
    traceMarkerIO "This is a marker"

使用编译-debug -w -eventlog -rtsopts并执行+RTS -vu，它在事件日志中显示以下内容：

...
cap 0: running thread 1 (ThreadRunGHC)
cap 0: This is an event
cap 0: User marker: This is a marker
cap 0: thread 1 stopped (finished)
cap 0: created thread 2
...

什么traceEvent时候使用，traceMarker什么时候使用？