@@ -734,32 +734,29 @@ least = unsafeFunctionVar "LEAST"
734734
735735-- | >>> printSQL $ unsafeBinaryOp "OR" true false
736736-- (TRUE OR FALSE)
737−unsafeBinaryOp :: ByteString {- ^ operator -} -> Operator ty0 ty1 ty2
737+unsafeBinaryOp :: ByteString -> Operator ty0 ty1 ty2
738738unsafeBinaryOp op x y = UnsafeExpression $ parenthesized $
739739 renderSQL x <+> op <+> renderSQL y
740740
741741-- | >>> printSQL $ unsafeUnaryOpL "NOT" true
742742-- (NOT TRUE)
743−unsafeUnaryOpL :: ByteString {- ^ operator -} -> x :--> y
743+unsafeUnaryOpL :: ByteString -> x :--> y
744744unsafeUnaryOpL op x = UnsafeExpression $ parenthesized $ op <+> renderSQL x
745745
746746-- | >>> printSQL $ true & unsafeUnaryOpR "IS NOT TRUE"
747747-- (TRUE IS NOT TRUE)
748−unsafeUnaryOpR :: ByteString {- ^ operator -} -> x :--> y
748+unsafeUnaryOpR :: ByteString -> x :--> y
749749unsafeUnaryOpR op x = UnsafeExpression $ parenthesized $ renderSQL x <+> op
750750
751751-- | >>> printSQL $ unsafeFunction "f" true
752752-- f(TRUE)
753−unsafeFunction :: ByteString {- ^ function -} -> x :--> y
753+unsafeFunction :: ByteString -> x :--> y
754754unsafeFunction fun x = UnsafeExpression $
755755 fun <> parenthesized (renderSQL x)
756756
757757-- | >>> printSQL $ unsafeFunctionN "f" (currentTime :* localTimestamp :* false *: literal 'a')
758758-- f(CURRENT_TIME, LOCALTIMESTAMP, FALSE, E'a')
759−unsafeFunctionN
760− :: SListI xs
761− => ByteString {- ^ function -}
762− -> FunctionN xs y
759+unsafeFunctionN :: SListI xs => ByteString -> FunctionN xs y
763760unsafeFunctionN fun xs = UnsafeExpression $
764761 fun <> parenthesized (renderCommaSeparated renderSQL xs)
765762