Commit ffe9a1ef authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Tiny wibble to trace message

parent 72f8eab9
......@@ -1103,7 +1103,7 @@ traceTcConstraints :: String -> TcM ()
traceTcConstraints msg
= do { lie_var <- getConstraintVar
; lie <- readTcRef lie_var
; traceTc (msg ++ "LIE:") (ppr lie)
; traceTc (msg ++ ": LIE:") (ppr lie)
}
\end{code}
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment