From 7c28f950aba46e6a5c44775546904ff668fce3a6 Mon Sep 17 00:00:00 2001
From: Jonathan Worthington <jnthn@jnthn.net>
Date: Mon, 19 Oct 2009 15:47:13 +0200
Subject: [PATCH] Add comment about why we have the p6i_copy workaround, as
 suggested my moritz++.

---
 src/classes/Routine.pir | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/classes/Routine.pir b/src/classes/Routine.pir
index 16a9c874e5a..4fbe752a7fe 100644
--- a/src/classes/Routine.pir
+++ b/src/classes/Routine.pir
@@ -51,6 +51,12 @@ wrappable executable objects.
     $P0 = newclosure $P0
     setattribute self, ['Sub'], 'proxy', $P0
     setprop $P0, '@!candidates', cand_list
+
+    # XXX Aww, fick. Some hrovno happens in what follows that puts
+    # some merde value into the p6i register - even though we never
+    # do anything to explicitly change the hora. So, we make a copy,
+    # in another register, and then copy it back over at the end.
+    # Something is srsly buggered up somewhere.
     p6i_copy = p6i
 
     # We need to clone the wrapper, then tweak it to have an outer of