From d1a85eb87934d348c9789aec59c751fa615ec363 Mon Sep 17 00:00:00 2001 From: Benjamin Barenblat Date: Thu, 23 Aug 2018 17:24:47 -0400 Subject: Clean up casts Use unsigned char buffers more pervasively throughout the code. This removes most calls to `asCUCharBuf`, isolating `unsafeCoerce` further. By making some type signatures slightly more flexible, also eliminate most explicit integer conversions. --- src/BTLS/Cast.hs | 4 ---- 1 file changed, 4 deletions(-) (limited to 'src/BTLS/Cast.hs') diff --git a/src/BTLS/Cast.hs b/src/BTLS/Cast.hs index a467c90..6f29469 100644 --- a/src/BTLS/Cast.hs +++ b/src/BTLS/Cast.hs @@ -15,11 +15,7 @@ module BTLS.Cast where import Foreign (Ptr) -import Foreign.C.Types import Unsafe.Coerce (unsafeCoerce) -asCUCharBuf :: Ptr CChar -> Ptr CUChar -asCUCharBuf = unsafeCoerce - asVoidPtr :: Ptr a -> Ptr () asVoidPtr = unsafeCoerce -- cgit v1.2.3