From d270e890f175de95fbdde8faa31c029afc301c79 Mon Sep 17 00:00:00 2001
From: Mike Pall <mike>
Date: Tue, 21 Sep 2010 21:43:29 +0200
Subject: [PATCH] PPC: Reschedule continuation dispatch.

---
 src/buildvm_ppc.dasc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/buildvm_ppc.dasc b/src/buildvm_ppc.dasc
index 2ef65b40..a8ac8095 100644
--- a/src/buildvm_ppc.dasc
+++ b/src/buildvm_ppc.dasc
@@ -542,12 +542,12 @@ static void build_subroutines(BuildCtx *ctx)
   |   sub BASE, BASE, TMP1		// Restore caller BASE.
   |    lwz LFUNC:TMP1, FRAME_FUNC(BASE)
   |   subi TMP2, RD, 8
-  |  mtctr TMP0
   |    lwz PC, -16(RB)			// Restore PC from [cont|PC].
   |    lwz TMP1, LFUNC:TMP1->pc
   |   evstddx TISNIL, RA, TMP2		// Ensure one valid arg.
   |    lwz KBASE, PC2PROTO(k)(TMP1)
   |  // BASE = base, RA = resultptr, RB = meta base
+  |  mtctr TMP0
   |  bctr				// Jump to continuation.
   |
   |->cont_cat:				// RA = resultptr, RB = meta base