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

small fixes

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@2289 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2008-07-16 10:58:59 +00:00
parent d832a81991
commit dc53522604
3 changed files with 14 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
H/YapOpcodes.h
View File

@ -11,8 +11,11 @@
* File: YapOpcodes.h * * File: YapOpcodes.h *
* comments: Central Table with all YAP opcodes * * comments: Central Table with all YAP opcodes *
* * * *
* Last rev: $Date: 2008-03-25 22:03:13 $ * * Last rev: $Date: 2008-07-16 10:58:59 $ *
* $Log: not supported by cvs2svn $ * $Log: not supported by cvs2svn $
* Revision 1.44 2008/03/25 22:03:13 vsc
* fix some icc warnings
*
* Revision 1.43 2007/11/26 23:43:09 vsc * Revision 1.43 2007/11/26 23:43:09 vsc
* fixes to support threads and assert correctly, even if inefficiently. * fixes to support threads and assert correctly, even if inefficiently.
* *
@ -247,10 +250,10 @@
OPCODE(call_cpred ,sla), OPCODE(call_cpred ,sla),
OPCODE(call_usercpred ,sla), OPCODE(call_usercpred ,sla),
OPCODE(call_c_wfail ,sdl), OPCODE(call_c_wfail ,sdl),
OPCODE(call_bfunc_xx ,lxx), OPCODE(call_bfunc_xx ,llxx),
OPCODE(call_bfunc_xy ,lxy), OPCODE(call_bfunc_xy ,llxy),
OPCODE(call_bfunc_yx ,lxy), OPCODE(call_bfunc_yx ,llxy),
OPCODE(call_bfunc_yy ,lyy), OPCODE(call_bfunc_yy ,llyy),
OPCODE(cut_t ,e), OPCODE(cut_t ,e),
OPCODE(cut_e ,sla), OPCODE(cut_e ,sla),
OPCODE(try_clause ,ld), OPCODE(try_clause ,ld),
@ -283,7 +286,7 @@
OPCODE(switch_on_func ,sssl), OPCODE(switch_on_func ,sssl),
OPCODE(go_on_func ,sssl), OPCODE(go_on_func ,sssl),
OPCODE(if_func ,sssl), OPCODE(if_func ,sssl),
OPCODE(if_not_then ,cll), OPCODE(if_not_then ,clll),
OPCODE(index_dbref ,e), OPCODE(index_dbref ,e),
OPCODE(index_blob ,e), OPCODE(index_blob ,e),
OPCODE(trust_fail ,e), OPCODE(trust_fail ,e),
@ -308,7 +311,7 @@
OPCODE(write_n_atoms ,sc), OPCODE(write_n_atoms ,sc),
OPCODE(unify_n_voids ,os), OPCODE(unify_n_voids ,os),
OPCODE(write_n_voids ,s), OPCODE(write_n_voids ,s),
OPCODE(glist_valx ,ss), /* peephole */ OPCODE(glist_valx ,xx), /* peephole */
OPCODE(glist_valy ,xy), /* peephole */ OPCODE(glist_valy ,xy), /* peephole */
OPCODE(fcall ,sla), OPCODE(fcall ,sla),
OPCODE(dexecute ,pp), OPCODE(dexecute ,pp),

2
changes-5.1.html
View File

@ -17,6 +17,8 @@
<h2>Yap-5.1.4:</h2> <h2>Yap-5.1.4:</h2>
<ul> <ul>
<li> FIXED: YapOpcodes has wrong formats (obs from Bart Demoen).</li>
<li> FIXED: improve format message (obs from Bart Demoen).</li>
<li> NEW: more versions of maplist (obs from Bart Demoen).</li> <li> NEW: more versions of maplist (obs from Bart Demoen).</li>
<li> FIXED: use import mechanism for SWI's flatten/2 (obs from Bart Demoen).</li> <li> FIXED: use import mechanism for SWI's flatten/2 (obs from Bart Demoen).</li>
<li> FIXED: steps towards typed rbtrees plus some cases where one <li> FIXED: steps towards typed rbtrees plus some cases where one

4
pl/messages.yap
View File

@ -11,7 +11,7 @@
* File: utilities for displaying messages in YAP. * * File: utilities for displaying messages in YAP. *
* comments: error messages for YAP * * comments: error messages for YAP *
* * * *
* Last rev: $Date: 2008-07-11 17:02:10 $,$Author: vsc $ * * Last rev: $Date: 2008-07-16 10:58:59 $,$Author: vsc $ *
* * * *
* * * *
*************************************************************************/ *************************************************************************/
@ -142,7 +142,7 @@ system_message(error,error(Msg,Info)) -->
( { var(Msg) } ; { var(Info)} ), !, ( { var(Msg) } ; { var(Info)} ), !,
['bad error ~w' - [error(Msg,Info)]]. ['bad error ~w' - [error(Msg,Info)]].
system_message(error(consistency_error(Who),Where)) --> system_message(error(consistency_error(Who),Where)) -->
[ 'CONSISTENCY ERROR- ~w ~w' - [Who,Where] ]. [ 'CONSISTENCY ERROR (arguments not compatible with format)- ~w ~w' - [Who,Where] ].
system_message(error(context_error(Goal,Who),Where)) --> system_message(error(context_error(Goal,Who),Where)) -->
[ 'CONTEXT ERROR- ~w: ~w appeared in ~w' - [Goal,Who,Where] ]. [ 'CONTEXT ERROR- ~w: ~w appeared in ~w' - [Goal,Who,Where] ].
system_message(error(domain_error(DomainType,Opt), Where)) --> system_message(error(domain_error(DomainType,Opt), Where)) -->