From 9e5a25c61e0e5b2346a3ce8cc30624878b8255b0 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Tue, 2 Mar 2010 22:21:48 +0000
Subject: [PATCH] make sure syntax_error receives a global variable (obs from
 Jose Santos).

---
 C/iopreds.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/C/iopreds.c b/C/iopreds.c
index 01f05c897..75a88777c 100755
--- a/C/iopreds.c
+++ b/C/iopreds.c
@@ -3760,6 +3760,8 @@ syntax_error (TokEntry * tokptr, int sno, Term *outp)
   Term *error = tf+3;
   CELL *Hi = H;
 
+  /* make sure to globalise variable */
+  Yap_unify(*outp, MkVarTerm());
   start = tokptr->TokPos;
   clean_vars(Yap_VarTable);
   clean_vars(Yap_AnonVarTable);