Mercurial > emacs

comparison src/buffer.c @ 37950:f01f454ea6bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(copy_overlays): Make ENABLE_CHECKING happy.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 31 May 2001 01:44:32 +0000
parents 1085e1cfebaf
children ac415468cd09
comparison
equal deleted inserted replaced
37949:1302dd937a79 37950:f01f454ea6bf
434 int charpos; 434 int charpos;
435 435
436 old_overlay = XCAR (list); 436 old_overlay = XCAR (list);
437 charpos = marker_position (OVERLAY_START (old_overlay)); 437 charpos = marker_position (OVERLAY_START (old_overlay));
438 start = Fmake_marker (); 438 start = Fmake_marker ();
439 Fset_marker (start, charpos, buffer); 439 Fset_marker (start, make_number (charpos), buffer);
440 XMARKER (start)->insertion_type 440 XMARKER (start)->insertion_type
441 = XMARKER (OVERLAY_START (old_overlay))->insertion_type; 441 = XMARKER (OVERLAY_START (old_overlay))->insertion_type;
442 442
443 charpos = marker_position (OVERLAY_END (old_overlay)); 443 charpos = marker_position (OVERLAY_END (old_overlay));
444 end = Fmake_marker (); 444 end = Fmake_marker ();
445 Fset_marker (end, charpos, buffer); 445 Fset_marker (end, make_number (charpos), buffer);
446 XMARKER (end)->insertion_type 446 XMARKER (end)->insertion_type
447 = XMARKER (OVERLAY_END (old_overlay))->insertion_type; 447 = XMARKER (OVERLAY_END (old_overlay))->insertion_type;
448 448
449 overlay = allocate_misc (); 449 overlay = allocate_misc ();
450 XMISCTYPE (overlay) = Lisp_Misc_Overlay; 450 XMISCTYPE (overlay) = Lisp_Misc_Overlay;