@@ -126,7 +126,8 @@ checkEnv s = liftIO $ getEnv s
126126-- other (hopefully more useful) client is installed over the top of
127127-- it. This is the default trace client.
128128nullTracer :: Process ()
129−nullTracer = forever' $ receiveWait [ matchUnknown (return ()) ]
129+nullTracer =
130+ forever' $ receiveWait [ matchUnknown (return ()) ]
130131
131132systemLoggerTracer :: Process ()
132133systemLoggerTracer = do