commit/XEmacs: kehoea: Have make_time() return a true list, not a cons, thank you Raymond Toy!

1 new commit in XEmacs: https://bitbucket.org/xemacs/xemacs/commits/51ad3b1a1b92/ Changeset: 51ad3b1a1b92 User: kehoea Date: 2017-11-02 21:38:04+00:00 Summary: Have make_time() return a true list, not a cons, thank you Raymond Toy! src/ChangeLog addition: 2017-11-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * editfns.c (make_time): Revert part of 417c790fd731, have this function return a list, never a cons. Thank you Raymond Toy! tests/ChangeLog addition: 2017-11-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; * automated/os-tests.el: We've reverted to returning a list, not a cons, in #'encode-time. Update tests to reflect this, thank you Raymond Toy. Affected #: 4 files diff -r efa8f1377817cf7f529bbd39b58857c7675c59ad -r 51ad3b1a1b9288836a9efba679cc7141495c9e35 src/ChangeLog --- a/src/ChangeLog +++ b/src/ChangeLog ＠＠ -1,3 +1,9 ＠＠ +2017-11-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * editfns.c (make_time): + Revert part of 417c790fd731, have this function return a list, + never a cons. Thank you Raymond Toy! + 2017-10-28 Aidan Kehoe <kehoea(a)parhasard.net&gt; * file-coding.c (handle_possible_error_octet): diff -r efa8f1377817cf7f529bbd39b58857c7675c59ad -r 51ad3b1a1b9288836a9efba679cc7141495c9e35 src/editfns.c --- a/src/editfns.c +++ b/src/editfns.c ＠＠ -1182,7 +1182,7 ＠＠ Lisp_Object make_time (time_t tiempo) { - return Fcons (make_fixnum (tiempo < 0 ? tiempo / 0x10000 : tiempo >> 16), + return list2 (make_fixnum (tiempo < 0 ? tiempo / 0x10000 : tiempo >> 16), make_fixnum (tiempo & 0xFFFF)); } diff -r efa8f1377817cf7f529bbd39b58857c7675c59ad -r 51ad3b1a1b9288836a9efba679cc7141495c9e35 tests/ChangeLog --- a/tests/ChangeLog +++ b/tests/ChangeLog ＠＠ -1,3 +1,10 ＠＠ +2017-11-02 Aidan Kehoe <kehoea(a)parhasard.net&gt; + + * automated/os-tests.el: + We've reverted to returning a list, not a cons, in + #'encode-time. Update tests to reflect this, thank you Raymond + Toy. + 2017-10-29 Aidan Kehoe <kehoea(a)parhasard.net&gt; * automated/lisp-tests.el: diff -r efa8f1377817cf7f529bbd39b58857c7675c59ad -r 51ad3b1a1b9288836a9efba679cc7141495c9e35 tests/automated/os-tests.el --- a/tests/automated/os-tests.el +++ b/tests/automated/os-tests.el ＠＠ -127,9 +127,9 ＠＠ (Check-Error args-out-of-range (encode-time 24 4 20 11 5 2017 -86401)) (Assert (equal (encode-time 24 4 20 11 5 2017 -86400) - '(22806 . 5448))) ;; "05/12/17 09:04:25 PM" + '(22806 5448))) ;; "05/12/17 09:04:25 PM" (Assert (equal (encode-time 24 4 20 11 5 2017 86400) - '(22803 . 29256))) ;; "05/10/17 09:04:24 PM" + '(22803 29256))) ;; "05/10/17 09:04:24 PM" (Check-Error args-out-of-range (encode-time 24 4 20 11 5 2017 86401)) ;;; end of os-tests.el Repository URL: https://bitbucket.org/xemacs/xemacs/ -- This is a commit notification from bitbucket.org. You are receiving this because you have the service enabled, addressing the recipient of this email.