diff options
| author | Jim Blandy <[email protected]> | 1992-01-13 21:48:03 +0000 |
|---|---|---|
| committer | Jim Blandy <[email protected]> | 1992-01-13 21:48:03 +0000 |
| commit | d427b66a664c0e1ffc818dfa5b87b45b4857d2ae (patch) | |
| tree | a3255be5cf521ab9c44b9fdfd06a0466274be421 /src/marker.c | |
| parent | b2c9579f172da05112f29b664de6d8da98c1e813 (diff) | |
entered into RCS
Diffstat (limited to 'src/marker.c')
| -rw-r--r-- | src/marker.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/src/marker.c b/src/marker.c index d8c0a89819..6c26e72fae 100644 --- a/src/marker.c +++ b/src/marker.c @@ -36,7 +36,7 @@ Returns nil if MARKER points into a dead buffer.") { XSET (buf, Lisp_Buffer, XMARKER (marker)->buffer); /* Return marker's buffer only if it is not dead. */ - if (!NULL (XBUFFER (buf)->name)) + if (!NILP (XBUFFER (buf)->name)) return buf; } return Qnil; @@ -87,7 +87,7 @@ Returns MARKER.") CHECK_MARKER (marker, 0); /* If position is nil or a marker that points nowhere, make this marker point nowhere. */ - if (NULL (pos) + if (NILP (pos) || (XTYPE (pos) == Lisp_Marker && !XMARKER (pos)->buffer)) { unchain_marker (marker); @@ -95,7 +95,7 @@ Returns MARKER.") } CHECK_NUMBER_COERCE_MARKER (pos, 1); - if (NULL (buffer)) + if (NILP (buffer)) b = current_buffer; else { @@ -144,7 +144,7 @@ set_marker_restricted (marker, pos, buffer) CHECK_MARKER (marker, 0); /* If position is nil or a marker that points nowhere, make this marker point nowhere. */ - if (NULL (pos) || + if (NILP (pos) || (XTYPE (pos) == Lisp_Marker && !XMARKER (pos)->buffer)) { unchain_marker (marker); @@ -152,7 +152,7 @@ set_marker_restricted (marker, pos, buffer) } CHECK_NUMBER_COERCE_MARKER (pos, 1); - if (NULL (buffer)) + if (NILP (buffer)) b = current_buffer; else { @@ -215,7 +215,7 @@ unchain_marker (marker) if (XMARKER (marker) == XMARKER (tail)) { - if (NULL (prev)) + if (NILP (prev)) { b->markers = next; /* Deleting first marker from the buffer's chain. |