first cut at call counter.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@580 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -2532,6 +2532,12 @@ do_pass(void)
|
||||
case retry_profiled_op:
|
||||
a_pl(_retry_profiled, (PredEntry *)(cpc->rnd1));
|
||||
break;
|
||||
case count_call_op:
|
||||
a_pl(_count_call, (PredEntry *)(cpc->rnd1));
|
||||
break;
|
||||
case count_retry_op:
|
||||
a_pl(_count_retry, (PredEntry *)(cpc->rnd1));
|
||||
break;
|
||||
case fetch_args_for_bccall:
|
||||
if (cpc->nextInst->op != bccall_op) {
|
||||
Error(SYSTEM_ERROR, TermNil, "compiling binary test", (int) cpc->op);
|
||||
|
Reference in New Issue
Block a user