newIdLoc :: NonVoid Id -> CodeGen CgLoc
newIdLoc (NonVoid id) = newTemp (isGcPtrRep rep) (primRepFieldType rep)
  where rep = idPrimRep id
newIdLoc :: NonVoid Id -> CodeGen CgLoc
newIdLoc (NonVoid id) = newTemp (isGcPtrRep rep) (primRepFieldType rep)
  where rep = idPrimRep id
newIdLoc (NonVoid id) = newTemp (isGcPtrRep rep) (primRepFieldType rep)
  where rep = idPrimRep id