emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/treesit-fold 4c33ee9b8a 108/417: Add bash support


From: ELPA Syncer
Subject: [nongnu] elpa/treesit-fold 4c33ee9b8a 108/417: Add bash support
Date: Mon, 1 Jul 2024 10:02:16 -0400 (EDT)

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

    Add bash support
---
 README.md                   | 1 +
 tree-sitter-fold-parsers.el | 9 +++++++++
 tree-sitter-fold.el         | 4 +++-
 3 files changed, 13 insertions(+), 1 deletion(-)

diff --git a/README.md b/README.md
index 26571a95f9..7df6e526fa 100644
--- a/README.md
+++ b/README.md
@@ -43,6 +43,7 @@ then in Emacs:
 
 ## :hammer: Supported languages
 
+* Bash
 * C / C++ / C# CSS
 * Go
 * HTML
diff --git a/tree-sitter-fold-parsers.el b/tree-sitter-fold-parsers.el
index 24fa3f9258..107d2b3dd0 100644
--- a/tree-sitter-fold-parsers.el
+++ b/tree-sitter-fold-parsers.el
@@ -45,6 +45,15 @@
 ;; (@* "Parsers" )
 ;;
 
+(defun tree-sitter-fold-parsers-agda ()
+  "Rule sets for Agda."
+  '(()))
+
+(defun tree-sitter-fold-parsers-bash ()
+  "Rule sets for Bash."
+  '((compound_statement . tree-sitter-fold-range-seq)
+    (expansion          . tree-sitter-fold-range-seq)))
+
 (defun tree-sitter-fold-parsers-c ()
   "Rule sets for C."
   '((compound_statement     . tree-sitter-fold-range-seq)
diff --git a/tree-sitter-fold.el b/tree-sitter-fold.el
index 989db4b260..f826119cbf 100644
--- a/tree-sitter-fold.el
+++ b/tree-sitter-fold.el
@@ -57,7 +57,8 @@
   :prefix "tree-sitter-fold-")
 
 (defcustom tree-sitter-fold-range-alist
-  `((c-mode          . ,(tree-sitter-fold-parsers-c))
+  `((agda-mode       . ,(tree-sitter-fold-parsers-agda))
+    (c-mode          . ,(tree-sitter-fold-parsers-c))
     (c++-mode        . ,(tree-sitter-fold-parsers-c++))
     (csharp-mode     . ,(tree-sitter-fold-parsers-csharp))
     (css-mode        . ,(tree-sitter-fold-parsers-css))
@@ -78,6 +79,7 @@
     (ruby-mode       . ,(tree-sitter-fold-parsers-ruby))
     (rust-mode       . ,(tree-sitter-fold-parsers-rust))
     (rustic-mode     . ,(tree-sitter-fold-parsers-rust))
+    (sh-mode         . ,(tree-sitter-fold-parsers-bash))
     (typescript-mode . ,(tree-sitter-fold-parsers-typescript)))
   "An alist of (major-mode . (foldable-node-type . function)).
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]