Replace `unsafeCoerce' with `castPtr'

1 files changed, 0 insertions, 21 deletions

diff --git a/src/BTLS/Cast.hs b/src/BTLS/Cast.hs
deleted file mode 100644
index 6f29469..0000000
--- a/src/BTLS/Cast.hs
+++ /dev/null
@@ -1,21 +0,0 @@
--- Copyright 2018 Google LLC
---
--- Licensed under the Apache License, Version 2.0 (the "License"); you may not
--- use this file except in compliance with the License. You may obtain a copy of
--- the License at
---
---     https://www.apache.org/licenses/LICENSE-2.0
---
--- Unless required by applicable law or agreed to in writing, software
--- distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
--- WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
--- License for the specific language governing permissions and limitations under
--- the License.
-
-module BTLS.Cast where
-
-import Foreign (Ptr)
-import Unsafe.Coerce (unsafeCoerce)
-
-asVoidPtr :: Ptr a -> Ptr ()
-asVoidPtr = unsafeCoerce