From xemacs-m  Thu Sep  4 00:45:29 1997
Received: from bittersweet.inetarena.com (bittersweet.inetarena.com [206.129.216.38])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id AAA01439
	for <xemacs-beta@xemacs.org>; Thu, 4 Sep 1997 00:45:25 -0500 (CDT)
Received: (from karlheg@localhost)
	by bittersweet.inetarena.com (8.8.7/8.8.7/Debian/GNU) id WAA05049;
	Wed, 3 Sep 1997 22:45:24 -0700
To: XEmacs BETA <xemacs-beta@xemacs.org>
Subject: Re: Important patch for 20.3-beta20, please apply
References: <199709030555.WAA10745@o210.nas.nasa.gov> <m2wwkykjju.fsf@altair.xemacs.org> <87sovm1jl4.fsf@mharnois.workgroup.net> <qyjbu2a5mdr.fsf@metheny.enst.fr>
X-Face: /Q}=yl}1_v7nP)xXo5XjG8+tl@=uVu7o5u6)f]zN?+<hB!K.m9:[|*p34jVN`O;:XZXVSy>/\R>qDt(t8w!-i{(y0"`jFw^uk8inzO9wXabd'CdjUWfC\GHi:6nO*YC89#-qD>Q4r%9!V"<RYJ=7D#$";q=zML5'!=wvXk^$`6FT=5CMofQX)WUKt0p:OKl.mFOXx/D
Mime-Version: 1.0 (generated by tm-edit 7.108)
Content-Type: text/plain; charset=US-ASCII
From: karlheg@inetarena.com (Karl M. Hegbloom)
Date: 03 Sep 1997 22:45:22 -0700
In-Reply-To: Didier Verna's message of "03 Sep 1997 19:37:52 +0200"
Message-ID: <87n2ltzl71.fsf@bittersweet.inetarena.com>
Lines: 70
X-Mailer: Gnus v5.4.64/XEmacs 20.3(beta18) - "Bratislava"

>>>>> "dv" == Didier Verna <verna@inf.enst.fr> writes:

    dv> 	... and since we're in `version' considerations, I
    dv> think that the emacs-version function should preserve the
    dv> previous matching context before executing (its string-match
    dv> notably). This can cause problems when called in a matching
    dv> operation.

Loading version.el...*** Error in XEmacs initialization
(error "match-data called before any match found")
*** Backtrace
  really-early-error-handler((error "match-data called before any match found"))
  match-data()
  (let ((match-data ...)) (unwind-protect (progn ...) (store-match-data match-data)))
)
  (save-match-data (let (...) (cond ... ... ...)))
)
  # bind (arg)
  emacs-version()
  (concat "\n@" "(#)" (emacs-version) "\n@" "(#)" "Configuration: " system-configuration "\n")
)
  (purecopy (concat "\n@" "(#)" (emacs-version) "\n@" "(#)" "Configuration: " system-configuration "\n"))
)
  (or (memq system-type (quote ...)) (purecopy (concat "\n@" "(#)" ... "\n@" "(#)" "Configuration: " system-configuration "\n")))
)
  # bind (current-load-list standard-input)
  # (unwind-protect ...)
  # bind (load-file-name)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  load("version.el")
  (prog1 (load file) (garbage-collect))
)
  (load-gc file)
)
  (while (setq file (car dumped-lisp-packages)) (load-gc file) (setq dumped-lisp-packages (cdr dumped-lisp-packages)))
)
  # bind (file dumped-lisp-packages)
  (let (dumped-lisp-packages file) (load "dumped-lisp.el") (while (setq file ...) (load-gc file) (setq dumped-lisp-packages ...)) (if (not ...) (progn ... ...)) (fmakunbound (quote load-gc)))
)
  (lambda nil (external-debugging-output (format "\nUsing load-path %s" load-path)) (buffer-disable-undo (get-buffer "*scratch*")) (let (...) (setq source-directory temp-path) (setq load-path ...)) (setq load-warn-when-source-newer t load-warn-when-source-only t) (defun test-atoms nil (mapatoms ...)) (defmacro load-gc (file) (list ... ... ...)) (let (dumped-lisp-packages file) (load "dumped-lisp.el") (while ... ... ...) (if ... ...) (fmakunbound ...)))()
  # (unwind-protect ...)
  call-with-condition-handler(really-early-error-handler (lambda nil (external-debugging-output (format "\nUsing load-path %s" load-path)) (buffer-disable-undo (get-buffer "*scratch*")) (let (...) (setq source-directory temp-path) (setq load-path ...)) (setq load-warn-when-source-newer t load-warn-when-source-only t) (defun test-atoms nil (mapatoms ...)) (defmacro load-gc (file) (list ... ... ...)) (let (dumped-lisp-packages file) (load "dumped-lisp.el") (while ... ... ...) (if ... ...) (fmakunbound ...))))
  # bind (current-load-list standard-input)
  # (unwind-protect ...)
  # bind (load-file-name)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  load("loadup.el")
  # (condition-case ... . error)
  # (catch top-level ...)
*** Killing XEmacs
make[1]: [xemacs] Error 255 (ignored)
make[1]: *** [xemacs] Error 1
make[1]: Leaving directory `/usr/local/src/xemacs-20/src'
make: *** [src] Error 2

Compilation exited abnormally with code 2 at Wed Sep  3 22:42:42

-- 
mailto:karlheg@inetarena.com (Karl M. Hegbloom)
http://www.inetarena.com/~karlheg
Portland, OR  USA
Debian GNU 1.3.1  Linux 2.0.30+parport AMD K5 PR-133

