support debugging of compiler-level instructions.

2014-05-22 21:57:54 +01:00
parent 3310a904c4
commit b7c05b49e2
4 changed files with 297 additions and 149 deletions
--- a/C/amasm.c
+++ b/C/amasm.c
@@ -3685,7 +3685,7 @@ do_pass(int pass_no, yamop **entry_codep, int assembling, int *clause_has_blobsp
    case count_retry_op:
      code_p = a_pl(_count_retry, (PredEntry *)(cip->cpc->rnd1), code_p, pass_no);
      break;
-    case fetch_args_for_bccall:
+    case fetch_args_for_bccall_op:
      if (cip->cpc->nextInst->op != bccall_op) {
 	Yap_Error(INTERNAL_COMPILER_ERROR, TermNil, "compiling binary test", (int) cip->cpc->op);
 	save_machine_regs();