1 files changed, 6 insertions, 2 deletions

diff --git a/llm-tools-hl.el b/llm-tools-hl.el
index 1ec13ef..3072ffc 100644
--- a/llm-tools-hl.el
+++ b/llm-tools-hl.el
@@ -90,7 +90,8 @@ If INCLUDE-CONTENT is non-nil, append `|LINE' after each hash."
   (llm-tools--hl-format-lines (llm-tools--hl-file-lines file beg end) beg t))
 
 (defun llm-tools--hl-file-read-hashes (file)
-  "TODO rewrite docstring to be less redundant. Return FILE contents in hashline format without content as a list of hashline-formatted hashes."
+  "Return FILE contents as a list of hashline strings without line content.
+Each element is a line number and two-character hash, like `1vx'."
   (string-lines (llm-tools--hl-format-lines (llm-tools--hl-file-lines file))))
 
 (defun llm-tools--hl-file-line-hash (file n)
@@ -149,7 +150,10 @@ the operations in that file's sections.  Each anchor is a string like
              sections))))
 
 (defun llm-tools--hl-verify (patch)
-  "TODO rewrite docstring to be lses verbose? Verifies the anchors exist in PATCH."
+  "Verify that all anchors in PATCH match the current file contents.
+Returns a list of booleans, one per file, indicating whether every
+anchor in that file's patch sections still matches the corresponding
+line in the on-disk file."
   (let ((patch-anchors (llm-tools--hl-get-anchors patch)))
     (mapcar (lambda (section)
               (let* ((file (car section))