changeset 3701:58f19b254a23

[xemacs-hg @ 2006-11-25 22:06:29 by aidan] Move the ISO-IR 196 test, which may crash, to a separate file.
author aidan
date Sat, 25 Nov 2006 22:06:34 +0000
parents b3d7b8b98acf
children 84de0511671c
files tests/ChangeLog tests/automated/iso-ir-196-test.el tests/automated/mule-tests.el
diffstat 3 files changed, 42 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/tests/ChangeLog	Sat Nov 25 12:40:16 2006 +0000
+++ b/tests/ChangeLog	Sat Nov 25 22:06:34 2006 +0000
@@ -1,3 +1,9 @@
+2006-11-25  Aidan Kehoe  <kehoea@parhasard.net>
+
+	* automated/iso-ir-196-test.el:
+	* automated/mule-tests.el (featurep):
+	Move the tested added in the previous commit to a separate file. 
+
 2006-11-23  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* automated/mule-tests.el (featurep):
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/automated/iso-ir-196-test.el	Sat Nov 25 22:06:34 2006 +0000
@@ -0,0 +1,36 @@
+;; Copyright (C) 2006 Free Software Foundation, Inc.
+
+;; Author: Aidan Kehoe <kehoea@parhasard.net>
+;; Maintainers: Aidan Kehoe <kehoea@parhasard.net>
+;; Created: 2006
+;; Keywords: tests
+
+;; This file is part of XEmacs.
+
+;; XEmacs is free software; you can redistribute it and/or modify it
+;; under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 2, or (at your option)
+;; any later version.
+
+;; XEmacs is distributed in the hope that it will be useful, but
+;; WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+;; General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with XEmacs; see the file COPYING.  If not, write to the Free
+;; Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+;; 02111-1307, USA.
+
+;;; Synched up with: Not in FSF.
+
+;;; Commentary:
+
+;; Previously, we reacted badly to invalid sequences of non-UTF-8 octets
+;; when handling UTF-8 encode in ISO 2022.
+
+(when (featurep 'mule)
+  ;; This used to crash, at least in debug builds:
+  (Assert (decode-coding-string 
+           (string ?\33 ?\45 ?\107 ?\306 ?\222 ?\215 ?\306)
+           'iso-2022-jp)))
--- a/tests/automated/mule-tests.el	Sat Nov 25 12:40:16 2006 +0000
+++ b/tests/automated/mule-tests.el	Sat Nov 25 22:06:34 2006 +0000
@@ -441,12 +441,6 @@
                (eq (aref ccl-vector 4)  
                    (encode-char (make-char 'control-1 31) 'ucs)))))
 
-  ;; This used to crash, at least in debug builds:
-
-  (Assert (decode-coding-string 
-           (string ?\33 ?\45 ?\107 ?\306 ?\222 ?\215 ?\306)
-           'iso-2022-jp))
-
   ;;---------------------------------------------------------------
   ;; Test charset-in-* functions
   ;;---------------------------------------------------------------