[nongnu] elpa/treesit-fold bbfd8658b0 091/417: Clean up

[ELPA Syncer]

branch: elpa/treesit-fold
commit bbfd8658b04f9fe574f0e6b4f3440ffca19ca29f
Author: Jen-Chieh Shen <jcs090218@gmail.com>
Commit: Jen-Chieh Shen <jcs090218@gmail.com>

    Clean up
---
 tree-sitter-fold-util.el | 8 ++++++++
 tree-sitter-fold.el      | 4 +++-
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/tree-sitter-fold-util.el b/tree-sitter-fold-util.el
index d0d2cae682..33c60ca898 100644
--- a/tree-sitter-fold-util.el
+++ b/tree-sitter-fold-util.el
@@ -35,6 +35,14 @@
   `(when (buffer-live-p ,buffer-or-name)
      (with-current-buffer ,buffer-or-name (progn ,@body))))
 
+;;
+;; (@* "Cons" )
+;;
+
+(defun tree-sitter-fold-util--cons-add (c1 c2)
+  "Addition for two cons C1 and C2."
+  (cons (+ (car c1) (car c2)) (+ (cdr c1) (cdr c2))))
+
 ;;
 ;; (@* "Overlay" )
 ;;
diff --git a/tree-sitter-fold.el b/tree-sitter-fold.el
index ddd5bffd1f..0f4985b706 100644
--- a/tree-sitter-fold.el
+++ b/tree-sitter-fold.el
@@ -43,6 +43,7 @@
 
 (require 'tree-sitter)
 
+(require 'tree-sitter-fold-util)
 (require 'tree-sitter-fold-parsers)
 (require 'tree-sitter-fold-summary)
 
@@ -335,7 +336,8 @@ If the current syntax node is not foldable, do nothing."
 (defun tree-sitter-fold-range-csharp-comment (node offset)
   "Define fold range for C# comment."
   (if (tree-sitter-fold-multi-line node)
-      (tree-sitter-fold-range-seq node (cons 1 -1))
+      (tree-sitter-fold-range-seq node (tree-sitter-fold-util--cons-add '(1 . 
-1) offset))
+    ;; TODO: ..
     nil))
 
 (defun tree-sitter-fold-range-nix-function (node offset)