comparison src/minibuf.c @ 83380:94f174e5569d

Merged from [e-mail]--gnu-2005 (patch 543) Patches applied: * [e-mail]--gnu-2005/emacs--cvs-trunk--0--patch-543 Update from CVS git-archimport-id: [e-mail]--2004/emacs--multi-tty--0--patch-420

83379:23f939241b7d

Return nil if there is no valid completion, else t.  */)
     ()
{
  Lisp_Object completion, tem, tem1;
  register int i, i_byte;
  register const unsigned char *completion_string;
  struct gcpro gcpro1, gcpro2;
  int prompt_end_charpos = XINT (Fminibuffer_prompt_end ());

  /* We keep calling Fbuffer_string rather than arrange for GC to
     hold onto a pointer to one of the strings thus made.  */

  /* Now find first word-break in the stuff found by completion.
     i gets index in string of where to stop completing.  */
  {
    int len, c;
    int bytes = SBYTES (completion);
    completion_string = SDATA (completion);
    for (; i_byte < SBYTES (completion); i_byte += len, i++)
      {
	c = STRING_CHAR_AND_LENGTH (completion_string + i_byte,
				    bytes - i_byte,
				    len);

83380:94f174e5569d

Return nil if there is no valid completion, else t.  */)
     ()
{
  Lisp_Object completion, tem, tem1;
  register int i, i_byte;
  struct gcpro gcpro1, gcpro2;
  int prompt_end_charpos = XINT (Fminibuffer_prompt_end ());

  /* We keep calling Fbuffer_string rather than arrange for GC to
     hold onto a pointer to one of the strings thus made.  */

  /* Now find first word-break in the stuff found by completion.
     i gets index in string of where to stop completing.  */
  {
    int len, c;
    int bytes = SBYTES (completion);
    register const unsigned char *completion_string = SDATA (completion);
    for (; i_byte < SBYTES (completion); i_byte += len, i++)
      {
	c = STRING_CHAR_AND_LENGTH (completion_string + i_byte,
				    bytes - i_byte,
				    len);