diff --git a/C/absmi.c b/C/absmi.c index fd9fdf9b7..ce03cc4e8 100644 --- a/C/absmi.c +++ b/C/absmi.c @@ -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 */ diff --git a/C/index.c b/C/index.c index 224174d64..6762e309d 100644 --- a/C/index.c +++ b/C/index.c @@ -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,':'); diff --git a/H/absmi.h b/H/absmi.h index 54e3dbba2..3f20e1e35 100644 --- a/H/absmi.h +++ b/H/absmi.h @@ -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