[project @ 2005-04-25 15:56:19 by simonmar]

scavenge_one: fix reversed PAP/AP cases

[project @ 2005-04-25 15:56:19 by simonmar]
scavenge_one: fix reversed PAP/AP cases
17118d27 · simonmar · b050008e · 17118d27
Commit 17118d27 authored Apr 25, 2005 by simonmar
--- a/ghc/rts/GC.c
+++ b/ghc/rts/GC.c
@@ -3368,11 +3368,11 @@ scavenge_one(StgPtr p)
    }
    case PAP:
-	p = scavenge_AP((StgAP *)p);
+	p = scavenge_PAP((StgPAP *)p);
 	break;
    case AP:
-	p = scavenge_PAP((StgPAP *)p);
+	p = scavenge_AP((StgAP *)p);
 	break;
    case ARR_WORDS: