Generate with tree-sitter v0.25.1

Author: LhKipp

common/scanner.h

@@ -132,18 +132,6 @@ static inline bool is_bracket_end(TSLexer *lexer) {
 
 static bool scan(Scanner *scanner, TSLexer *lexer, const bool *valid_symbols) {
   if (valid_symbols[ERROR_SENTINEL]) {
-    if (scanner->indents.size > 1) {
-      array_pop(&scanner->indents);
-      lexer->result_symbol = DEDENT;
-      return true;
-    }
-
-    if (scanner->preprocessor_indents.size > 0) {
-      array_pop(&scanner->preprocessor_indents);
-      lexer->result_symbol = PREPROC_END;
-      return true;
-    }
-
     return false;
   }
 

fsharp/src/grammar.json

@@ -8671,5 +8671,6 @@
     "_type",
     "_type_defn_body",
     "_static_parameter"
-  ]
-}
+  ],
+  "reserved": {}
+}

fsharp/src/node-types.json

@@ -4405,7 +4405,8 @@
   },
   {
     "type": "line_comment",
-    "named": true
+    "named": true,
+    "extra": true
   },
   {
     "type": "match",

fsharp/src/parser.c

@@ -14,6 +14,7 @@ extern "C" {
 #include <string.h>
 
 #ifdef _MSC_VER
+#pragma warning(push)
 #pragma warning(disable : 4101)
 #elif defined(__GNUC__) || defined(__clang__)
 #pragma GCC diagnostic push
@@ -278,7 +279,7 @@ static inline void _array__splice(Array *self, size_t element_size,
 #define _compare_int(a, b) ((int)*(a) - (int)(b))
 
 #ifdef _MSC_VER
-#pragma warning(default : 4101)
+#pragma warning(pop)
 #elif defined(__GNUC__) || defined(__clang__)
 #pragma GCC diagnostic pop
 #endif