From 948cae3ca7279040627db393e4372a668f8a22f7 Mon Sep 17 00:00:00 2001
From: Tom Smeding <tom@tomsmeding.com>
Date: Tue, 1 Oct 2024 23:18:15 +0200
Subject: Reverse-by-forward, and checking neural (it's wrong)

---
 src/Example/Format.hs | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 src/Example/Format.hs

(limited to 'src/Example/Format.hs')

diff --git a/src/Example/Format.hs b/src/Example/Format.hs
new file mode 100644
index 0000000..994f431
--- /dev/null
+++ b/src/Example/Format.hs
@@ -0,0 +1,9 @@
+module Example.Format where
+
+import System.IO.Unsafe
+import System.Process
+
+
+{-# NOINLINE formatter #-}
+formatter :: String -> String
+formatter str = unsafePerformIO $ readProcess "hindent" ["--line-length", "100"] str
-- 
cgit v1.2.3-70-g09d2