Crash report

I crashed like this in xemacs-21.2.28. No C stack available. event-window(#<motion-event 477, 433>) # bind (event) event-buffer(#<motion-event 477, 433>) # bind (window frame event) default-mouse-motion-handler(#<motion-event 477, 433>) # (unwind-protect ...) sit-for(0) # (unwind-protect ...) # bind (window) #<compiled-function (window) "...(134)" [window-buffer window current window-point process-mark process scroll t all this selected others string set-window-point comint-scroll-show-maximum-output pos-visible-in-window-p recenter floatp floor window-height 1 -1 sit-for 0] 4>(#<window on "shell-2" 0x48df>) # bind (walk-windows-current walk-windows-start device all-frames minibuf proc) walk-windows(#<compiled-function (window) "...(134)" [window-buffer window current window-point process-mark process scroll t all this selected others string set-window-point comint-scroll-show-maximum-output pos-visible-in-window-p recenter floatp floor window-height 1 -1 sit-for 0] 4> nil t) # bind (scroll process current selected string) comint-postoutput-scroll-to-bottom("\nLoading find-paths.el...\nLoading packages.el...\nLoading setup-paths.el...") run-hook-with-args(comint-postoutput-scroll-to-bottom "\nLoading find-paths.el...\nLoading packages.el...\nLoading setup-paths.el...") # bind (obuf opoint obeg oend oprocbuf string process) ad-Orig-comint-output-filter(#<process "shell<1>" pid 3404 state:run> "\nLoading find-paths.el...\nLoading packages.el...\nLoading setup-paths.el...") (setq ad-return-value (ad-Orig-comint-output-filter process string)) ) (if (not (eq ... ...)) (setq ad-return-value (ad-Orig-comint-output-filter process string)) (setq ad-return-value (ad-Orig-comint-output-filter process string)) (set-buffer (window-buffer ...))) ) # bind (ad-return-value) (let (ad-return-value) (if (not ...) (setq ad-return-value ...) (setq ad-return-value ...) (set-buffer ...)) ad-return-value) ) # bind (string process) comint-output-filter(#<process "shell<1>" pid 3404 state:run> "\nLoading find-paths.el...\nLoading packages.el...\nLoading setup-paths.el...") # (condition-case ... . error) # bind (inhibit-quit) # (condition-case ... . error) # (catch top-level ...)