[
Size: a a a
[
[
N
[
JJ
N
MK
MK
addr2Int#MK
AV
Right ok <- action
| Left e => -- process error
-- only executed if ok
AS
N
-- | casts a @Ptr@ to a @WordPtr@ ptrToWordPtr :: Ptr a -> WordPtr ptrToWordPtr (Ptr a#) = WordPtr (W# (int2Word# (addr2Int# a#)))AV
AS
[
AV
MK
[
[