[21.4.16] XEmacs: Gnus enters an infinite uninterruptible loop (was: Gnus enters an infinite uninterruptible loop)

No Gnus v0.3 XEmacs 21.4 (patch 16) "Corporate Culture" [Lucid] (i386-debian-linux, Mule) of Sun Dec 12 2004 on penell Sometimes when I enter the summary buffer of one of my inboxes, Gnus (or XEmacs) starts eating all available cpu and does not react to ctrl-g or anything else. It does die nicely when I send a signal, though.

I ran it inside gdb and noticed that the tight loop was here: (gdb) bt #0 0x08161a60 in bytecount_to_charcount () #1 0x081ab041 in complex_vars_of_search () #2 0x081a9cca in Fstring_match () #3 0x080ba92a in Ffuncall () #4 0x0808f953 in funcall_compiled_function () #5 0x0808f568 in funcall_compiled_function () #6 0x080ba816 in Ffuncall () #7 0x0808f953 in funcall_compiled_function () #8 0x0808f568 in funcall_compiled_function () #9 0x080ba816 in Ffuncall () #10 0x0808f953 in funcall_compiled_function () #11 0x08090b41 in Fbyte_code () #12 0x080ba1fb in Feval () #13 0x080b8673 in condition_case_1 () #14 0x080b8804 in condition_case_3 () #15 0x0809051e in execute_rare_opcode () #16 0x0808f7e3 in funcall_compiled_function () #17 0x08090b41 in Fbyte_code () #18 0x080ba1fb in Feval () #19 0x080b8673 in condition_case_1 () #20 0x080b8804 in condition_case_3 () #21 0x0809051e in execute_rare_opcode () #22 0x0808f7e3 in funcall_compiled_function () #23 0x0808f568 in funcall_compiled_function () #24 0x080ba816 in Ffuncall () #25 0x0808f953 in funcall_compiled_function () #26 0x0808f568 in funcall_compiled_function () #27 0x080ba816 in Ffuncall () #28 0x0808f953 in funcall_compiled_function () #29 0x0808f568 in funcall_compiled_function () #30 0x080ba816 in Ffuncall () #31 0x0808f953 in funcall_compiled_function () #32 0x0808f568 in funcall_compiled_function () #33 0x080ba816 in Ffuncall () #34 0x0808f953 in funcall_compiled_function () #35 0x0808f568 in funcall_compiled_function () #36 0x080ba816 in Ffuncall () #37 0x0808f953 in funcall_compiled_function () #38 0x0808f568 in funcall_compiled_function () #39 0x080ba816 in Ffuncall () #40 0x0808f953 in funcall_compiled_function () #41 0x0808f568 in funcall_compiled_function () #42 0x080ba816 in Ffuncall () #43 0x08092fab in Fcall_interactively () #44 0x080b96d0 in Fcommand_execute () #45 0x08101c75 in complex_vars_of_event_stream () #46 0x080fdafd in Fdispatch_event () #47 0x0809ba4d in Fcommand_loop_1 () #48 0x080b8673 in condition_case_1 () #49 0x0809bfde in syms_of_cmdloop () #50 0x080b852a in internal_catch () #51 0x0809b798 in initial_command_loop () #52 0x080b51fb in xemacs_21_4_16_i386_debian_linux () #53 0x080b632d in main () When I send it a HUP, it spits lots of stuff on the console and dies: shem＠kyklos:~$ kill -HUP %6 shem＠kyklos:~$ Fatal error (1). Your files have been auto-saved. Use `M-x recover-session' to recover them. Your version of XEmacs was distributed with a PROBLEMS file that may describe your crash, and with luck a workaround. Please check it first, but do report the crash anyway. Please report this bug by invoking M-x report-emacs-bug, or by selecting `Send Bug Report' from the Help menu. If necessary, send ordinary email to `crashes(a)xemacs.org&#39;. *MAKE SURE* to include the XEmacs configuration from M-x describe-installation, or equivalently the file Installation in the top of the build tree. *Please* try *hard* to obtain a C stack backtrace; without it, we are unlikely to be able to analyze the problem. Locate the core file produced as a result of this crash (often called `core' or `core.<process-id>', and located in the directory in which you started XEmacs or your home directory), and type gdb /usr/bin/xemacs core then type `where' at the debugger prompt. No GDB on your system? You may have DBX, or XDB, or SDB. (Ask your system administrator if you need help.) If no core file was produced, enable them (often with `ulimit -c unlimited' in case of future recurrance of the crash. Lisp backtrace follows: string-match("=\\?\\([^][- ()<>＠,;:*\\\"/?.=]+\\)\\(?:\\*[^?]+\\)?\\?\\(B\\|Q\\)\\?\\([!->＠-~ ]*\\)\\?=" "=?ISO-8859-1?Q?IBM_ServicePac-palvelupakettien_rekister=F6inti_on_onni?=") # bind (word) rfc2047-parse-and-decode("=?ISO-8859-1?Q?IBM_ServicePac-palvelupakettien_rekister=F6inti_on_onni?=") # (unwind-protect ...) # (unwind-protect ...) # bind (case-fold-search b e start end) # (unwind-protect ...) # (unwind-protect ...) # bind (temp-buffer m string) mail-decode-encoded-word-string("=?ISO-8859-1?Q?IBM_ServicePac-palvelupakettien_rekister=F6inti_on_onni?= =?ISO-8859-1?Q?stunut_seuraavan_k=E4ytt=E4j=E4tu?= =?ISO-8859-1?Q?nnuksen_osalta:_0040045553.?=") byte-code("..." [x gnus-decode-encoded-word-function string eol search-forward " " move mm-subst-char-in-string ?\r ?- ?\n t] 8) # (condition-case ... . ((error x))) # bind (x) # (unwind-protect ...) # bind (eol buffer header references in-reply-to number dependencies force-new) byte-code("..." [id number eol id-dep references header read point-at-eol nil ((widen)) (byte-code " `ÄÅ Æ#«€`Sª¡ {©!?ÇÈÉÇÊÉ\nË$Ë$)§" [x gnus-decode-encoded-word-function string eol search-forward " " move mm-subst-char-in-string ?\r ?- ?\n t] 8) ((errorx)) (byte-code " `ÄÅ Æ#«€`Sª¡ {©!?ÇÈÉÇÊÉ\nË$Ë$)§" [x gnus-decode-encoded-word-function string eol search-forward " " move mm-subst-char-in-string ?\r ?- ?\n t] 8) ((error x)) search-forward " " move string-match "^<[^>]+>$" format "fake+none+%s+%d" "fake+none+%s+%s" int-to-string ?\t 0 (byte-code "Àp!§" [read] 2) ((error)) 1 (byte-code "Àp!§" [read] 2) ((error)) looking-at"Xref: " (?\n nil) "^\\([^ :]+\\): " intern match-string vector "" 9 In-Reply-To 5 gnus-extract-message-id-from-in-reply-to 4 boundp t nnmail-message-id 8 zerop gnus-split-references "\\(<[^<]+>\\)[ ]*\\'" intern-soft "none" ids sequence ref-dep dependencies ref n force-new in-reply-to string num out parent-id allp ref-header replaced gnus-newsgroup-name nnheader-fake-message-id extra xref lines chars date from subject gnus-alter-header-function headers cur buffer x gnus-summary-ignore-duplicates] 16) # (condition-case ... . ((error (byte-code "ÀÁÂÃe`\"#šÄy§" ... 6)))) # (unwind-protect ...) # bind (mail-parse-charset mail-parse-ignored-charsets cur dependencies allp number headers header also-fetch-heads group dependencies force-new sequence) gnus-get-newsgroup-headers-xover((1658 1785 1815 1865 1870 1897 1909 1929 2190 2297 2324 2329 2351 2472 2485 2618 2629 2800 2809 2856 2857 2877 2879 2882 2886 2887 2888 2893 2895 2896 2930 2935 2940 2950 2974 2975 2980 2981 2982 2987 3005 3024 3028 30293031 3032 3033 3035 3036 3039 3040 3041 3044 3046 3047 3054 3057 3058 3059 3060 3062 3067 3068 3069 3070 3072 3077 3085 3087 3088 3089 3097 3099 3102 3105 3106 3109 3111 3112 3115 3116 3123 3124 3127 3135 3193 3197 3209 3221 3225 3236 3237 3258 3259 3260 3261 3281 3286 3291 3304 3312 3318 3320 3322 3333 3336 3344 3349 3350 3352 3363 3366 3371 3377 3379 3399 3402 3403 3404 3407 3408 3410 3412 3415 3430 3443 3446 3451 3455 3457 3478 3487 3507 3510 3536 3539 3542 3543 3546 3548 3572 3588 3593 3594 3595 3605 3611 3612 3614 3618 3619 3620 3626 3627 3629 3630 3631 3636 3637 3638 3639 3641 3644 3645 3646 3651 3652 3653 3654 3655 3656 36573658 3659 3662 3665 3666 3667 3669 3670 3672 3677 3678 3683 3684 3686 3690 3692 3702 3703 3704

# bind (name articles) gnus-fetch-headers((1658 1785 1815 1865 1870 1897 1909 1929 2190 2297 2324 2329 2351 2472 2485 2618 2629 2800 2809 2856 2857 2877 2879 2882 2886 2887 2888 2893 2895 2896 2930 2935 2940 2950 2974 2975 2980 2981 2982 2987 3005 3024 3028 3029 3031 3032 3033 3035 3036 3039 3040 3041 3044 3046 3047 3054 3057 3058 3059 3060 3062 3067 3068 3069 3070 3072 3077 3085 3087 3088 3089 3097 3099 3102 3105 3106 3109 3111 3112 3115 3116 3123 3124 3127 3135 3193 3197 3209 3221 3225 3236 3237 3258 3259 3260 3261 3281 32863291 3304 3312 3318 3320 3322 3333 3336 3344 3349 3350 3352 3363 3366 3371 3377 3379 3399 3402 3403 3404 3407 3408 3410 3412 3415 3430 3443 3446 3451 3455 3457 3478 3487 3507 3510 3536 3539 3542 3543 3546 3548 3572 3588 3593 3594 3595 3605 3611 3612 3614 3618 3619 3620 3626 3627 3629 3630 3631 3636 3637 3638 3639 3641 3644 3645 3646 3651 3652 3653 3654 3655 3656 3657 3658 3659 3662 3665 3666 3667 3669 3670 3672 3677 3678 3683 3684 3686 3690 3692 3702 3703 3704 3706 3708 37

# bind (cached fetched-articles articles info gnus-summary-ignore-duplicates entry select-articles read-all group) gnus-select-newsgroup("nnimap+mail.discendum.com:INBOX" nil nil) # bind (quit-config new-group select-articles no-display kill-buffer no-article show-all group) gnus-summary-read-group-1("nnimap+mail.discendum.com:INBOX" nil t nil nil nil) # bind (gnus-auto-select-next result select-articles backward no-display kill-buffer no-article show-all group) gnus-summary-read-group("nnimap+mail.discendum.com:INBOX" nil t nil nil nil nil) # bind (no-display group number active marked entry select-articles group no-article all) gnus-group-read-group(nil t) # bind (all) gnus-group-select-group(nil) # bind (command-debug-status) call-interactively(gnus-group-select-group) # (condition-case ... . error) # (catch top-level ...) It appears that the string in mail-decode-encoded-word-string always contains Finnish characters (a umlaut, o umlaut) when XEmacs gets stuck. I have tried fiddling with locales and set-language-environment but they don't seem to do anything to this problem. I'm using an up-to-date CVS Gnus version. It worked flawlessly until about a week ago. I think I updated XEmacs at that point (with Debian's apt-get dist-upgrade). Janne ------------------ Environment follows ------------------ (setq gnus-select-method '(nnml "")) (setq gnus-local-domain "discendum.com") (setq gnus-local-organization "Discendum Oy") (setq gnus-large-newsgroup 1000) (setq gnus-novice-user nil) (setq gnus-extract-address-components 'mail-extract-address-components) (setq gnus-fetch-old-headers "some") (setq gnus-summary-thread-gathering-function 'gnus-gather-threads-by-references) (setq gnus-auto-select-first nil) (setq gnus-auto-select-next nil) (setq gnus-summary-mode-hook '(gnus-agent-mode gnus-xmas-switch-horizontal-scrollbar-off gnus-xmas-setup-summary-toolbar gnus-xmas-summary-menu-add)) (setq gnus-exit-gnus-hook '(mm-destroy-postponed-undisplay-list)) (setq gnus-default-article-saver 'gnus-summary-save-in-mail) (setq gnus-article-mode-hook '(gnus-xmas-article-menu-add)) (setq gnus-article-prepare-hook '(bbdb/gnus-pop-up-bbdb-buffer)) (setq gnus-article-mime-match-handle-function nil) (setq gnus-save-killed-list nil) (setq gnus-startup-hook '(bbdb-insinuate-gnus)) (setq gnus-setup-news-hook '(gnus-agent-queue-setup gnus-fixup-nnimap-unread-after-getting-new-news)) (setq gnus-save-newsrc-hook '(bbdb-offer-save)) (setq gnus-group-mode-hook '(gnus-agent-mode gnus-xmas-setup-group-toolbar gnus-xmas-group-menu-add)) (setq gnus-score-expiry-days 45) ;; (makeunbound 'gnus-topic-mode) ;; (makeunbound 'gnus-topic-mode-hook) ;; (makeunbound 'gnus-topic-line-format) ;; (makeunbound 'gnus-topic-indent-level) ;; (makeunbound 'gnus-topic-display-empty-topics) (setq gnus-agent-group-mode-hook '(gnus-xmas-agent-group-menu-add)) (setq gnus-agent-summary-mode-hook '(gnus-xmas-agent-summary-menu-add)) (setq gnus-agent-server-mode-hook '(gnus-xmas-agent-server-menu-add)) (setq gnus-server-mode-hook '(gnus-agent-mode gnus-xmas-server-menu-add)) (setq nnmail-split-methods '(("junk" "^X-Spam-Flag: YES") ("inbox" ""))) (setq message-required-headers '((X-Draft-From lambda nil (gnus-inews-make-draft-meta-information "nnimap+mail.discendum.com:INBOX" 'nil)) (optional . References) From)) (setq message-setup-hook '(bbdb-insinuate-message)) (setq message-mode-hook '(#[nil "Â\031Ã\010!)\207" [gnus-setup-message-group gnus-article-copy nil gnus-configure-posting-styles] 2] message-xmas-maybe-fontify)) (setq message-header-setup-hook '(gnus-inews-insert-archive-gcc gnus-inews-insert-gcc)) (setq message-default-charset 'iso-8859-15)