From a9647b032151905a4687c2d7a0e93a3821e4389b Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Fri, 5 Jun 2009 09:48:00 -0500
Subject: [PATCH] wake up goals the same order they were suspended.

---
 pl/corout.yap | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/pl/corout.yap b/pl/corout.yap
index f59023dbc..45a55af8a 100644
--- a/pl/corout.yap
+++ b/pl/corout.yap
@@ -92,8 +92,8 @@
 
 '$execute_woken_system_goals'([]).
 '$execute_woken_system_goals'([G|LG]) :-
-	'$execute_woken_system_goal'(G),
-	'$execute_woken_system_goals'(LG).
+	'$execute_woken_system_goals'(LG),
+	'$execute_woken_system_goal'(G).
 
 %
 % X surely was bound, otherwise we would not be awaken.