emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Stefan Monnier
Subject: [Emacs-diffs] Changes to emacs/src/bytecode.c
Date: Mon, 13 Sep 2004 17:22:56 -0400

Index: emacs/src/bytecode.c
diff -c emacs/src/bytecode.c:1.80 emacs/src/bytecode.c:1.81
*** emacs/src/bytecode.c:1.80   Sun Aug 22 17:43:26 2004
--- emacs/src/bytecode.c        Mon Sep 13 21:13:38 2004
***************
*** 1,5 ****
  /* Execution of byte code produced by bytecomp.el.
!    Copyright (C) 1985, 1986, 1987, 1988, 1993, 2000, 2001, 2002, 2003
     Free Software Foundation, Inc.
  
  This file is part of GNU Emacs.
--- 1,5 ----
  /* Execution of byte code produced by bytecomp.el.
!    Copyright (C) 1985, 1986, 1987, 1988, 1993, 2000, 2001, 2002, 2003, 2004
     Free Software Foundation, Inc.
  
  This file is part of GNU Emacs.
***************
*** 387,392 ****
--- 387,393 ----
        Vquit_flag = Qnil;                              \
          BEFORE_POTENTIAL_GC ();                               \
        Fsignal (Qquit, Qnil);                          \
+       AFTER_POTENTIAL_GC ();                          \
        }                                                       \
    } while (0)
  
***************
*** 539,547 ****
              TOP = Qnil;
            else
              {
!               BEFORE_POTENTIAL_GC ();
!               Fcar (wrong_type_argument (Qlistp, v1));
!               AFTER_POTENTIAL_GC ();
              }
            break;
          }
--- 540,546 ----
              TOP = Qnil;
            else
              {
!               wrong_type_argument (Qlistp, v1);
              }
            break;
          }
***************
*** 574,582 ****
              TOP = Qnil;
            else
              {
!               BEFORE_POTENTIAL_GC ();
!               Fcdr (wrong_type_argument (Qlistp, v1));
!               AFTER_POTENTIAL_GC ();
              }
            break;
          }
--- 573,579 ----
              TOP = Qnil;
            else
              {
!               wrong_type_argument (Qlistp, v1);
              }
            break;
          }
***************
*** 907,917 ****
                else if (!NILP (v1))
                  {
                    immediate_quit = 0;
!                   BEFORE_POTENTIAL_GC ();
!                   v1 = wrong_type_argument (Qlistp, v1);
!                   AFTER_POTENTIAL_GC ();
!                   immediate_quit = 1;
!                   op++;
                  }
              }
            immediate_quit = 0;
--- 904,910 ----
                else if (!NILP (v1))
                  {
                    immediate_quit = 0;
!                   wrong_type_argument (Qlistp, v1);
                  }
              }
            immediate_quit = 0;
***************
*** 920,930 ****
            else if (NILP (v1))
              TOP = Qnil;
            else
!             {
!               BEFORE_POTENTIAL_GC ();
!               Fcar (wrong_type_argument (Qlistp, v1));
!               AFTER_POTENTIAL_GC ();
!             }
            break;
          }
  
--- 913,919 ----
            else if (NILP (v1))
              TOP = Qnil;
            else
!             wrong_type_argument (Qlistp, v1);
            break;
          }
  
***************
*** 1554,1564 ****
                    else if (!NILP (v1))
                      {
                        immediate_quit = 0;
!                       BEFORE_POTENTIAL_GC ();
!                       v1 = wrong_type_argument (Qlistp, v1);
!                       AFTER_POTENTIAL_GC ();
!                       immediate_quit = 1;
!                       op++;
                      }
                  }
                immediate_quit = 0;
--- 1543,1549 ----
                    else if (!NILP (v1))
                      {
                        immediate_quit = 0;
!                       wrong_type_argument (Qlistp, v1);
                      }
                  }
                immediate_quit = 0;
***************
*** 1567,1577 ****
                else if (NILP (v1))
                  TOP = Qnil;
                else
!                 {
!                   BEFORE_POTENTIAL_GC ();
!                   Fcar (wrong_type_argument (Qlistp, v1));
!                   AFTER_POTENTIAL_GC ();
!                 }
              }
            else
              {
--- 1552,1558 ----
                else if (NILP (v1))
                  TOP = Qnil;
                else
!                 wrong_type_argument (Qlistp, v1);
              }
            else
              {




reply via email to

[Prev in Thread] Current Thread [Next in Thread]