emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: make-indirect-buffer


From: Luc Teirlinck
Subject: Re: make-indirect-buffer
Date: Mon, 12 Apr 2004 16:27:57 -0500 (CDT)

Stefan Monnier wrote:

        /* We assume that (get-buffer foo)==nil implies STRINGP (foo).
           Is that true?  --Stef  */

Yes:

DEFUN ("get-buffer", Fget_buffer, Sget_buffer, 1, 1, 0,
       doc: /* Return the buffer named NAME (a string).
If there is no live buffer named NAME, return nil.
NAME may also be a buffer; if so, the value is that buffer.  */)
     (name)
     register Lisp_Object name;
{
  if (BUFFERP (name))
    return name;
  CHECK_STRING (name);

  return Fcdr (assoc_ignore_text_properties (name, Vbuffer_alist));
}

nil is not a buffer.  So the first "return" can not yield nil.

Then comes: CHECK_STRING (name);

Sincerely,

Luc.
 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]