diff --git a/src/Parser/JSON.md b/src/Parser/JSON.md
index f09c8dd..3fa005e 100644
--- a/src/Parser/JSON.md
+++ b/src/Parser/JSON.md
@@ -259,7 +259,7 @@ quickSmoke : IO Bool
 quickSmoke = do
   let input = "{\"string\":\"string\",\"number\":5,\"true\":true,\"false\":false,\"null\":null,\"array\":[1,2,3]}"
   putStrLn input
-  Right (type ** parsed) <- runFirstIO value input
+  Right (type ** parsed) <- runFirstIODebug value input
     | Left err => do
       printLn err
       pure False