From eb700c647dc792561a7860202a6c496610a1d7cf Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?U-WIN-ENP104VVO3U=5CV=C3=ADtor=20Santos=20Costa?=
 <Vítor Santos Costa@WIN-ENP104VVO3U.(none)>
Date: Mon, 6 Jun 2011 12:29:13 +0100
Subject: [PATCH] fix lost buffer

---
 packages/PLStream/pl-file.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/packages/PLStream/pl-file.c b/packages/PLStream/pl-file.c
index bc67f2652..6fbd40cb4 100755
--- a/packages/PLStream/pl-file.c
+++ b/packages/PLStream/pl-file.c
@@ -329,7 +329,10 @@ initIO()
   int i;
 
 #ifdef __YAP_PROLOG__
+  IOFUNCTIONS buf;
+  buf = GD->os.iofunctions;
   memset(GD, 0, sizeof(gds_t));
+  GD->os.iofunctions = buf;
   memset(LD, 0, sizeof(PL_local_data_t));
 #endif
   streamAliases = newHTable(16);