jimmy/postgrest
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

for function for #19

Browse Source
This commit is contained in:
Stephen Diehl
2016-09-14 09:47:47 +01:00
parent e14e1e3613
commit 36b56ad3a2
1 changed files with 4 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Protolude.hs
+4
View File
@@ -17,6 +17,7 @@ module Protolude (
print, print,
throwIO, throwIO,
throwTo, throwTo,
foreach,
show, show,
LText, LText,
@@ -393,6 +394,9 @@ throwIO = liftIO . Control.Exception.throwIO
throwTo :: (X.MonadIO m, Exception e) => ThreadId -> e -> m () throwTo :: (X.MonadIO m, Exception e) => ThreadId -> e -> m ()
throwTo tid e = liftIO (Control.Exception.throwTo tid e) throwTo tid e = liftIO (Control.Exception.throwTo tid e)
foreach :: Functor f => f a -> (a -> b) -> f b
foreach = flip fmap
show :: (Show a, StringConv String b) => a -> b show :: (Show a, StringConv String b) => a -> b
show x = toS (PBase.show x) show x = toS (PBase.show x)
{-# SPECIALIZE show :: Show a => a -> Text #-} {-# SPECIALIZE show :: Show a => a -> Text #-}