comparison src/syntax.c @ 26060:6edf64bf5e22

(Fforward_word): Supply new ESCAPE_FROM_EDGE parameter to Fconstrain_to_field. (Fforward_word): Likewise. Constrain to any field.

26059:2a7f35e0072b

/* GNU Emacs routines to deal with syntax tables; also word and list parsing.
   Copyright (C) 1985, 87, 93, 94, 95, 97, 1998 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

    {
      SET_PT (XINT (count) > 0 ? ZV : BEGV);
      return Qnil;
    }

  /* If in a mini-buffer and moving backwards, stop at the end of the
     prompt.  This prevents accidentially moving into the read-only
     prompt.  */
  if (INTEGERP (current_buffer->prompt_end_charpos)
      && (prompt_end = XINT (current_buffer->prompt_end_charpos),
	  ((PT > prompt_end && val < prompt_end)
	   || (PT < prompt_end && val > prompt_end))))
    val = prompt_end;
    
  SET_PT (val);
  return Qt;
}

Lisp_Object skip_chars ();

26060:6edf64bf5e22

/* GNU Emacs routines to deal with syntax tables; also word and list parsing.
   Copyright (C) 1985, 87, 93, 94, 95, 97, 1998, 1999 Free Software Foundation, Inc.

This file is part of GNU Emacs.

GNU Emacs is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by

    {
      SET_PT (XINT (count) > 0 ? ZV : BEGV);
      return Qnil;
    }

  /* Avoid jumping out of an input field.  */
  val = XFASTINT (Fconstrain_to_field (make_number (val), make_number (PT),
				       Qt, Qnil));

  SET_PT (val);
  return Qt;
}

Lisp_Object skip_chars ();