aboutsummaryrefslogtreecommitdiffstats
path: root/app/Debug.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-10-20 10:40:02 +0200
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-11-07 09:50:52 +0100
commit8030de438d98732fda5c8681fc5afe4cdea71562 (patch)
tree88de4c8fe776e12cbf201b832d0b547d76e21e24 /app/Debug.hs
parentf849fe4f8bd424a57de870d6cb8f038221dd7ff2 (diff)
add `--edit` flag to `show` command
Diffstat (limited to 'app/Debug.hs')
-rw-r--r--app/Debug.hs7
1 files changed, 7 insertions, 0 deletions
diff --git a/app/Debug.hs b/app/Debug.hs
new file mode 100644
index 0000000..c6549a6
--- /dev/null
+++ b/app/Debug.hs
@@ -0,0 +1,7 @@
+module Debug where
+
+import Debug.Trace (trace)
+import Text.Printf (printf)
+
+debug :: Show a => String -> a -> a
+debug s x = trace (printf "%s: %s\n" s (show x)) x