feature/improved-locked-narrowing 914b7903ad: ; * src/editfns.c: Minor improvements in comments.

[Gregory Heytings]

branch: feature/improved-locked-narrowing
commit 914b7903ad1c68cff174274d585685939186bcf4
Author: Gregory Heytings <gregory@heytings.org>
Commit: Gregory Heytings <gregory@heytings.org>

    ; * src/editfns.c: Minor improvements in comments.
---
 src/editfns.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/editfns.c b/src/editfns.c
index a57ae823e5..a3a8f3edef 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)
 {