comparison src/insdel.c @ 91010:aaccdab0ee26

Merge from emacs--devo--0 Patches applied: * emacs--devo--0 (patch 852-856) - Update from CVS - Merge from emacs--rel--22 * emacs--rel--22 (patch 93-96) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 245) - Update from CVS Revision: [e-mail]/emacs--unicode--0--patch-249

91009:e7395a700642

#define FETCH_END				\
  (! NILP (end_marker) ? Fmarker_position (end_marker) : end)

/* Set a variable to nil if an error occurred.
   VAL is a cons-cell whose car is the variable name, and whose cdr is
   either nil (to mean that there was indeed an error), or non-nil to mean
   that the was no error (which thus causes this function to do
   nothing).  */
Lisp_Object
reset_var_on_error (val)
     Lisp_Object val;
{
  if (NILP (XCDR (val)))

91010:aaccdab0ee26

#define FETCH_END				\
  (! NILP (end_marker) ? Fmarker_position (end_marker) : end)

/* Set a variable to nil if an error occurred.
   Don't change the variable if there was no error.
   VAL is a cons-cell (VARIABLE . NO-ERROR-FLAG).
   VARIABLE is the variable to maybe set to nil.
   NO-ERROR-FLAG is nil if there was an error,
   anything else meaning no error (so this function does nothing).  */
Lisp_Object
reset_var_on_error (val)
     Lisp_Object val;
{
  if (NILP (XCDR (val)))