Skip to content

Instantly share code, notes, and snippets.

@Blaisorblade
Forked from mukeshtiwari/Lib.hs
Last active April 13, 2019 11:27
Show Gist options
  • Save Blaisorblade/a0a22d2de0dc1dd5f77ec395fa05fa9b to your computer and use it in GitHub Desktop.
Save Blaisorblade/a0a22d2de0dc1dd5f77ec395fa05fa9b to your computer and use it in GitHub Desktop.
{-# LANGUAGE CPP, MagicHash #-}
module Lib where
import qualified Prelude
#ifdef __GLASGOW_HASKELL__
import qualified GHC.Base
unsafeCoerce = GHC.Base.unsafeCoerce#
#else
-- HUGS
import qualified IOExts
unsafeCoerce = IOExts.unsafeCoerce
#endif
unsafeCoerce :: a -> b
__ :: any
__ = Prelude.error "Logical or arity value used"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment