Release files generated by ocaml-tree-sitter 62c5980.

Author: mjambon

fyi/tree-sitter-version

@@ -1 +1 @@
-tree-sitter 0.20.6 (1cd649295c9b726450ac85c389d766ef275cac4f)
+tree-sitter 0.20.6 (7ef16ec546a213e45560c15f779d186d55cb5db5)

fyi/versions

@@ -20,7 +20,7 @@ Last change in file:
 ---
 File: semgrep-grammars/src/semgrep-bash/grammar.js
 Git repo name: ocaml-tree-sitter-semgrep
-Latest commit in repo: 35576b0e69d86858b69714091f07a6944855baba
+Latest commit in repo: 62c59803ce966ac00210b5ed8aa163a926f7eaad
 Last change in file:
   commit 26f6ce5a8e3b2d6731f14c5ccb92deafb102a8d1
   Author: Martin Jambon <martin@r2c.dev>

lib/Boilerplate.ml

@@ -1309,7 +1309,7 @@ let dump_tree root =
 
 let map_extra (env : env) (x : CST.extra) =
   match x with
-  | Comment (_loc, x) -> ("comment", "comment", map_comment env x)
+  | `Comment (_loc, x) -> ("comment", "comment", map_comment env x)
 
 let dump_extras (extras : CST.extras) =
   List.iter (fun extra ->

lib/CST.ml

@@ -671,6 +671,6 @@ type while_statement (* inlined *) = (
     Token.t (* "while" *) * terminated_statement * do_group
 )
 
-type extra = Comment of Loc.t * comment
+type extra = [ `Comment of Loc.t * comment ]
 
 type extras = extra list

lib/Parse.ml

@@ -6303,7 +6303,7 @@ let translate_extra src (node : Tree_sitter_output_t.node) : CST.extra option =
   | "comment" ->
       (match translate_tree src node trans_comment with
       | None -> None
-      | Some x -> Some (Comment (Run.get_loc node, x)))
+      | Some x -> Some (`Comment (Run.get_loc node, x)))
   | _ -> None
 
 let translate_root src root_node =