diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix debug info in errors.c

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@453 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2002-04-23 22:45:21 +00:00
parent 778dbbde3e
commit 2d5fc60330
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
C/errors.c
View File

@ -363,8 +363,8 @@ Error (yap_error_number type, Term where, char *format,...)
PrologMode &= ~AbortMode;
PrologMode |= InErrorMode;
} else {
plwrite( where, DebugPutc, 0);
where = CopyTerm(Deref(where));
if (type != SYNTAX_ERROR)
where = CopyTerm(Deref(where));
if (IsVarTerm(where)) {
/* we must be careful someone gave us a copy to a local variable */
Term t = MkVarTerm();