summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGregory Heytings <gregory@heytings.org>2022-11-27 01:02:16 +0000
committerGregory Heytings <gregory@heytings.org>2022-11-27 02:02:47 +0100
commit914b7903ad1c68cff174274d585685939186bcf4 (patch)
treebeaaca533747331dd7422c60615b8a78929e2d5e
parentbf4373f90a8c396d1e26e13cd144ac4022424081 (diff)
downloademacs-914b7903ad1c68cff174274d585685939186bcf4.tar.gz
; * src/editfns.c: Minor improvements in comments.
-rw-r--r--src/editfns.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/editfns.c b/src/editfns.c
index a57ae823e56..a3a8f3edefd 100644
--- a/src/editfns.c
+++ b/src/editfns.c
@@ -2703,7 +2703,8 @@ narrowing_lock_get_bound (Lisp_Object buf, bool begv, bool outermost)
return XMARKER (marker);
}
-/* Retrieve the tag of the innermost narrowing in BUF. */
+/* Retrieve the tag of the innermost narrowing in BUF. Return nil if
+ BUF is not in narrowing_locks or is a killed buffer. */
static Lisp_Object
narrowing_lock_peek_tag (Lisp_Object buf)
{
@@ -2815,7 +2816,7 @@ unwind_narrow_to_region_locked (Lisp_Object tag)
Fwiden ();
}
-/* Narrow current_buffer to BEGV-ZV with a locked narrowing */
+/* Narrow current_buffer to BEGV-ZV with a narrowing locked with TAG. */
void
narrow_to_region_locked (Lisp_Object begv, Lisp_Object zv, Lisp_Object tag)
{