tree-sitter-delphi13-pure 1.0.0

package/README.md

@@ -0,0 +1,38 @@
+# tree-sitter-delphi13-pure
+
+Sub-tree-sitter that parses **pure Delphi only** — no IFDEF awareness.
+
+Designed to be fed the virtual text output of `../preprocessor/cli.js` (or any
+equivalent preprocessor). All `{$IF*}` / `{$IFDEF}` / `{$ELSE}` / `{$ENDIF}` /
+`{$I}` directives are expected to have been resolved upstream into plain
+Pascal source.
+
+## Differences vs the parent `tree-sitter-delphi13` grammar
+
+| Aspect | Parent (master) | Pure |
+|---|---|---|
+| `pp_block` external token | Yes | **Dropped** |
+| `pp_open` / `pp_else_tail` / `pp_end_only` externals | Yes | **Dropped** |
+| `pp_block` in `type` choice | Yes | **Dropped** |
+| `pp_block` in `declUses` / `declRequires` | Yes | **Dropped** |
+| `pp_block` in `declFieldNoSemi` type set | Yes | **Dropped** |
+| THEN-wins scanner logic | Yes | **Dropped** (much smaller scanner) |
+| `pp` regex (single-line `{$X}`) | In extras | In extras (kept — for harmless directives like `{$EXTERNALSYM}` that don't affect structure) |
+
+## Status
+
+Phase 2 scaffold landed (grammar.js stripped of IFDEF-related tokens and
+rules). Next steps:
+1. Strip THEN-wins scanner code from `scanner.c`.
+2. Set up `binding.gyp` / `package.json` for an independent native binding.
+3. Wire the orchestrator: `preprocessor -> pure parse -> source-map rewrite`.
+4. Run the orchestrator on the curated corpus and measure.
+
+## Why split?
+
+The parent grammar's `pp_block` machinery and the iter-37+ `declFieldNoSemi`
+conflict-cascade family fundamentally limit grammar evolution. Carving out a
+pure variant removes ~150-200 lines of pp_*-handling, eliminates 4 conflict
+declarations that were paid taxes on every state, and lets us iterate the
+core grammar without GLR-cascade risk from IFDEF tokens that the preprocessor
+has already resolved.

package/binding.gyp

@@ -0,0 +1,21 @@
+{
+  "targets": [
+    {
+      "target_name": "tree_sitter_delphi13_pure_binding",
+      "dependencies": [
+        "<!(node -p \"require('node-addon-api').targets\"):node_addon_api_except",
+      ],
+      "include_dirs": [
+        "src",
+      ],
+      "sources": [
+        "bindings/node/binding.cc",
+        "src/parser.c",
+        "src/scanner.c",
+      ],
+      "cflags_c": [
+        "-std=c11",
+      ],
+    }
+  ]
+}

package/bindings/node/binding.cc

@@ -0,0 +1,19 @@
+#include <napi.h>
+
+typedef struct TSLanguage TSLanguage;
+
+extern "C" TSLanguage *tree_sitter_delphi13_pure();
+
+const napi_type_tag LANGUAGE_TYPE_TAG = {
+  0x8AF2E5212AD58ABF, 0xD5006CAD83ABBA16
+};
+
+Napi::Object Init(Napi::Env env, Napi::Object exports) {
+    exports["name"] = Napi::String::New(env, "delphi13_pure");
+    auto language = Napi::External<TSLanguage>::New(env, tree_sitter_delphi13_pure());
+    language.TypeTag(&LANGUAGE_TYPE_TAG);
+    exports["language"] = language;
+    return exports;
+}
+
+NODE_API_MODULE(tree_sitter_delphi13_pure_binding, Init)

package/bindings/node/index.js

@@ -0,0 +1,7 @@
+const root = require("path").join(__dirname, "..", "..");
+
+module.exports = require("node-gyp-build")(root);
+
+try {
+  module.exports.nodeTypeInfo = require("../../src/node-types.json");
+} catch (_) {}