annotate lib-src/gnuattach @ 5285:99de5fd48e87
Tighten up Common Lisp compatibility, #'butlast, #'nbutlast, #'tailp, #'ldiff
lisp/ChangeLog addition:
2010-10-14 Aidan Kehoe <kehoea@parhasard.net>
* byte-optimize.el (side-effect-free-fns):
* cl-macs.el (remf, getf):
* cl-extra.el (tailp, cl-set-getf, cl-do-remf):
* cl.el (ldiff, endp):
Tighten up Common Lisp compatibility for #'ldiff, #'endp, #'tailp;
add circularity checking for the first two.
#'cl-set-getf and #'cl-do-remf were Lisp implementations of
#'plist-put and #'plist-remprop; change the names to aliases,
changes the macros that use them to using #'plist-put and
#'plist-remprop directly.
src/ChangeLog addition:
2010-10-14 Aidan Kehoe <kehoea@parhasard.net>
* fns.c (Fnbutlast, Fbutlast):
Tighten up Common Lisp compatibility for these two functions; they
need to operate on dotted lists without erroring.
tests/ChangeLog addition:
2010-10-14 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el (x):
Test #'nbutlast, #'butlast with dotted lists.
Check that #'ldiff and #'tailp don't hang on circular lists; check
that #'tailp returns t with circular lists when that is
appropriate. Test them both with dotted lists.
| author |
Aidan Kehoe <kehoea@parhasard.net> |
| date |
Thu, 14 Oct 2010 18:50:38 +0100 |
| parents |
0132846995bd |
| children |
061f4f90f874 |
| rev |
line source |
|
163
|
1 #! /bin/sh
|
|
|
2
|
|
|
3 # This file is part of XEmacs.
|
|
|
4
|
|
|
5 # Copyright (C) 1997 Free Software Foundation, Inc.
|
|
|
6
|
|
|
7 # XEmacs is free software; you can redistribute it and/or modify it
|
|
|
8 # under the terms of the GNU General Public License as published by the
|
|
|
9 # Free Software Foundation; either version 2, or (at your option) any
|
|
|
10 # later version.
|
|
|
11
|
|
|
12 # XEmacs is distributed in the hope that it will be useful, but WITHOUT
|
|
|
13 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
14 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
15 # for more details.
|
|
|
16
|
|
|
17 # You should have received a copy of the GNU General Public License
|
|
|
18 # along with XEmacs; see the file COPYING. If not, write to
|
|
|
19 # the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
20 # Boston, MA 02111-1307, USA.
|
|
|
21
|
|
|
22 echo "$0: Please use \`gnuclient -nw' instead." >&2
|
|
|
23 exit 1
|
