Re: error during gc after kill indirect buffer

[Stefan]

> This code produce "Marker does not point anywhere" error.
> (progn
>   (kill-buffer (make-indirect-buffer "*scratch*" "clone"))
>   (garbage-collect))

Hmm... can't reproduce it here.

Can you check whether the patch below fixes it?


        Stefan


--- alloc.c     01 Jan 2005 17:20:19 -0500      1.359
+++ alloc.c     02 Jan 2005 18:38:32 -0500      
@@ -1,6 +1,6 @@
 /* Storage allocation and gc for GNU Emacs Lisp interpreter.
    Copyright (C) 1985, 1986, 1988, 1993, 1994, 1995, 1997, 1998, 1999,
-      2000, 2001, 2002, 2003, 2004  Free Software Foundation, Inc.
+      2000, 2001, 2002, 2003, 2004, 2005  Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -4683,7 +4683,7 @@
           turned off in that buffer.  Calling truncate_undo_list on
           Qt tends to return NULL, which effectively turns undo back on.
           So don't call truncate_undo_list if undo_list is Qt.  */
-       if (! EQ (nextb->undo_list, Qt))
+       if (CONSP (nextb->undo_list))
          truncate_undo_list (nextb);
 
        /* Shrink buffer gaps, but skip indirect and dead buffers.  */