syntax error was giving the offset
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1529 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
7fa3e86284
commit
a4eaafaef3
@ -16,6 +16,7 @@
|
|||||||
|
|
||||||
<h2>Yap-5.1.0:</h2>
|
<h2>Yap-5.1.0:</h2>
|
||||||
<ul>
|
<ul>
|
||||||
|
<li> FIXED: more compilation problems if GMP not there (Remko Troncon).</li>
|
||||||
<li> FIXED: make syntax error report the line where the bug was (Jude Shavlik).</li>
|
<li> FIXED: make syntax error report the line where the bug was (Jude Shavlik).</li>
|
||||||
<li> FIXED: ok, MkBigInt shouldn't free the bigint.</li>
|
<li> FIXED: ok, MkBigInt shouldn't free the bigint.</li>
|
||||||
<li> FIXED: MkBigInt already frees bigint.</li>
|
<li> FIXED: MkBigInt already frees bigint.</li>
|
||||||
|
@ -11,8 +11,12 @@
|
|||||||
* File: errors.yap *
|
* File: errors.yap *
|
||||||
* comments: error messages for YAP *
|
* comments: error messages for YAP *
|
||||||
* *
|
* *
|
||||||
* Last rev: $Date: 2006-01-20 04:35:28 $,$Author: vsc $ *
|
* Last rev: $Date: 2006-01-26 19:20:00 $,$Author: vsc $ *
|
||||||
* $Log: not supported by cvs2svn $
|
* $Log: not supported by cvs2svn $
|
||||||
|
* Revision 1.73 2006/01/20 04:35:28 vsc
|
||||||
|
*
|
||||||
|
* fix error message
|
||||||
|
*
|
||||||
* Revision 1.72 2005/11/23 13:24:00 vsc
|
* Revision 1.72 2005/11/23 13:24:00 vsc
|
||||||
* cleanups in OS interface predicates.
|
* cleanups in OS interface predicates.
|
||||||
*
|
*
|
||||||
@ -847,8 +851,9 @@ print_message(Level, Mss) :-
|
|||||||
[Where]).
|
[Where]).
|
||||||
|
|
||||||
|
|
||||||
'$dump_syntax_error_line'(_,Position) :-
|
'$dump_syntax_error_line'(Start,Position) :-
|
||||||
format(user_error,', near line ~d:~n',[Position]).
|
Pos is Start+Position,
|
||||||
|
format(user_error,', near line ~d:~n',[Pos]).
|
||||||
|
|
||||||
'$dump_syntax_error_term'(0,J,L) :- !,
|
'$dump_syntax_error_term'(0,J,L) :- !,
|
||||||
format(user_error,'~n', []),
|
format(user_error,'~n', []),
|
||||||
|
Reference in New Issue
Block a user