Teach GHC about the evaluatedness of compacted things
The result values of
compactAddWithSharing# are always in normal form. Unfortunately, the compiler doesn't know that.
Use the same trickery that
seq# employs to teach GHC what's what. Be sure to make the pointer field in
Compact strict to take advantage of this.