[Emacs-diffs] Changes to emacs/src/bytecode.c

[Ken Raeburn]

Index: emacs/src/bytecode.c
diff -c emacs/src/bytecode.c:1.88 emacs/src/bytecode.c:1.89
*** emacs/src/bytecode.c:1.88   Sat Oct 29 19:32:27 2005
--- emacs/src/bytecode.c        Tue Dec  6 07:39:05 2005
***************
*** 524,538 ****
          }
  
        case Bgotoifnil:
!         MAYBE_GC ();
!         op = FETCH2;
!         if (NILP (POP))
!           {
!             BYTE_CODE_QUIT;
!             CHECK_RANGE (op);
!             stack.pc = stack.byte_string_start + op;
!           }
!         break;
  
        case Bcar:
          {
--- 524,542 ----
          }
  
        case Bgotoifnil:
!         {
!           Lisp_Object v1;
!           MAYBE_GC ();
!           op = FETCH2;
!           v1 = POP;
!           if (NILP (v1))
!             {
!               BYTE_CODE_QUIT;
!               CHECK_RANGE (op);
!               stack.pc = stack.byte_string_start + op;
!             }
!           break;
!         }
  
        case Bcar:
          {
***************
*** 730,744 ****
          break;
  
        case Bgotoifnonnil:
!         MAYBE_GC ();
!         op = FETCH2;
!         if (!NILP (POP))
!           {
!             BYTE_CODE_QUIT;
!             CHECK_RANGE (op);
!             stack.pc = stack.byte_string_start + op;
!           }
!         break;
  
        case Bgotoifnilelsepop:
          MAYBE_GC ();
--- 734,752 ----
          break;
  
        case Bgotoifnonnil:
!         {
!           Lisp_Object v1;
!           MAYBE_GC ();
!           op = FETCH2;
!           v1 = POP;
!           if (!NILP (v1))
!             {
!               BYTE_CODE_QUIT;
!               CHECK_RANGE (op);
!               stack.pc = stack.byte_string_start + op;
!             }
!           break;
!         }
  
        case Bgotoifnilelsepop:
          MAYBE_GC ();
***************
*** 771,794 ****
          break;
  
        case BRgotoifnil:
!         MAYBE_GC ();
!         if (NILP (POP))
!           {
!             BYTE_CODE_QUIT;
!             stack.pc += (int) *stack.pc - 128;
!           }
!         stack.pc++;
!         break;
  
        case BRgotoifnonnil:
!         MAYBE_GC ();
!         if (!NILP (POP))
!           {
!             BYTE_CODE_QUIT;
!             stack.pc += (int) *stack.pc - 128;
!           }
!         stack.pc++;
!         break;
  
        case BRgotoifnilelsepop:
          MAYBE_GC ();
--- 779,810 ----
          break;
  
        case BRgotoifnil:
!         {
!           Lisp_Object v1;
!           MAYBE_GC ();
!           v1 = POP;
!           if (NILP (v1))
!             {
!               BYTE_CODE_QUIT;
!               stack.pc += (int) *stack.pc - 128;
!             }
!           stack.pc++;
!           break;
!         }
  
        case BRgotoifnonnil:
!         {
!           Lisp_Object v1;
!           MAYBE_GC ();
!           v1 = POP;
!           if (!NILP (v1))
!             {
!               BYTE_CODE_QUIT;
!               stack.pc += (int) *stack.pc - 128;
!             }
!           stack.pc++;
!           break;
!         }
  
        case BRgotoifnilelsepop:
          MAYBE_GC ();