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:
vsc 2003-09-25 00:48:04 +00:00
parent 99cfccfaf0
commit 4e1899be78
3 changed files with 2 additions and 6 deletions

View File

@ -2557,7 +2557,7 @@ Yap_absmi(int inp)
#ifdef COROUTINING
}
#endif
#ifdef LOW_LEvel_TRACER
#ifdef LOW_LEVEL_TRACER
if (Yap_do_low_level_trace)
low_level_trace(enter_pred,(PredEntry *)(SREG),XREGS+1);
#endif /* LOW_LEVEL_TRACE */

View File

@ -4145,10 +4145,6 @@ ExpandIndex(PredEntry *ap) {
if (Yap_Option['i' - 'a' + 1]) {
Term tmod = ModuleName[ap->ModuleOfPred];
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_plwrite(tmod, Yap_DebugPutc, 0);
Yap_DebugPutc(Yap_c_error_stream,':');

View File

@ -1537,5 +1537,5 @@ Yap_regtoregno(wamreg reg)
} else if ((ap)->ModuleOfPred)\
(DEPTH) -= MkIntConstant(2);
#else
#define check_depth(DEPTH)
#define check_depth(DEPTH, ap)
#endif