Mercurial > hg > xemacs-beta

comparison lisp/subr.el @ 5089:99f8ebc082d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Make #'substring an alias of #'subseq; give the latter the byte code. src/ChangeLog addition: 2010-03-03 Aidan Kehoe <kehoea@parhasard.net> * fns.c (Fsubstring): Removed. * search.c (Freplace_match): * minibuf.c (Ftry_completion): * lisp.h: * keymap.c (ensure_meta_prefix_char_keymapp): * dired.c (user_name_completion, file_name_completion): * console-x.c (x_canonicalize_console_connection): * bytecode.c (Bsubseq): * bytecode-ops.h (subseq): Move #'substring to Lisp, as an alias for #'subseq; change all C Fsubstring() calls to Fsubseq(), change the Bsubstring bytecode to Bsubseq. Motivation; not accepting vectors in #'substring is incompatible with GNU, and Common Lisp prefers #'subseq, it has no #'substring. lisp/ChangeLog addition: 2010-03-03 Aidan Kehoe <kehoea@parhasard.net> Move byte code #o117 to #'subseq, not #'substring. Make #'substring available as an alias for #'subseq in Lisp. * bytecomp.el (79, subseq, substring): * bytecomp.el (byte-compile-subseq): New. * update-elc.el (update-elc-chop-extension): Use #'subseq, not #'substring, the latter is not yet available. * subr.el (substring): New alias, to #'subseq. man/ChangeLog addition: 2010-03-03 Aidan Kehoe <kehoea@parhasard.net> * lispref/tips.texi (Comment Tips): * lispref/text.texi (Text Properties): * lispref/strings.texi (Creating Strings): * lispref/processes.texi (Input to Processes): * lispref/functions.texi (Argument List): * lispref/extents.texi (Duplicable Extents): Move examples that used substring to using subseq; in strings.texi, do not change the examples, but document that in this XEmacs, it is an alias for subseq, and that there may be some incompatibilities if you depend on that.
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 03 Mar 2010 18:40:12 +0000
parents 788c38f20376
children 2e528066e2fc
comparison
equal deleted inserted replaced
5088:207dad9e74f7 5089:99f8ebc082d9
218 (define-function 'remove-directory 'delete-directory) 218 (define-function 'remove-directory 'delete-directory)
219 (define-function 'set-match-data 'store-match-data) 219 (define-function 'set-match-data 'store-match-data)
220 (define-function 'send-string-to-terminal 'external-debugging-output) 220 (define-function 'send-string-to-terminal 'external-debugging-output)
221 (define-function 'special-form-p 'special-operator-p) 221 (define-function 'special-form-p 'special-operator-p)
222 222
223 ;; XEmacs; this is in Lisp, its bytecode now taken by subseq.
224 (define-function 'substring 'subseq)
225
223 ;; XEmacs: 226 ;; XEmacs:
224 (defun local-variable-if-set-p (sym buffer) 227 (defun local-variable-if-set-p (sym buffer)
225 "Return t if SYM would be local to BUFFER after it is set. 228 "Return t if SYM would be local to BUFFER after it is set.
226 A nil value for BUFFER is *not* the same as (current-buffer), but 229 A nil value for BUFFER is *not* the same as (current-buffer), but
227 can be used to determine whether `make-variable-buffer-local' has been 230 can be used to determine whether `make-variable-buffer-local' has been