Make the log parser strict in the parse state, just to be safe.

1 files changed, 1 insertions, 1 deletions

diff --git a/tools/resolver-visualize/Resolver/Log.hs b/tools/resolver-visualize/Resolver/Log.hs
index 5c741648..3927e69a 100644
--- a/tools/resolver-visualize/Resolver/Log.hs
+++ b/tools/resolver-visualize/Resolver/Log.hs
@@ -189,7 +189,7 @@ data LogParseState = LogParseState {
       -- | The state of the parser; we magically know that this
       -- contains intern sets that should be shared over all parse
       -- steps.
-      logParseParseState :: ParseState,
+      logParseParseState :: !ParseState,
       -- | All the steps in the file, in reverse order.  The first
       -- element in this list is the step currently being parsed (if
       -- any).