Merge pull request #105 from alexbiehl/patch-1

Make rd_kafka_destroy a safe foreign call
haskell-works · Aug 11, 2019 · 2d33327 · 2d33327
2 parents 40fef1e + 94a2898
commit 2d33327
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Kafka/Internal/RdKafka.chs b/src/Kafka/Internal/RdKafka.chs
@@ -827,7 +827,7 @@ newRdKafkaTopicConfT = do
  {enumToCInt `RdKafkaTypeT', `RdKafkaConfTPtr', id `CCharBufPointer', cIntConv `CSize'}
  -> `RdKafkaTPtr' #}
 
-foreign import ccall unsafe "rdkafka.h &rd_kafka_destroy"
+foreign import ccall safe "rdkafka.h &rd_kafka_destroy"
  rdKafkaDestroy :: FunPtr (Ptr RdKafkaT -> IO ())
 
 newRdKafkaT :: RdKafkaTypeT -> RdKafkaConfTPtr -> IO (Either Text RdKafkaTPtr)