fix report on initial and token line for parser.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@540 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -1074,7 +1074,7 @@ p_compile(void)
|
||||
if (ErrorMessage) {
|
||||
if (IntOfTerm(t1) & 4) {
|
||||
Error(Error_TYPE, Error_Term,
|
||||
"in line %d, %s", StartLine, ErrorMessage);
|
||||
"in line %d, %s", FirstLineInParse(), ErrorMessage);
|
||||
} else
|
||||
Error(Error_TYPE, Error_Term, ErrorMessage);
|
||||
return (FALSE);
|
||||
@@ -1111,7 +1111,7 @@ p_compile_dynamic(void)
|
||||
}
|
||||
if (ErrorMessage) {
|
||||
if (IntOfTerm(t1) & 4) {
|
||||
Error(Error_TYPE, Error_Term, "line %d, %s", StartLine, ErrorMessage);
|
||||
Error(Error_TYPE, Error_Term, "line %d, %s", FirstLineInParse(), ErrorMessage);
|
||||
} else
|
||||
Error(Error_TYPE, Error_Term, ErrorMessage);
|
||||
return (FALSE);
|
||||
|
Reference in New Issue
Block a user