-- | The 'StaticKey' that can be used to look up the given 'StaticPtr'.
staticKey :: StaticPtr a -> StaticKey
staticKey (StaticPtr k _ _) = k
staticKey :: StaticPtr a -> StaticKey
staticKey (StaticPtr k _ _) = k
staticKey (StaticPtr k _ _) = k