Crash when attaching gnuclient in 21.5-b8

Hi, XEmacs 21.5-b8 just plain crashes when I attach a gnuclient. I am willing to test patches. Trace follows. Fatal error: assertion failed, file specifier.c, line 1469, !inst_list || EQ (locale, Qglobal) Fatal error (6). Your files have been auto-saved. Use `M-x recover-session' to recover them. If you have access to the PROBLEMS file that came with your version of XEmacs, please check to see if your crash is described there, as there may be a workaround available. Otherwise, please report this bug by running the send-pr script included with XEmacs, or selecting `Send Bug Report' from the help menu. As a last resort send ordinary email to `crashes(a)xemacs.org&#39;. *MAKE SURE* to include the information in the command M-x describe-installation. If at all possible, *please* try to obtain a C stack backtrace; it will help us immensely in determining what went wrong. To do this, locate the core file that was produced as a result of this crash (it's usually called `core' and is located in the directory in which you started the editor, or maybe in your home directory), and type gdb /usr/bin/xemacs core then type `where' when the debugger prompt comes up. (If you don't have GDB on your system, you might have DBX, or XDB, or SDB. A similar procedure should work for all of these. Ask your system administrator if you need more help.) Lisp backtrace follows: # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) specifier-spec-list(#<font-specifier global=("-*-Courier-Bold-I-*-*-*-110-*-*-*-*-*-*" ((custom) . "-*-courier-bold-i-*-*-*-120-*-*-*-*-iso8859-*")) fallback=#<font-specifier global=((custom) . "-*-courier-medium-r-*-*-*-110-*-*-*-*-iso8859-*") fallback=(((tty) . "normal") ((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-fixed-medium-r-*-*-*-120-*-*-*-*-iso8859-*-*-courier-*-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-fixed-*-r-*-*-*-120-*-*-*-*-iso8859-*-*-*-medium-r-*-*-*-120-*-*-m-*-iso8859-*") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-m-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-c-*-iso8859-*") ((x) . "-*-courier-medium-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-fixed-medium-r-*-*-*-*-*-*-*-*-iso8859-*-*-courier-*-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-fixed-*-r-*-*-*-*-*-*-*-*-iso8859-*-*-*-medium-r-*-*-*-*-*-*-m-*-iso8859-*") ((x) . "-*-*-medium-r-*-*-*-*-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-m-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-*-*-*-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-sun-gothic-medium-r-normal--14-120-75-75-c-60-jisx0201.1976-0") ((x) . "-sun-gothic-medium-r-normal--14-120-75-75-c-120-jisx0208.1983-0") ((x) . "-wadalab-gothic-medium-r-normal--14-120-75-75-c-120-jisx0212.1990-0") ((x) . "-*-fixed-medium-r-*--*-jisx0201.1976-*") ((x) . "-*-fixed-medium-r-*--*-jisx0208.1983-*") ((x) . "-*-fixed-medium-r-*--*-jisx0212*-*") ((x) . "-*-*-*-r-*--*-jisx0201.1976-*") ((x) . "-*-*-*-r-*--*-jisx0208.1983-*") ((x) . "-*-*-*-r-*--*-jisx0212*-*") ((x) . "-*-*-medium-r-*--*-gb2312.1980-*") ((x) . "-*-fixed-medium-r-*--*-cns11643*-*") ((x) . "-*-fixed-medium-r-*--*-big5*-*,-*-fixed-medium-r-*--*-sisheng_cwnn-0") ((x) . "-*-mincho-medium-r-*--*-ksc5601.1987-*") ((x) . "-*-fixed-medium-r-*--*-tis620.2529-1") ((x) . "-*-fixed-medium-r-*--*-viscii1.1-1") ((x) . "-*-fixed-medium-r-*--*-mulearabic-*") ((x) . "-*-fixed-medium-r *--*-ethio-*") ((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-fixed-medium-r-*-*-*-120-*-*-*-*-iso10646-1-*-courier-*-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-fixed-*-r-*-*-*-120-*-*-*-*-iso10646-1-*-*-medium-r-*-*-*-120-*-*-m-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-m-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-c-*-iso10646-1") ((x) . "-*-courier-medium-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-fixed-medium-r-*-*-*-*-*-*-*-*-iso10646-1-*-courier-*-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-fixed-*-r-*-*-*-*-*-*-*-*-iso10646-1-*-*-medium-r-*-*-*-*-*-*-m-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-*-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-m-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-*-*-*-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-120-*-*-m-*-*-*") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-*-*") ...) 0x209> 0xca4d> #<tty-frame "F1" 0x18991> nil nil) # bind (ms-exact-p ms-tag-set ms-maparg ms-locale ms-func ms-specifier) map-specifier(#<font-specifier global=("-*-Courier-Bold-I-*-*-*-110-*-*-*-*-*-*" ((custom) . "-*-courier-bold-i-*-*-*-120-*-*-*-*-iso8859-*")) fallback=#<font-specifier global=((custom) . "-*-courier-medium-r-*-*-*-110-*-*-*-*-iso8859-*") fallback=(((tty) . "normal") ((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-fixed-medium-r-*-*-*-120-*-*-*-*-iso8859-*-*-courier-*-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-fixed-*-r-*-*-*-120-*-*-*-*-iso8859-*-*-*-medium-r-*-*-*-120-*-*-m-*-iso8859-*") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-m-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-c-*-iso8859-*") ((x) . "-*-courier-medium-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-fixed-medium-r-*-*-*-*-*-*-*-*-iso8859-*-*-courier-*-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-fixed-*-r-*-*-*-*-*-*-*-*-iso8859-*-*-*-medium-r-*-*-*-*-*-*-m-*-iso8859-*") ((x) . "-*-*-medium-r-*-*-*-*-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-m-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-c-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-120-*-*-*-*-iso8859-*") ((x) . "-*-*-*-r-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-*-*-*-*-*-*-*-*-*-*-*-*-iso8859-*") ((x) . "-sun-gothic-medium-r-normal--14-120-75-75-c-60-jisx0201.1976-0") ((x) . "-sun-gothic-medium-r-normal--14-120-75-75-c-120-jisx0208.1983-0") ((x) . "-wadalab-gothic-medium-r-normal--14-120-75-75-c-120-jisx0212.1990-0") ((x) . "-*-fixed-medium-r-*--*-jisx0201.1976-*") ((x) . "-*-fixed-medium-r-*--*-jisx0208.1983-*") ((x) . "-*-fixed-medium-r-*--*-jisx0212*-*") ((x) . "-*-*-*-r-*--*-jisx0201.1976-*") ((x) . "-*-*-*-r-*--*-jisx0208.1983-*") ((x) . "-*-*-*-r-*--*-jisx0212*-*") ((x) . "-*-*-medium-r-*--*-gb2312.1980-*") ((x) . "-*-fixed-medium-r-*--*-cns11643*-*") ((x) . "-*-fixed-medium-r-*--*-big5*-*,-*-fixed-medium-r-*--*-sisheng_cwnn-0") ((x) . "-*-mincho-medium-r-*--*-ksc5601.1987-*") ((x) . "-*-fixed-medium-r-*--*-tis620.2529-1") ((x) . "-*-fixed-medium-r-*--*-viscii1.1-1") ((x) . "-*-fixed-medium-r-*--*-mulearabic-*") ((x) . "-*-fixed-medium-r-*--*- thio-*") ((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-fixed-medium-r-*-*-*-120-*-*-*-*-iso10646-1-*-courier-*-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-fixed-*-r-*-*-*-120-*-*-*-*-iso10646-1-*-*-medium-r-*-*-*-120-*-*-m-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-m-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-c-*-iso10646-1") ((x) . "-*-courier-medium-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-fixed-medium-r-*-*-*-*-*-*-*-*-iso10646-1-*-courier-*-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-fixed-*-r-*-*-*-*-*-*-*-*-iso10646-1-*-*-medium-r-*-*-*-*-*-*-m-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-*-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-m-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-c-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-120-*-*-*-*-iso10646-1") ((x) . "-*-*-*-r-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-*-*-*-*-*-*-*-*-*-*-*-iso10646-1") ((x) . "-*-*-medium-r-*-*-*-120-*-*-m-*-*-*") ((x) . "-*-*-medium-r-*-*-*-120-*-*-c-*-*-*") ...) 0x209> 0xca4d> frob-locale #<tty-frame "F1" 0x18991> (font . window-system) nil nil) # bind (locale) map-over-locales(#<tty-frame "F1" 0x18991>) # bind (orig-instance check-differences domain do-later-stages ffpdev) # (unwind-protect ...) # bind (--letf-save--22637 --letf-bound--22638) # (unwind-protect ...) # bind (--letf-save--22633 --letf-bound--22634) # (unwind-protect ...) # bind (--letf-save--22629 --letf-bound--22630) # (unwind-protect ...) # bind (--letf-save--22625 --letf-bound--22626) # (unwind-protect ...) # bind (--letf-save--22621 --letf-bound--22622 standard-face-mapping frob-mapping tty-props win-prop frobbed-face unfrobbed-face exact-p tag-set locale face) Face-frob-property(message-header-newsgroups-face #<tty-frame "F1" 0x18991> nil nil default italic font (underline) (tty (lambda (x) t) x x-make-font-italic gtk gtk-make-font-italic mswindows mswindows-make-font-italic msprinter mswindows-make-font-italic) (([default] . [italic]) ([bold] . [bold-italic]) ([italic] . t) ([bold-italic] . t))) # bind (exact-p tags locale face) make-face-italic(message-header-newsgroups-face #<tty-frame "F1" 0x18991> nil) # bind (tags frame value face) custom-set-face-italic(message-header-newsgroups-face t #<tty-frame "F1" 0x18991> nil) funcall(custom-set-face-italic message-header-newsgroups-face t #<tty-frame "F1" 0x18991> nil) # (condition-case ... . ((error))) # bind (fun value name atts tags frame face) face-custom-attributes-set(message-header-newsgroups-face #<tty-frame "F1" 0x18991> nil :foreground "yellow" :bold t :italic t) apply(face-custom-attributes-set message-header-newsgroups-face #<tty-frame "F1" 0x18991> nil (:foreground "yellow" :bold t :italic t)) # bind (display atts tags frame spec face) face-display-set(message-header-newsgroups-face ((((class color) (background dark)) (:fore ground "yellow" :bold t :italic t)) (((class color) (background light)) (:foreground "blue4" :bold t :italic t)) (t (:bold t :italic t))) #<tty-frame "F1" 0x18991>) # bind (spec symbol) #<compiled-function (symbol) "...(19)" [frame spec symbol saved-face face-defface-spec face-display-set] 5>(message-header-newsgroups-face) mapc-internal(#<compiled-function (symbol) "...(19)" [frame spec symbol saved-face face-defface-spec face-display-set] 5> (gnus-group-news-4-face gnus-emphasis-strikethru w3m-history-current-url-face default gnus-server-denied-face gnus-emphasis-bold-italic gnus-summary-high-ticked-face gnus-group-news-5-empty-face w3m-underline-face modeline-buffer-id paren-blink-off isearch gnus-header-subject-face message-header-to-face left-margin gnus-summary-high-ancient-face primary-selection gui-element gnus-header-content-face message-header-newsgroups-face gnus-summary-high-unread-face font-lock-reference-face green custom-group-tag-face message-header-xheader-face gnus-summary-high-read-face gnus-group-news-low-empty-face font-lock-type-face custom-state-face gnus-group-mail-2-face modeline-mousable-minor-mode message-mml-face bold gnus-group-news-1-empty-face font-lock-variable-name-face custom-rogue-face custom-comment-tag-face gnus-emphasis-bold gnus-group-mail-3-empty-face gnus-group-news-3-face w3m-current-anchor-face font-lock-doc-string-face toolbar font-lock-comment-face custom-changed-face gnus-emphasis-highlight-words gnus-server-opened-face gnus-summary-selected-face gnus-group-news-4-empty-face gnus-emphasis-underline-italic paren-match ...)) # bind (cl-rest cl-seq cl-func) mapc(#<compiled-function (symbol) "...(19)" [frame spec symbol saved-face face-defface-spec face-display-set] 5> (gnus-group-news-4-face gnus-emphasis-strikethru w3m-history-current-url-face default gnus-server-denied-face gnus-emphasis-bold-italic gnus-summary-high-ticked-face gnus-group-news-5-empty-face w3m-underline-face modeline-buffer-id paren-blink-off isearch gnus-header-subject-face message-header-to-face left-margin gnus-summary-high-ancient-face primary-selection gui-element gnus-header-content-face message-header-newsgroups-face gnus-summary-high-unread-face font-lock-reference-face green custom-group-tag-face message-header-xheader-face gnus-summary-high-read-face gnus-group-news-low-empty-face font-lock-type-face custom-state-face gnus-group-mail-2-face modeline-mousable-minor-mode message-mml-face bold gnus-group-news-1-empty-face font-lock-variable-name-face custom-rogue-face custom-comment-tag-face gnus-emphasis-bold gnus-group-mail-3-empty-face gnus-group-news-3-face w3m-current-anchor-face font-lock-doc-string-face toolbar font-lock-comment-face custom-changed-face gnus-emphasis-highlight-words gnus-server-opened-face gnus-summary-selected-face gnus-group-news-4-empty-face gnus-emphasis-underline-italic paren-match ...)) # bind (frame) initialize-custom-faces(#<tty-frame "F1" 0x18991>) # bind (frame) custom-initialize-frame(#<tty-frame "F1" 0x18991>) # bind (frame-being-created) make-frame(nil #<tty-device on "/dev/pts/3" 0x1890a>) # bind (device dest-frame new-frame old-device-num quick view flags list type) gnuserv-edit-files((tty "/dev/pts/3" "xterm" 8174) nil) eval((gnuserv-edit-files (quote (tty "/dev/pts/3" "xterm" 8174)) (quote nil))) byte-code("..." [header gnuserv-string eval read-from-string] 4) # (condition-case ... . ((error (byte-code "<80><C3>^P\n<80><AB><8F><A5><80><C4>\n \" <8F><A8><80><C5>^R<80><C6> ＠ A\"<8F><A7>" [gnuserv-string oops gnuserv-current-client "" gnuserv-write-to-client nil signal] 3)) (quit (byte-code "<80><C3>^Q\n<80><AB><8F> <A5><80><C4>\\"<8F><A8><80><C5>^R<80><C6><80><C7><80><C5>\"<8F><A7>" [oops gnuserv-string guserv-current-client "" gnuserv-write-to-client nil signal quit] 3)))) # bind (header string proc) gnuserv-process-filter(#<process "gnuserv" pid 8128 state:run> "5 (gnuserv-edit-files '(tty \"/dev/pts/3\" \"xterm\" 8174) '())^D") # (condition-case ... . error) # (catch top-level ...) -- Nelson Ferreira