split into library + executables

1 files changed, 0 insertions, 28 deletions

diff --git a/Utils.hs b/Utils.hs
deleted file mode 100644
index a14be89..0000000
--- a/Utils.hs
+++ /dev/null
@@ -1,28 +0,0 @@
-module Utils where
-
-import Control.Exception
-import System.Directory
-import System.IO
-
-
-withTempFile :: FilePath -> String -> ((FilePath, Handle) -> IO a) -> IO a
-withTempFile tmpdir template =
-    bracket (openTempFile tmpdir template) (removeFile . fst)
-
-
-mintercalate :: Monoid b => b -> [b] -> b
-mintercalate c (h:t) = foldl (\acc x -> acc <> c <> x) h t
-mintercalate _ [] = mempty
-
-
-padl :: Int -> a -> [a] -> [a]
-padl n c s =
-    if length s < n
-        then padl n c (c:s)
-        else s
-
-padr :: Int -> a -> [a] -> [a]
-padr n c s =
-    if length s < n
-        then padr n c (s ++ [c])
-        else s