Add diagnostics (temporary)

AmpersandTarski · Feb 16, 2022 · 33c2c1f · 33c2c1f
1 parent 9f55d96
commit 33c2c1f
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/src/Ampersand/Prototype/PHP.hs b/src/Ampersand/Prototype/PHP.hs
@@ -188,7 +188,13 @@ createTempDatabase fSpec = do
       $ phpStr
   logInfo $
     if T.null result
-      then "Temp database created succesfully."
+      then
+        display $
+          T.intercalate "\n" $
+            [ "Temp database created succesfully.",
+              "The statements:"
+            ]
+              <> addLineNumbers phpStr
       else
         display $
           T.intercalate "\n" $