/
Console.purs
37 lines (26 loc) · 1.17 KB
/
Console.purs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
module Effect.Class.Console where
import Data.Function ((<<<))
import Data.Show (class Show)
import Data.Unit (Unit)
import Effect.Class (class MonadEffect, liftEffect)
import Effect.Console as EffConsole
log :: forall m. MonadEffect m => String -> m Unit
log = liftEffect <<< EffConsole.log
logShow :: forall m a. MonadEffect m => Show a => a -> m Unit
logShow = liftEffect <<< EffConsole.logShow
warn :: forall m. MonadEffect m => String -> m Unit
warn = liftEffect <<< EffConsole.warn
warnShow :: forall m a. MonadEffect m => Show a => a -> m Unit
warnShow = liftEffect <<< EffConsole.warnShow
error :: forall m. MonadEffect m => String -> m Unit
error = liftEffect <<< EffConsole.error
errorShow :: forall m a. MonadEffect m => Show a => a -> m Unit
errorShow = liftEffect <<< EffConsole.errorShow
info :: forall m. MonadEffect m => String -> m Unit
info = liftEffect <<< EffConsole.info
infoShow :: forall m a. MonadEffect m => Show a => a -> m Unit
infoShow = liftEffect <<< EffConsole.infoShow
time :: forall m. MonadEffect m => String -> m Unit
time = liftEffect <<< EffConsole.time
timeEnd :: forall m. MonadEffect m => String -> m Unit
timeEnd = liftEffect <<< EffConsole.timeEnd