add ga_inl, ga_inr

[ghc-base.git] / Unsafe / Coerce.hs

diff --git a/Unsafe/Coerce.hs b/Unsafe/Coerce.hs
index e911c6f..421cdd0 100644 (file)
--- a/Unsafe/Coerce.hs
+++ b/Unsafe/Coerce.hs
@@ -1,4 +1,5 @@
-{-# OPTIONS_GHC -fno-implicit-prelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, MagicHash #-}
+
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Unsafe.Coerce
@@ -28,7 +29,7 @@
 module Unsafe.Coerce (unsafeCoerce) where
 
 #if defined(__GLASGOW_HASKELL__)
-import GHC.Base (unsafeCoerce#)
+import GHC.Prim (unsafeCoerce#)
 unsafeCoerce :: a -> b
 unsafeCoerce = unsafeCoerce#
 #endif