module Rel8.Statement.SQL
( showDelete
, showInsert
, showUpdate
)
where
import Prelude
import Rel8.Statement.Delete ( Delete, ppDelete )
import Rel8.Statement.Insert ( Insert, ppInsert )
import Rel8.Statement.Update ( Update, ppUpdate )
showDelete :: Delete a -> String
showDelete :: forall a. Delete a -> String
showDelete = forall a. Show a => a -> String
show forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Delete a -> Doc
ppDelete
showInsert :: Insert a -> String
showInsert :: forall a. Insert a -> String
showInsert = forall a. Show a => a -> String
show forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Insert a -> Doc
ppInsert
showUpdate :: Update a -> String
showUpdate :: forall a. Update a -> String
showUpdate = forall a. Show a => a -> String
show forall b c a. (b -> c) -> (a -> b) -> a -> c
. forall a. Update a -> Doc
ppUpdate