typos ans small glitches from Christian
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@877 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
99cfccfaf0
commit
4e1899be78
|
@ -2557,7 +2557,7 @@ Yap_absmi(int inp)
|
||||||
#ifdef COROUTINING
|
#ifdef COROUTINING
|
||||||
}
|
}
|
||||||
#endif
|
#endif
|
||||||
#ifdef LOW_LEvel_TRACER
|
#ifdef LOW_LEVEL_TRACER
|
||||||
if (Yap_do_low_level_trace)
|
if (Yap_do_low_level_trace)
|
||||||
low_level_trace(enter_pred,(PredEntry *)(SREG),XREGS+1);
|
low_level_trace(enter_pred,(PredEntry *)(SREG),XREGS+1);
|
||||||
#endif /* LOW_LEVEL_TRACE */
|
#endif /* LOW_LEVEL_TRACE */
|
||||||
|
|
|
@ -4145,10 +4145,6 @@ ExpandIndex(PredEntry *ap) {
|
||||||
if (Yap_Option['i' - 'a' + 1]) {
|
if (Yap_Option['i' - 'a' + 1]) {
|
||||||
Term tmod = ModuleName[ap->ModuleOfPred];
|
Term tmod = ModuleName[ap->ModuleOfPred];
|
||||||
Yap_DebugPutc(Yap_c_error_stream,'>');
|
Yap_DebugPutc(Yap_c_error_stream,'>');
|
||||||
{
|
|
||||||
extern long long unsigned int vsc_count;
|
|
||||||
fprintf(stderr,"%lld",vsc_count);
|
|
||||||
}
|
|
||||||
Yap_DebugPutc(Yap_c_error_stream,'\t');
|
Yap_DebugPutc(Yap_c_error_stream,'\t');
|
||||||
Yap_plwrite(tmod, Yap_DebugPutc, 0);
|
Yap_plwrite(tmod, Yap_DebugPutc, 0);
|
||||||
Yap_DebugPutc(Yap_c_error_stream,':');
|
Yap_DebugPutc(Yap_c_error_stream,':');
|
||||||
|
|
Reference in New Issue