[Emacs-diffs] Changes to emacs/src/marker.c

[Miles Bader]

Index: emacs/src/marker.c
diff -c emacs/src/marker.c:1.38 emacs/src/marker.c:1.39
*** emacs/src/marker.c:1.38     Wed Apr 17 09:49:49 2002
--- emacs/src/marker.c  Tue Feb  4 09:03:13 2003
***************
*** 531,544 ****
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
!   
    return marker;
  }
  
  /* This version of Fset_marker won't let the position
     be outside the visible part.  */
  
! Lisp_Object 
  set_marker_restricted (marker, pos, buffer)
       Lisp_Object marker, pos, buffer;
  {
--- 531,544 ----
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
! 
    return marker;
  }
  
  /* This version of Fset_marker won't let the position
     be outside the visible part.  */
  
! Lisp_Object
  set_marker_restricted (marker, pos, buffer)
       Lisp_Object marker, pos, buffer;
  {
***************
*** 607,620 ****
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
!   
    return marker;
  }
  
  /* Set the position of MARKER, specifying both the
     character position and the corresponding byte position.  */
  
! Lisp_Object 
  set_marker_both (marker, buffer, charpos, bytepos)
       Lisp_Object marker, buffer;
       int charpos, bytepos;
--- 607,620 ----
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
! 
    return marker;
  }
  
  /* Set the position of MARKER, specifying both the
     character position and the corresponding byte position.  */
  
! Lisp_Object
  set_marker_both (marker, buffer, charpos, bytepos)
       Lisp_Object marker, buffer;
       int charpos, bytepos;
***************
*** 658,671 ****
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
!   
    return marker;
  }
  
  /* This version of set_marker_both won't let the position
     be outside the visible part.  */
  
! Lisp_Object 
  set_marker_restricted_both (marker, buffer, charpos, bytepos)
       Lisp_Object marker, buffer;
       int charpos, bytepos;
--- 658,671 ----
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
! 
    return marker;
  }
  
  /* This version of set_marker_both won't let the position
     be outside the visible part.  */
  
! Lisp_Object
  set_marker_restricted_both (marker, buffer, charpos, bytepos)
       Lisp_Object marker, buffer;
       int charpos, bytepos;
***************
*** 718,724 ****
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
!   
    return marker;
  }
  
--- 718,724 ----
        m->chain = BUF_MARKERS (b);
        BUF_MARKERS (b) = marker;
      }
! 
    return marker;
  }