Re: emacs hangs; 100% cpu usage

[Reiner Steib]

On Tue, Jan 18 2005, Kim F. Storm wrote:

> address@hidden writes:
>
>>> Could you try the suggestions in etc/DEBUG for infinite loops?
>> Following the procedure described in etc/DEBUG I got the following:
>> (gdb) finish
>> Run till exit from #0  0x000000000055339c in sweep_weak_table (h=0xf29680, 
>>     remove_entries_p=0) at fns.c:4792
>
> Does the following patch fix the infinite loop ?

No it doesn't.  But the infinite loop doesn't appears not as often as
before.

Here's a new gdb output (built of today with your patch):

--8<---------------cut here---------------start------------->8---
0x00000000005535dc in sweep_weak_table (h=0x11c4c40, remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4792
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) finish
Run till exit from #0  0x00000000005535dc in sweep_weak_table (h=0x11c4c40, 
    remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4792

Program received signal SIGTSTP, Stopped (user).
0x00000000005535dc in sweep_weak_table (h=0x11c4c40, remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4792
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
Run till exit from #0  0x00000000005535dc in sweep_weak_table (h=0x11c4c40, 
    remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4792
0x00000000005536bf in sweep_weak_hash_tables ()
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4892
4892                marked |= sweep_weak_table (h, 0);
Value returned is $1 = 1
(gdb) 
Run till exit from #0  0x00000000005536bf in sweep_weak_hash_tables ()
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4892

Program received signal SIGTSTP, Stopped (user).
0x0000000000553448 in sweep_weak_table (h=0x11c4c40, remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4799
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) next

Program received signal SIGTSTP, Stopped (user).
0x0000000000553448 in sweep_weak_table (h=0x11c4c40, remove_entries_p=0)
    at /home/dept/ste/src/links/emacs/cvs-HEAD/emacs/src/fns.c:4799
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4798          prev = Qnil;
(gdb) 
4799          for (idx = HASH_INDEX (h, bucket); !GC_NILP (idx); idx = next)
(gdb) 
4792      for (bucket = 0; bucket < n; ++bucket)
--8<---------------cut here---------------end--------------->8---

Bye, Reiner.
-- 
       ,,,
      (o o)
---ooO-(_)-Ooo---  |  PGP key available  |  http://rsteib.home.pages.de/