blob: 438b97a9e94585377377ed5a7a7b60b81308fd0a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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
|
