[COMMIT] Correct the CCL programs used by the coding system in ccl-tests.el.
15 years, 9 months
Aidan Kehoe
APPROVE COMMIT
NOTE: This patch has been committed.
Ar an t-aonú lá is triochad de mí na Nollaig, scríobh Aidan Kehoe:
> Ar an triochadú lá de mí na Nollaig, scríobh Vin Shelton:
>
> > Aidan,
> >
> > In a mule build from the latest hg sources (see Installation file
> > below), query-coding-tests.el is hanging. [...]
>
> Thanks Vin! I can reproduce this, I’ll try to get to in in the next three
> days.
>
OK, done. There remains the issue that a few coding systems in packages
don’t have safe-chars or safe-charsets properties, which will still lead to
a few test failures for most people even with this change. But the hang is
gone.
# HG changeset patch
# User Aidan Kehoe <kehoea(a)parhasard.net>
# Date 1230996254 0
# Node ID baf6c66f6f474dd9edfa216794aa9c300ff128c6
# Parent ebc01476e352f6765d1f269a30b2f7ed7095db72
Correct the CCL programs used by the coding system in ccl-tests.el.
2009-01-03 Aidan Kehoe <kehoea(a)parhasard.net>
* automated/ccl-tests.el (ccl-test-setup):
Use sane CCL programs for decoding and encoding with the test CCL
coding system by default. Correct a spelling in the docstring, add
a safe-chars property so that we don't confuse
query-coding-tests.el.
(ccl-test-suites):
Explicitly re-initialise the CCL programs for the test coding
system once finished.
diff -r ebc01476e352 -r baf6c66f6f47 tests/ChangeLog
--- a/tests/ChangeLog Tue Dec 30 20:33:30 2008 +0000
+++ b/tests/ChangeLog Sat Jan 03 15:24:14 2009 +0000
@@ -1,3 +1,14 @@
+2009-01-03 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * automated/ccl-tests.el (ccl-test-setup):
+ Use sane CCL programs for decoding and encoding with the test CCL
+ coding system by default. Correct a spelling in the docstring, add
+ a safe-chars property so that we don't confuse
+ query-coding-tests.el.
+ (ccl-test-suites):
+ Explicitly re-initialise the CCL programs for the test coding
+ system once finished.
+
2008-12-28 Aidan Kehoe <kehoea(a)parhasard.net>
* automated/query-coding-tests.el:
diff -r ebc01476e352 -r baf6c66f6f47 tests/automated/ccl-tests.el
--- a/tests/automated/ccl-tests.el Tue Dec 30 20:33:30 2008 +0000
+++ b/tests/automated/ccl-tests.el Sat Jan 03 15:24:14 2009 +0000
@@ -117,21 +117,22 @@
(defun ccl-test-setup ()
(define-ccl-program
ccl-test-decoder
- '(1 (read r0)
- (loop
- (write-read-repeat r0))))
+ '(1 (loop
+ (read r0)
+ (write-repeat r0))))
(define-ccl-program
ccl-test-encoder
- '(1 (read r0)
- (loop
- (write-read-repeat r0))))
+ '(1 (loop
+ (read r0)
+ (write-repeat r0))))
(or (find-coding-system 'ccl-test-coding-system)
(make-coding-system
'ccl-test-coding-system
'ccl
- "CCL TEST temprary coding-system."
+ "CCL TEST temporary coding-system."
'(mnemonic "CCL-TEST"
eol-type lf
+ safe-chars t
decode ccl-test-decoder
encode ccl-test-encoder))))
@@ -601,7 +602,9 @@
(ccl-test-simple-read-and-write)
(ccl-test-read-write-multibyte-character)
(ccl-test-ccl-call)
- (ccl-test-map-instructions))
+ (ccl-test-map-instructions)
+ ;; Re-initialise the coding system:
+ (ccl-test-setup))
;;; start tests only when ccl-execute is enabled.
(if (fboundp 'ccl-execute)
--
¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches
commit: Correct the CCL programs used by the coding system in ccl-tests.el.
15 years, 9 months
Aidan Kehoe
changeset: 4573:baf6c66f6f474dd9edfa216794aa9c300ff128c6
parent: 4571:ebc01476e352f6765d1f269a30b2f7ed7095db72
user: Aidan Kehoe <kehoea(a)parhasard.net>
date: Sat Jan 03 15:24:14 2009 +0000
files: tests/ChangeLog tests/automated/ccl-tests.el
description:
Correct the CCL programs used by the coding system in ccl-tests.el.
2009-01-03 Aidan Kehoe <kehoea(a)parhasard.net>
* automated/ccl-tests.el (ccl-test-setup):
Use sane CCL programs for decoding and encoding with the test CCL
coding system by default. Correct a spelling in the docstring, add
a safe-chars property so that we don't confuse
query-coding-tests.el.
(ccl-test-suites):
Explicitly re-initialise the CCL programs for the test coding
system once finished.
diff -r ebc01476e352f6765d1f269a30b2f7ed7095db72 -r baf6c66f6f474dd9edfa216794aa9c300ff128c6 tests/ChangeLog
--- a/tests/ChangeLog Tue Dec 30 20:33:30 2008 +0000
+++ b/tests/ChangeLog Sat Jan 03 15:24:14 2009 +0000
@@ -1,3 +1,14 @@ 2008-12-28 Aidan Kehoe <kehoea@parhasa
+2009-01-03 Aidan Kehoe <kehoea(a)parhasard.net>
+
+ * automated/ccl-tests.el (ccl-test-setup):
+ Use sane CCL programs for decoding and encoding with the test CCL
+ coding system by default. Correct a spelling in the docstring, add
+ a safe-chars property so that we don't confuse
+ query-coding-tests.el.
+ (ccl-test-suites):
+ Explicitly re-initialise the CCL programs for the test coding
+ system once finished.
+
2008-12-28 Aidan Kehoe <kehoea(a)parhasard.net>
* automated/query-coding-tests.el:
diff -r ebc01476e352f6765d1f269a30b2f7ed7095db72 -r baf6c66f6f474dd9edfa216794aa9c300ff128c6 tests/automated/ccl-tests.el
--- a/tests/automated/ccl-tests.el Tue Dec 30 20:33:30 2008 +0000
+++ b/tests/automated/ccl-tests.el Sat Jan 03 15:24:14 2009 +0000
@@ -117,21 +117,22 @@
(defun ccl-test-setup ()
(define-ccl-program
ccl-test-decoder
- '(1 (read r0)
- (loop
- (write-read-repeat r0))))
+ '(1 (loop
+ (read r0)
+ (write-repeat r0))))
(define-ccl-program
ccl-test-encoder
- '(1 (read r0)
- (loop
- (write-read-repeat r0))))
+ '(1 (loop
+ (read r0)
+ (write-repeat r0))))
(or (find-coding-system 'ccl-test-coding-system)
(make-coding-system
'ccl-test-coding-system
'ccl
- "CCL TEST temprary coding-system."
+ "CCL TEST temporary coding-system."
'(mnemonic "CCL-TEST"
eol-type lf
+ safe-chars t
decode ccl-test-decoder
encode ccl-test-encoder))))
@@ -601,7 +602,9 @@
(ccl-test-simple-read-and-write)
(ccl-test-read-write-multibyte-character)
(ccl-test-ccl-call)
- (ccl-test-map-instructions))
+ (ccl-test-map-instructions)
+ ;; Re-initialise the coding system:
+ (ccl-test-setup))
;;; start tests only when ccl-execute is enabled.
(if (fboundp 'ccl-execute)
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches
[R pkgs] Monkey-patch `make-autoload' to 21.5.29 in package build
15 years, 9 months
Stephen J. Turnbull
RECOMMEND packages
This is the recently discussed monkey-patch to fix the build breakage
in the packages with 21.4. I'm running pristine builds now with
XEmacs 21.4.21, 21.5.28, and current Mercurial, but I don't expect any
problems because I've done a fair amount of testing in "clean" trees
already, so I'm submitting in advance of the full tests.
This patch DOES NOT REPLACE porting Mike's changes to XEmacs 21.4 (in
progress). It is intended as a convenience for users who, for
whatever reason, are in no hurry to upgrade their XEmacsen.
How it works:
It checks for an XEmacs which is >= 21.5.29 (the next beta) or < 21.5
and >= 21.4.22 (the release Vin is working on now). If so, it does
nothing.
Otherwise, it assumes an unpatched older XEmacs, and (1) requires
'autoload-operators from xemacs-base, then (2) requires 'autoload from
the core. (This prevents a later require of 'autoload from
overwriting our monkey-patch. If they do an explicit load, there's
nothing we can do about it, of course, but presumably they know what
they're doing.)
Next (3) we check that the autoload-operators are loaded, and if not
monkey-patch that variable in. (4) We undefun `make-autoload', and
then redefine it with this version (current today, presumably won't
change before 21.5.29).
Finally, we add the eieio deffoos to autoload-make-autoload-operators
(if they're not already present). This is also conditional on XEmacs
version. I considered moving it outside of the check, but decided
that if we have an XEmacs that passes the "recent-enough" check but
the packages don't have a recent-enough xemacs-base, we ask the
reporter to upgrade xemacs-base.
Per Mike's recommendation, there's a warning that the monkey-patch is
deprecated and users should upgrade. I plan to disable the
monkey-patch on or soon after 1 January 2010.
Note that package-future.el itself is provided as an attachment at the
end of this message, and should be placed in the top of the package
hierarchy (ie, next to XEmacs.rules).
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches
commit: Fix build broken by descr-text.el defcustom.
15 years, 9 months
Stephen Turnbull
changeset: 4572:16c9098dd3d2459c112fd2f8080f6b57c7099d10
tag: tip
user: Stephen J. Turnbull <stephen(a)xemacs.org>
date: Thu Jan 01 16:37:48 2009 +0900
files: lisp/ChangeLog lisp/descr-text.el
description:
Fix build broken by descr-text.el defcustom.
diff -r ebc01476e352f6765d1f269a30b2f7ed7095db72 -r 16c9098dd3d2459c112fd2f8080f6b57c7099d10 lisp/ChangeLog
--- a/lisp/ChangeLog Tue Dec 30 20:33:30 2008 +0000
+++ b/lisp/ChangeLog Thu Jan 01 16:37:48 2009 +0900
@@ -1,3 +1,8 @@ 2008-12-30 Aidan Kehoe <kehoea@parhasa
+2009-01-01 Stephen J. Turnbull <stephen(a)xemacs.org>
+
+ * descr-text.el (describe-char-unicodedata-file):
+ Nuke build-breaking computation from defcustom initializer.
+
2008-12-30 Aidan Kehoe <kehoea(a)parhasard.net>
* make-docfile.el:
diff -r ebc01476e352f6765d1f269a30b2f7ed7095db72 -r 16c9098dd3d2459c112fd2f8080f6b57c7099d10 lisp/descr-text.el
--- a/lisp/descr-text.el Tue Dec 30 20:33:30 2008 +0000
+++ b/lisp/descr-text.el Thu Jan 01 16:37:48 2009 +0900
@@ -207,40 +207,18 @@ otherwise."
(insert "There are text properties here:\n")
(describe-property-list properties)))))
-(defcustom describe-char-unicodedata-file
- ;; XEmacs change; initialise this by default, using Perl.
- (let ((have-perl
- (member-if
- #'(lambda (path)
- (file-exists-p (format "%s%cperl" path directory-sep-char)))
- exec-path))
- installprivlib res)
- (when have-perl
- (setq installprivlib
- (with-string-as-buffer-contents ""
- (shell-command "perl -V:installprivlib" t)
- ;; 1+ because buffer offsets start at one.
- (delete-region 1 (1+ (length "installprivlib='")))
- ;; Delete the final newline, semicolon and quotation mark.
- (delete-region (- (point-max) 3) (point-max))))
- (cond
- ((file-exists-p
- (setq res
- (format "%s%cunicore%cUnicodeData.txt"
- installprivlib directory-sep-char directory-sep-char))))
- ((file-exists-p
- (setq res
- (format "%s%cunicode%cUnicodeData.txt"
- installprivlib directory-sep-char directory-sep-char)))))
- res))
+;; XEmacs change
+(defcustom describe-char-unicodedata-file nil
"Location of Unicode data file.
This is the UnicodeData.txt file from the Unicode Consortium, used for
diagnostics. If it is non-nil `describe-char' will print data
looked up from it. This facility is mostly of use to people doing
multilingual development.
-This is a fairly large file, typically installed with Perl.
-At the time of writing it is at the URL
+This is a fairly large file, installed on many systems by Perl, in the
+`unicore' subdirectory of the Perl library tree \(\"perl -V:installprivlib\"
+will tell you where that is.) You can also get the current version from the
+Unicode Consortium at the URL
`http://www.unicode.org/Public/UNIDATA/UnicodeData.txt'.
It is possible to build a DBM or Berkeley index cache for this file, so that
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches
[AC web] Re: xemacs.org/People
15 years, 9 months
Stephen J. Turnbull
APPROVE COMMIT web
Raymond Wiker writes:
> Hmmm... That reminds me :-)
>
> I'm still listed on http://www.xemacs.org/People with an email
> address that has not been valid for over 8 years.
Thanks. Fixed.
Index: People/ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacsweb/People/ChangeLog,v
retrieving revision 1.10
diff -u -U0 -r1.10 ChangeLog
--- People/ChangeLog 31 Dec 2008 03:54:21 -0000 1.10
+++ People/ChangeLog 1 Jan 2009 06:10:40 -0000
@@ -0,0 +1,4 @@
+2009-01-01 Stephen J. Turnbull <stephen(a)xemacs.org>
+
+ * index.content: Remove obsolete address for Raymond Wiker.
+
Index: People/index.content
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacsweb/People/index.content,v
retrieving revision 1.3
diff -u -r1.3 index.content
--- People/index.content 29 Nov 2005 08:01:38 -0000 1.3
+++ People/index.content 1 Jan 2009 06:10:44 -0000
@@ -339,7 +339,7 @@
<li><a href="mailto:johnson@uhics.ics.Hawaii.Edu">Philip Johnson</a></li>
<li><a href="mailto:charton@lmd.ens.fr">Philippe Charton</a></li>
<li><a href="mailto:toy@rtp.ericsson.se">Raymond L. Toy</a></li>
- <li><a href="mailto:raymond@orion.no">Raymond Wiker</a></li>
+ <li>Raymond Wiker</li>
<li><a href="mailto:rebecca.ore@op.net">Rebecca Ore</a></li>
<li><a href="mailto:remek@npac.syr.edu">Remek Trzaska</a></li>
<li><a href="mailto:ricky@ornet.co.il">Ricardo Marek</a></li>
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches