blob: bae7fa5db67f88c5602bbaa907b617350335ebe5 (
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 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
|
