From 9d114cfc773171b0a95bd4d2c39f1bb0eb783c8d Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Sat, 2 Nov 2019 15:33:13 -0700
Subject: rename everything back to caps to appease ghc

---
 Com/Simatime/Alpha.hs | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 Com/Simatime/Alpha.hs

(limited to 'Com/Simatime/Alpha.hs')

diff --git a/Com/Simatime/Alpha.hs b/Com/Simatime/Alpha.hs
new file mode 100644
index 0000000..438b97a
--- /dev/null
+++ b/Com/Simatime/Alpha.hs
@@ -0,0 +1,24 @@
+{-# LANGUAGE NoImplicitPrelude #-}
+-- | Commonly useful functions, a Prelude replacement.
+module Com.Simatime.Alpha (
+  -- * Re-export Protolude
+  module X
+  -- * General functions
+  , (/@)
+  -- * Debugging tools
+  , say
+  -- * TODO: remove this
+  , Prelude.read
+  ) where
+
+import qualified Prelude
+import Protolude as X
+import Data.String
+
+-- | Debugging printf
+say :: String -> IO ()
+say msg = putStrLn msg
+
+-- | Alias for map, fmap, <$>
+(/@) :: Functor f => (a -> b) -> f a -> f b
+(/@) = fmap
-- 
cgit v1.2.3