Steve Youngs <youngs(a)xemacs.org> wrote:
Testing Interpreted Lisp
FAIL: Assertion failed: (equal (split-string ",foo,bar," ",") (quote
("" "foo" "bar" "")))
FAIL: Assertion failed: (equal (split-string ",foo,bar," "^,") (quote
("" "foo,bar,")))
FAIL: Assertion failed: (equal (split-string ",foo,bar," ",$") (quote
(",foo,bar" "")))
FAIL: Assertion failed: (equal (split-string ",foo,,bar," ",") (quote
("" "foo" "" "bar" "")))
FAIL: Assertion failed: (equal (split-string "foo,,bar,," ",") (quote
("foo" "" "bar" "" "")))
FAIL: Assertion failed: (equal (split-string ",foo,,bar," ",+")
(quote ("" "foo" "bar" "")))
Testing Compiled Lisp
FAIL: Assertion failed: (equal (split-string ",foo,bar," ",") (quote
("" "foo" "bar" "")))
FAIL: Assertion failed: (equal (split-string ",foo,bar," "^,") (quote
("" "foo,bar,")))
FAIL: Assertion failed: (equal (split-string ",foo,bar," ",$") (quote
(",foo,bar" "")))
FAIL: Assertion failed: (equal (split-string ",foo,,bar," ",") (quote
("" "foo" "" "bar" "")))
FAIL: Assertion failed: (equal (split-string "foo,,bar,," ",") (quote
("foo" "" "bar" "" "")))
FAIL: Assertion failed: (equal (split-string ",foo,,bar," ",+")
(quote ("" "foo" "bar" "")))
These stem from Ben's recent synch with FSF Emacs:
<
URL:http://list-archive.xemacs.org/xemacs-patches/200303/msg00004.html>.
They apparently decided to do away with including empty strings at the
beginning and end of the list if the string starts or ends with a
separator (see the docstring). We need to decide whether we want the
old behavior, in which case split-string needs to be fixed, or the new
behavior, in which case the tests need to be fixed.
--
Jerry James
http://www.ittc.ku.edu/~james/