diff --git a/relational-query-HDBC/src/Database/HDBC/Record/Insert.hs b/relational-query-HDBC/src/Database/HDBC/Record/Insert.hs index 12878621..7c979a57 100644 --- a/relational-query-HDBC/src/Database/HDBC/Record/Insert.hs +++ b/relational-query-HDBC/src/Database/HDBC/Record/Insert.hs @@ -85,6 +85,7 @@ chunks n = rec' where (c, tl) = splitAt n xs -- | Prepare and insert with chunk insert statement. Result is insert action list. +{-# DEPRECATED chunksInsertActions "Difficult to release around prepared statement resources." #-} chunksInsertActions :: (IConnection conn, ToSql SqlValue a) => conn -> Insert a