diff --git a/Pass.hs b/Pass.hs
index 64aa5f2..c35079d 100644
--- a/Pass.hs
+++ b/Pass.hs
@@ -89,7 +89,7 @@ debugAST p
           veryDebug $ "}}}"
           veryDebug $ "{{{ State"
           ps <- get
-          veryDebug $ pshow ps
+          veryDebug $ show ps
           veryDebug $ "}}}"
 
 -- | Number lines in a piece of text.