21.4.6 hangs...

Folks, this isn't my clipboard hang I reported April 2. I believe that has been "solved" by turning off clipboard use in the killing customize page. This xemacs session had been running for a few days with lots of edits/compile/debug cycles and a few CVS checkins, using ediff, etc. When I went to the terminal window to kill xemacs I found a lot X11 errors which I'll attach at the end of this message. Here is the backtrace xemacs gave me. Lisp backtrace follows: make-font-instance("-*-courier-medium-i-*-*-*-120-*-*-*-*-iso8859-*" #<x-device on "rules:0.0" 0x1d49> t) # bind (device name) try-font-name("-*-courier-medium-i-*-*-*-120-*-*-*-*-iso8859-*" #<x-device on "rules:0.0" 0x1d49>) # bind (device font) x-make-font-italic(#<font-instance "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*" on #<x-device on "rules:0.0" 0x1d49> 0x580000f 0x1d63> #<x-device on "rules:0.0" 0x1d49>) # bind (sp-inst tag-set inst-pair first-valid result func inst-list device sp) frob-face-property-1(#<font-specifier global=((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*") 0x1434f> #<x-device on "rules:0.0" 0x1d49> (((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*")) x-make-font-italic) # bind (device) #<compiled-function (device) "...(13)" [func inst-list sp-arg device-tags device device-matches-specifier-tag-set-p frob-face-property-1] 5>(#<x-device on "rules:0.0" 0x1d49>) mapcar(#<compiled-function (device) "...(13)" [func inst-list sp-arg device-tags device device-matches-specifier-tag-set-p frob-face-property-1] 5> (#<x-device on "rules:0.0" 0x1d49>)) # bind (device func inst-list locale sp-arg) #<compiled-function (sp-arg locale inst-list func) "...(49)" [sp-arg device-tags new-result result locale device dfw-device device-matches-specifier-tag-set-p frob-face-property-1 mapcar #<compiled-function ... "...(13)" ... 5> device-list nil #<compiled-function ... "...(39)" ... 6> add-spec-list-to-specifier inst-list func sp] 6>(#<font-specifier global=((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*") 0x1434f> global (((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*")) x-make-font-italic) # bind (ms-this-spec ms-specs ms-result ms-maparg ms-locale ms-func ms-specifier) map-specifier(#<font-specifier global=((x) . "-*-courier-medium-r-*-*-*-120-*-*-*-*-iso8859-*") 0x1434f> #<compiled-function (sp-arg locale inst-list func) "...(49)" [sp-arg device-tags new-result result locale device dfw-device device-matches-specifier-tag-set-p frob-face-property-1 mapcar #<compiled-function ... "...(13)" ... 5> device-list nil #<compiled-function ... "...(39)" ... 6> add-spec-list-to-specifier inst-list func sp] 6> nil x-make-font-italic) # bind (sp temp-sp tags locale device-tags func property face) frob-face-property(man-italic font x-make-font-italic (x) nil (custom)) #<compiled-function nil "...(45)" [tags locale face featurep gtk frob-face-property font gtk-make-font-italic (gtk) x x-make-font-italic (x) mswindows mswindows-make-font-italic (mswindows)] 7>() # bind (inst domain change-it spec-list the-locale standard-face-mapping ws-thunk tty-thunk frobbed-face unfrobbed-face tags locale face) frob-face-font-2(man-italic nil (custom) default italic #<compiled-function nil "...(14)" [tags locale face featurep tty set-face-underline-p t] 6> #<compiled-function nil "...(45)" [tags locale face featurep gtk frob-face-property font gtk-make-font-italic (gtk) x x-make-font-italic (x) mswindows mswindows-make-font-italic (mswindows)] 7> (([default] . [italic]) ([bold] . [bold-italic]) ([italic] . t) ([bold-italic] . t))) # bind (tags locale face) make-face-italic(man-italic nil (custom)) # bind (tags frame value face) custom-set-face-italic(man-italic t nil (custom)) funcall(custom-set-face-italic man-italic t nil (custom)) # (condition-case ... . ((error))) # bind (fun value name atts tags frame face) face-custom-attributes-set(man-italic nil (custom) :italic t) apply(face-custom-attributes-set man-italic nil (custom) (:italic t)) # bind (display atts tags frame spec face) face-display-set(man-italic ((t (:italic t))) nil (custom)) # bind (value frames frame args doc spec face) custom-declare-face(man-italic ((t (:italic t))) "Manual italics face" :group man) byte-code("..." [Manual-mode-map current-load-list m custom-declare-face man-italic ((t ...)) "Manual italics face" :group man man-bold ((t ...)) "Manual bold face" man-heading ((t ...)) "Manual headings face" man-xref ((t ...)) "Manual xrefs face" boundp make-sparse-keymap set-keymap-name define-key "l" Manual-last-page button2 Manual-follow-xref button3 Manual-popup-menu] 6) # bind (current-load-list) # (unwind-protect ...) # bind (load-file-name) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) # (unwind-protect ...) load-internal("man" nil nil nil nil nil) # bind (nosuffix nomessage noerror file) load("man" nil nil nil) apply(load ("man" nil nil nil)) # bind (inhibit-file-name-handlers inhibit-file-name-operation args op) dired-handler-fn(load "man" nil nil nil) load-internal("man" nil nil nil nil nil) # bind (nosuffix nomessage noerror file) load("man" nil nil nil) # (unwind-protect ...) command-execute(manual-entry t) # bind (_execute_command_keys_ _execute_command_name_ prefix-arg) execute-extended-command(nil) # bind (command-debug-status) call-interactively(execute-extended-command) # (condition-case ... . error) # (catch top-level ...) Anyone seen anything like this? Oh yes, before I forget: OS HP-UX 10.20 patched up to HP Dec. 2001 patch bundle Motif 1.2 Compiled with HP's ansi C compiler +O3. gary