Eric Knauel <eric(a)macnews.de> writes:
> strange thing happen with my Oort Gnus. After opening the summary
> buffer for nnml:mail.misc I simply press "n" to get to the
> messages. That's all, XEmacs 21.2.46 crashes immediatly. I can
> reproduce the crash, but I'm not sure if it is still reproducable
> after reading the mail. ;-)
Could you try XEmacs 21.4.0?
Anyway, this is most likely a XEmacs problem, so I've CC'd
xemacs-beta, maybe someone there can tell something from the backtrace
below.
> [eric@gryffindor ~] gdb xemacs
> GNU gdb 5.0-20001113 (Apple version gdb-186.1) (Sun Feb 18 01:18:32 GMT 2001) (UI_OUT)
> Copyright 2000 Free Software Foundation, Inc.
> GDB is free software, covered by the GNU General Public License, and you are
> welcome to change it and/or distribute copies of it under certain conditions.
> Type "show copying" to see the conditions.
> There is absolutely no warranty for GDB. Type "show warranty" for details.
> This GDB was configured as "powerpc-apple-macos10".
> Reading symbols for shared libraries ... done
> (gdb) run
> Starting program: /usr/local/bin/xemacs
> [Switching to thread 1 (process 947 thread 0x1903)]
> -----
> Filesystem 1K-blocks Used Avail Capacity Mounted on
> /dev/disk0s13 18795456 16197540 2597916 86% /
> devfs 32 32 0 100% /dev
> fdesc 1 1 0 100% /dev
> <volfs> 512 512 0 100% /.vol
> /dev/disk0s12s1 6727806 1208548 5182868 18% /Volumes/Disk
> /dev/disk0s14 4147456 2981196 1166260 71% /Volumes/MacOS
> automount -fstab [263] 0 0 0 100% /Network/Servers
> -----
> 9:26AM up 1:17, 4 users, load averages: 0.96, 0.45, 0.32
> Reading symbols for shared libraries . done
> wmaker warning: could not find icon file "ColorGNU.xpm"
>
> Program received signal EXC_BAD_ACCESS, Could not access memory.
> 0x00158e60 in re_match_2_internal (bufp=warning: ppc_frame_chain_valid: stack frame from 0xbffada70 to 0xbfffdd40 larger than 65536 bytes; assuming invalid
> 0x407050, string1=0x0, size1=0, string2=0x1185f5f '=' <repeats 59 times>, "\nRemoval Instructions:\nTo be removed from our \"in house\" mailing list \nmailto:remove.promo@yourfreehosting.net?subject=removepromo\nand you wi"..., size2=2211, pos=802, regs=0x40830c, stop=3369392) at regex.c:5260
> 5260 PUSH_FAILURE_POINT (p + mcnt, d, -2);
> (gdb) where
> #0 0x00158e60 in re_match_2_internal (bufp=0x407050, string1=0x0, size1=0, string2=0x1185f5f '=' <repeats 59 times>, "\nRemoval Instructions:\nTo be removed from our \"in house\" mailing list \nmailto:remove.promo@yourfreehosting.net?subject=removepromo\nand you wi"..., size2=2211, pos=802, regs=0x40830c, stop=3369392) at regex.c:5260
> warning: ppc_frame_chain_valid: stack frame from 0xbffada70 to 0xbfffdd40 larger than 65536 bytes; assuming invalid
>
>
> Lisp backtrace follows:
>
> re-search-forward("\\b\\(\\(www\\.\\|\\(s?https?\\|ftp\\|file\\|gopher\\|news\\|telnet\\|wais\\|mailto\\):\\)\\(//[-a-zA-Z0-9_.]+:[0-9]*\\)?\\([-a-zA-Z0-9_=!?#$@~`%&*+|\\/:;.,]\\|\\w\\)+\\([-a-zA-Z0-9_=#$@~`%&*+|\\/]\\|\\w\\)\\)" nil t)
> # bind (buffer-read-only inhibit-point-motion-hooks case-fold-search alist beg entry regexp)
> # (unwind-protect ...)
> # bind (force)
> gnus-article-add-buttons()
> # (unwind-protect ...)
> # bind (length alist article-goto-body-goes-to-point-min-p treated-type highlightp val elem type total-parts part-number condition)
> gnus-treat-article(nil 1 1)
> # (unwind-protect ...)
> # bind (display e b type name handle buffer-read-only handles)
> # (unwind-protect ...)
> # bind (save-selected-window-window)
> # (unwind-protect ...)
> # bind (ihandles)
> gnus-display-mime()
> # bind (gnus-article-buffer buffer-read-only)
> gnus-article-prepare-display()
> # (unwind-protect ...)
> # bind (result group gnus-tmp-internal-hook summary-buffer gnus-article)
> # (unwind-protect ...)
> # bind (header all-headers article)
> gnus-article-prepare(2163 nil)
> # bind (all-header article)
> gnus-summary-display-article(2163)
> # bind (push backward subject unread)
> gnus-summary-next-article(t nil)
> #<compiled-function nil "...(82)" [gnus-summary-next-article gnus-summary-goto-unread never gnus-summary-last-article-p get-text-property gnus-intangible to gnus-summary-goto-subject gnus-number gnus-summary-last-subject gnus-auto-select-same 3 gnus-newsgroup-data headers vectorp 1] 7 ("/Users/eric/.xemacs/lisp/gnus/gnus-sum.elc" . 175333) nil>()
> call-interactively(gnus-summary-next-unread-article)
> # (condition-case ... . error)
> # (catch top-level ...)
> Segmentation fault (core dumped)
>
>
>
> (setq debug-on-error nil)
>
> (if (string-match "XEmacs\\|Lucid" emacs-version)
>
> (progn
> (setq options-save-faces t)
> (if (or (file-accessible-directory-p
> "/usr/X11R6/lib/xemacs/site-lisp/auctex/")
> (or (and (= emacs-major-version 19)
> (>= emacs-minor-version 15))
> (= emacs-major-version 20)))
> (progn
> (require 'tex-site)
> (setq-default TeX-master nil)))))
>
> ;; # SQL-Modul
> ;; ###########
> (autoload 'sql "sql-mode"
> "Start the interactive SQL interpreter in a new buffer." t)
>
> (autoload 'sql-mode "sql-mode"
> "Mode for editing SQL files and running a SQL interpetror." t)
>
> (setq auto-mode-alist (cons '("\\.sql$" . sql-mode) auto-mode-alist))
>
> ;; Für den TeX-Modus
> ;; #################
> (require 'tex-site)
> (setq TeX-auto-save t)
> (setq TeX-parse-self t)
> (setq TeX-view-style '(("^a5$" "xdvi -thorough %d -paper a5")
> ("^landscape$" "xdvi -thorough %d -paper a4r -s 4")
> ("." "xdvi -thorough %d")))
> (add-hook 'latex-mode-hook
> (function (lambda ()
> (local-set-key (quote [228]) (quote "\"a"))
> (local-set-key (quote [246]) (quote "\"o"))
> (local-set-key (quote [252]) (quote "\"u"))
> (local-set-key (quote [223]) (quote "\"s"))
> (local-set-key (quote [196]) (quote "\"A"))
> (local-set-key (quote [214]) (quote "\"O"))
> (local-set-key (quote [220]) (quote "\"U"))
> ; start ispell in TeX mode
> (setq ispell-extra-args '("-t"))
> )))
> ;; Run gv and ghostview
> (add-hook 'LaTeX-mode-hook
> (function (lambda()
> (add-to-list
> 'TeX-command-list
> '("GV" "gv %s.dvi" TeX-run-background t nil))
> (add-to-list
> 'TeX-command-list
> '("Ghostview" "ghostview %s.ps" TeX-run-background t nil))
> )))
> ;; ISpell-Setup by Michael Deindl <olmur @ dwarf.bb.bawue.de>
> (global-set-key "\M-#" 'ispell-word)
> (global-set-key "\C-cim" 'ispell-message)
> (global-set-key "\C-cib" 'ispell-buffer)
> (global-set-key "\C-cic" 'ispell-change-dictionary)
> (global-set-key "\C-cid" '(lambda () "set german dictionary"
> (interactive)
> (ispell-change-dictionary "deutsch8")
> ))
> (global-set-key "\C-cie" '(lambda () "set english dictionary"
> (interactive)
> (ispell-change-dictionary "english")
>
> ))
>
> ;; German Quotes
> (defun tex-german-quotes ()
> "mg : alters quotes to german ones"
> (interactive)
> (setq TeX-open-quote "\"`")
> (setq TeX-close-quote "\"'"))
> (add-hook 'tex-mode-hook 'tex-german-quotes)
> (message "LaTeX initialised")
>
> ;; Calendar
> (add-hook 'diary-display-hook 'fancy-diary-display)
> (add-hook 'list-diary-entries-hook 'sort-diary-entries)
> (setq mark-diary-entries-in-calendar t)
> (setq european-calendar-style t)
> (setq all-christian-calendar-holidays t)
> (setq calendar-date-display-form
> '((if dayname (concat dayname ", ")) day " " monthname " " year))
> (setq calendar-time-display-form
> '(24-hours ":" minutes
> (if time-zone " (") time-zone (if time-zone ")")))
> (setq appt-message-warning-time 30)
> (setq view-diary-entries-initially t)
> (setq appt-issue-message t)
> (add-hook 'diary-hook 'appt-make-list)
> ;:; German setup of easter holidays:
> (and (file-exists-p "~/emacs/site-holidays.el") ; contains all settings
> (load-library "~/emacs/site-holidays")) ; for local holidays
>
> (defun own-calendar-load-settings ()
> (setq calendar-month-name-array [ "Januar" "Februar" "März" "April"
> "Mai" "Juni" "Juli" "August"
> "September" "Oktober" "November"
> "Dezember" ]
> calendar-day-name-array [ "Sonntag" "Montag" "Dienstag"
> "Mittwoch" "Donnerstag" "Freitag"
> "Samstag" ]
> calendar-week-start-day 1
> diary-file "~/.diary" ;: I prefere a hidden file
> european-calendar-style t
> cal-tex-diary t)
>
> ;: I want it all!
> (setq mark-diary-entries-in-calendar t
> mark-holidays-in-calendar nil))
>
> (defun own-calendar-initial-settings ()
> (add-hook 'today-visible-calendar-hook 'calendar-mark-today)
> (add-hook 'diary-display-hook 'fancy-diary-display)
>
> ;: maybe this is set on the wrong hook but I found no other way to mark all
> ;: entries initially:
> (if (not mark-diary-entries-in-calendar)
> (progn
> (mark-diary-entries)
> (mark-calendar-holidays)))
>
> (show-all-diary-entries))
>
> (add-hook 'calendar-load-hook 'own-calendar-load-settings)
> (add-hook 'initial-calendar-window-hook 'own-calendar-initial-settings)
> (message "calendar initialised")
>
> (setq-default tab-width 3)
>
> (add-hook 'text-mode-hook 'turn-on-auto-fill)
>
> (setq browse-url-browser-function
> (if (eq window-system 'x)
> 'browse-url-netscape
> 'browse-url-w3))
> (autoload browse-url-browser-function "browse-url"
> "Ask a WWW browser to show a URL." t)
>
> (global-unset-key [backspace])
> (global-set-key [backspace] 'delete-backward-char)
> (global-unset-key [delete])
> (global-set-key [delete] 'delete-char)
>
> ;; Fuer den verf***** C/Java Mode
> (defun erics-looks-a-bit-better-hook-for-c-java-mode ()
> (setq c-basic-offset 2))
>
> (add-hook 'c-mode-common-hook 'erics-looks-a-bit-better-hook-for-c-java-mode)
>
> ; auskommentieren wenn package-Version von gnus benutzt werden soll
> (setq load-path (cons (expand-file-name "~/.xemacs/lisp/gnus/") load-path))
> (require 'gnus)
>
> ; ausserdem brauche ich noch diverse andere Modi
> (setq load-path (cons (expand-file-name "~/.xemacs/lisp/misc/") load-path))
>
> ;; Diverser Krempel
>
> ; ist glaube ich nicht mehr nötig.
> ;(load "mime-setup")
>
> (setq lpr-command "lpr")
> (setq ps-lpr-command "lpr")
> (setq lpr-switches (quote ("-Plp")))
> (setq ps-lpr-switches (quote ("-Plp")))
> (setq ps-paper-type 'a4small)
> ;(setq Info-directory-list (cons "/usr/lib/xemacs/mule-packages/info"
> ; Info-directory-list))
>
> (setq message-kill-buffer-on-exit t)
>
> (setq calendar-week-start-day 1)
> (setq focus-follows-mouse t)
> (setq tab-width 2)
>
> (setq next-line-add-newlines t)
> (setq display-time-24hr-format t)
> (setq column-number-mode t)
> (setq line-number-mode t)
>
> ; Farben
> (defconst erics-font-size "12")
> (defconst erics-font-family "Fixed")
> (if (eq (console-type) 'x)
> (progn
> (set-face-foreground 'default "black")
> (set-face-background 'default "grey")
> (custom-set-faces
> '(default ((t (:foreground "black" :size erics-font-size :family erics-font-family))) t)
> '(info-xref ((t (:foreground "blue"))))
> '(info-node ((t (:foreground "blue" :bold t))))
> '(widget-documentation-face ((((class color) (background light))
> (:foreground "dark green" :size erics-font-size))))
> '(border-glyph ((t (:size erics-font-size))) t)
> '(bold ((t (:family erics-font-family :bold t))) t)
> '(bold-italic ((t (:size erics-font-size :family erics-font-family :bold t :italic t))) t)
> '(blue ((t (:foreground "blue" :size erics-font-size :family erics-font-family))) t)
> '(isearch ((t (:foreground "black" :background "paleturquoise"))) t)
> '(highlight ((t (:foreground "black" :background "darkseagreen2"))) t))))
>
> ;; Fuer bbdb
> (setq bbdb-file "~/.bbdb");
> (setq bbdb-default-area-code "07071")
> (setq bbdb-north-american-phone-numbers-p nil)
> (setq bbdb-electric-p t)
> (setq bbdb/mail-auto-create-p t)
> (setq bbdb/news-auto-create-p nil)
> (setq bbdb-completion-display-record nil)
> (setq bbdb-use-pop-up nil)
>
> ; lpr Zeugs
> (setq lpr-switches (quote ("(\"--medium=a4dj\")")))
> (setq lpr-command "a2ps")
>
> ; scheme mode
> (autoload 'run-scheme "cmuscheme"
> "Run an inferior Scheme process." t)
> (require 'cmuscheme48)
> (setq auto-mode-alist
> (cons '("\\.scm$" . scheme-mode)
> auto-mode-alist))
> (setq scheme-program-name "scheme48 -h 10000000")
> (set-specifier default-toolbar-visible-p nil)
>
> ;; zenirc
> ;; #######
> (setq zenirc-server-default "irc.uni-stuttgart.de")
> (setq zenirc-nick-default "hogwart03")
>
> ; lieber mail-lib als sendmail/exim zum Versenden von Mails nehmen
> ; Das kann wenigstens "von Haus aus" SMTP-Authentifizierung
> (setq send-mail-function 'smtpmail-send-it) ; für mail
> (setq message-send-mail-function 'smtpmail-send-it) ; für message
> (setq smtpmail-default-smtp-server "webmail.macnews.de")
> (setq smtpmail-local-domain "macnews.de")
> (setq smtpmail-debug-info t)
> (load-library "smtpmail")
> (setq smtpmail-code-conv-from nil)
> (setq user-full-name "Eric Knauel")
> (setq smtpmail-auth-credentials
> '(("webmail.macnews.de" 25 "eric%macnews.de" "very-secret")))
>
> ; Bei Gelegenheit mal eins machen...
> ;(setq smtpmail-starttls-credentials
> ; '(("webmail.macnews.de" 25 "~/.my_smtp_tls.key" "~/.my_smtp_tls.cert")))
>
>
> ;; PHP mode
> ;; ########
> (autoload 'php-mode "php-mode" "PHP editing mode" t)
> (add-to-list 'auto-mode-alist '("\\.php3$" . php-mode))
> (add-to-list 'auto-mode-alist '("\\.php$" . php-mode))
>
> (setq efs-ftp-program-name "/usr/bin/ftp")
>
> (require 'uniquify)
> (setq ediff-window-setup-function (quote ediff-setup-windows-plain))
> (setq uniquify-buffer-name-style (quote post-forward))
> (setq uniquify-after-kill-buffer-p t)
>
> (font-lock-mode)
>
> ;; gnuserv starten
> (gnuserv-start)
>
>
>
>
> Ciao,
> Eric
> --
> "Excuse me --- Di Du Du Duuuuh Di Dii --- Huh Weeeheeee" (Albert King)