testsuite/tests/corelint/T21152.hs


1
2
3
4
5
6
7
8

{-# LANGUAGE MagicHash #-}

module T21152 where

import GHC.Exts ( Int#, reallyUnsafePtrEquality# )

reallyUnsafePtrEquality :: a -> a -> Int#
reallyUnsafePtrEquality = reallyUnsafePtrEquality#