[fix word <-> addr casting in ghc back end
John Meacham <john@repetae.net>**20061218125208] hunk ./E/ToHs.hs 383
-        (("Addr#","Word#"),"int2Word#"),
-        (("Word#","Addr#"),"int2Addr#")
+        (("Addr#","Word#"),"addr2Word__"),
+        (("Word#","Addr#"),"word2Addr__")
hunk ./data/ViaGhc.hs 55
+addr2Word__ x = int2Word# (addr2Int# x)
+word2Addr__ x = int2Addr# (word2Int# x)