diff --git a/loader/task.c b/loader/task.c
index cd9ff46..d042fca 100644
--- a/loader/task.c
+++ b/loader/task.c
@@ -973,8 +973,12 @@
         return;
     }
 
+    TRACE(task, "%04x: DirectedYield(%04x)\n", pCurTask->hSelf, hTask );
+
     pCurTask->hYieldTo = hTask;
     OldYield();
+
+    TRACE(task, "%04x: back from DirectedYield(%04x)\n", pCurTask->hSelf, hTask );
 }