cannot optimise try/retry in the presence of or-parallelism

2010-10-15 01:11:49 +01:00 · 2010-10-15 01:11:49 +01:00 · fa42de1025
commit fa42de1025
parent 2444eea5a7
1 changed files with 2 additions and 0 deletions
--- a/C/amasm.c
+++ b/C/amasm.c
@ -2089,6 +2089,7 @@ a_try(op_numbers opcode, CELL lab, CELL opr, int nofalts, int hascut, yamop *cod
    }
    return code_p;
  }
+#ifndef YAPOR
  switch (opr) {
  case 2:
    if (opcode == _try_clause) {
@ -2139,6 +2140,7 @@ a_try(op_numbers opcode, CELL lab, CELL opr, int nofalts, int hascut, yamop *cod
      return code_p;
    }
  }
+#endif
  if (pass_no) {
    code_p->opc = emit_op(opcode);
    code_p->u.Otapl.d = emit_a(lab);