io-sim: more general ppTrace_ type signature

Author: coot

io-sim/CHANGELOG.md

@@ -22,6 +22,7 @@
   - `selectTraceEventsSayWithTime'`
   is more general.  These functions now accepts trace with any result, rather
   than one that finishes with `SimResult`.
+- More polymorphic `ppTrace_` type signature.
 
 ## 1.6.0.0
 

io-sim/src/Control/Monad/IOSim/Types.hs

@@ -938,7 +938,7 @@ ppTrace tr = Trace.ppTrace
 
 -- | Like 'ppTrace' but does not show the result value.
 --
-ppTrace_ :: SimTrace a -> String
+ppTrace_ :: Trace.Trace a SimEvent -> String
 ppTrace_ tr = Trace.ppTrace
                 (const "")
                 (ppSimEvent timeWidth tidWidth labelWidth)