From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Thu, 11 Jan 2018 16:33:03 +0000 (-0500)
Subject: * lisp/org/org-element.el: Add comment about use of internal functions
X-Git-Tag: emacs-27.0.90~5896
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fe15532eef5e7375fd2d91b92e173e5ed12534ef;p=emacs.git

* lisp/org/org-element.el: Add comment about use of internal functions
---

diff --git a/lisp/org/org-element.el b/lisp/org/org-element.el
index 7a40d6933ca..844349c2fc0 100644
--- a/lisp/org/org-element.el
+++ b/lisp/org/org-element.el
@@ -4950,6 +4950,7 @@ A and B are either integers or lists of integers, as returned by
 (defsubst org-element--cache-root ()
   "Return root value in cache.
 This function assumes `org-element--cache' is a valid AVL tree."
+  ;; FIXME: Why use internal functions of avl-tree?
   (avl-tree--node-left (avl-tree--dummyroot org-element--cache)))
 
 
@@ -4978,6 +4979,7 @@ the cache."
 		    (aref (car org-element--cache-sync-requests) 0)))
 	(node (org-element--cache-root))
 	lower upper)
+    ;; FIXME: Why use internal functions of avl-tree?
     (while node
       (let* ((element (avl-tree--node-data node))
 	     (begin (org-element-property :begin element)))