mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-02 02:10:46 -08:00
Code Issues Projects Releases Wiki Activity

Fix non-MPS build

Browse source
This commit is contained in:
Gerd Möllmann 2024-06-11 15:39:19 +02:00
parent be169bdf30
commit 32a17abcbb
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/buffer.c
View file

@ -2083,6 +2083,7 @@ cleaning up all windows currently displaying the buffer to be killed. */)
}
#else
struct Lisp_Marker **mp = &BUF_MARKERS (b);
struct Lisp_Marker *m;
while ((m = *mp))
{
if (m->buffer == b)
@ -2110,7 +2111,7 @@ cleaning up all windows currently displaying the buffer to be killed. */)
#ifdef HAVE_MPS
igc_remove_all_markers (b);
#else
for (m = BUF_MARKERS (b); m; )
for (struct Lisp_Marker *m = BUF_MARKERS (b); m; )
{
struct Lisp_Marker *next = m->next;
m->buffer = 0;

8
src/buffer.h
View file

@ -769,25 +769,25 @@ marker_it_marker (struct marker_it *it)
INLINE struct marker_it
marker_it_init (struct buffer *b)
{
return (struct marker_it) { .markers = BUF_MARKERS (b) };
return (struct marker_it) { .marker = BUF_MARKERS (b) };
}
INLINE bool
marker_it_valid (struct marker_it *it)
{
return it->markers != NULL;
return it->marker != NULL;
}
INLINE void
marker_it_next (struct marker_it *it)
{
return it->markers = it->markers->next;
it->marker = it->marker->next;
}
INLINE struct Lisp_Marker *
marker_it_marker (struct marker_it *it)
{
return it->markers;
return it->marker;
}
# endif