From 1a68793247b8845cefad4d157e4f4d25b1731b42 Mon Sep 17 00:00:00 2001 From: Dominic Steinitz Date: Fri, 30 Mar 2018 12:48:20 +0100 Subject: Implement CI --- packages/base/src/Internal/Devel.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'packages/base/src/Internal/Devel.hs') diff --git a/packages/base/src/Internal/Devel.hs b/packages/base/src/Internal/Devel.hs index 3887663..f72d8aa 100644 --- a/packages/base/src/Internal/Devel.hs +++ b/packages/base/src/Internal/Devel.hs @@ -54,6 +54,7 @@ check msg f = do -- | postfix error code check infixl 0 #| +(#|) :: IO CInt -> String -> IO () (#|) = flip check -- | Error capture and conversion to Maybe -- cgit v1.2.3