tree-sitter-lispex 0.1.0

package/LICENSE

@@ -0,0 +1,170 @@
+Apache License
+Version 2.0, January 2004
+http://www.apache.org/licenses/
+
+TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
+
+1. Definitions.
+
+"License" shall mean the terms and conditions for use, reproduction, and
+distribution as defined by Sections 1 through 9 of this document.
+
+"Licensor" shall mean the copyright owner or entity authorized by the copyright
+owner that is granting the License.
+
+"Legal Entity" shall mean the union of the acting entity and all other entities
+that control, are controlled by, or are under common control with that entity.
+For the purposes of this definition, "control" means (i) the power, direct or
+indirect, to cause the direction or management of such entity, whether by
+contract or otherwise, or (ii) ownership of fifty percent (50%) or more of the
+outstanding shares, or (iii) beneficial ownership of such entity.
+
+"You" (or "Your") shall mean an individual or Legal Entity exercising
+permissions granted by this License.
+
+"Source" form shall mean the preferred form for making modifications, including
+but not limited to software source code, documentation source, and configuration
+files.
+
+"Object" form shall mean any form resulting from mechanical transformation or
+translation of a Source form, including but not limited to compiled object code,
+generated documentation, and conversions to other media types.
+
+"Work" shall mean the work of authorship, whether in Source or Object form,
+made available under the License, as indicated by a copyright notice that is
+included in or attached to the work.
+
+"Derivative Works" shall mean any work, whether in Source or Object form, that
+is based on (or derived from) the Work and for which the editorial revisions,
+annotations, elaborations, or other modifications represent, as a whole, an
+original work of authorship. For the purposes of this License, Derivative Works
+shall not include works that remain separable from, or merely link (or bind by
+name) to the interfaces of, the Work and Derivative Works thereof.
+
+"Contribution" shall mean any work of authorship, including the original
+version of the Work and any modifications or additions to that Work or
+Derivative Works thereof, that is intentionally submitted to Licensor for
+inclusion in the Work by the copyright owner or by an individual or Legal Entity
+authorized to submit on behalf of the copyright owner. For the purposes of this
+definition, "submitted" means any form of electronic, verbal, or written
+communication sent to the Licensor or its representatives, including but not
+limited to communication on electronic mailing lists, source code control
+systems, and issue tracking systems that are managed by, or on behalf of, the
+Licensor for the purpose of discussing and improving the Work, but excluding
+communication that is conspicuously marked or otherwise designated in writing by
+the copyright owner as "Not a Contribution."
+
+"Contributor" shall mean Licensor and any individual or Legal Entity on behalf
+of whom a Contribution has been received by Licensor and subsequently
+incorporated within the Work.
+
+2. Grant of Copyright License.
+
+Subject to the terms and conditions of this License, each Contributor hereby
+grants to You a perpetual, worldwide, non-exclusive, no-charge, royalty-free,
+irrevocable copyright license to reproduce, prepare Derivative Works of,
+publicly display, publicly perform, sublicense, and distribute the Work and such
+Derivative Works in Source or Object form.
+
+3. Grant of Patent License.
+
+Subject to the terms and conditions of this License, each Contributor hereby
+grants to You a perpetual, worldwide, non-exclusive, no-charge, royalty-free,
+irrevocable (except as stated in this section) patent license to make, have
+made, use, offer to sell, sell, import, and otherwise transfer the Work, where
+such license applies only to those patent claims licensable by such Contributor
+that are necessarily infringed by their Contribution(s) alone or by combination
+of their Contribution(s) with the Work to which such Contribution(s) was
+submitted. If You institute patent litigation against any entity (including a
+cross-claim or counterclaim in a lawsuit) alleging that the Work or a
+Contribution incorporated within the Work constitutes direct or contributory
+patent infringement, then any patent licenses granted to You under this License
+for that Work shall terminate as of the date such litigation is filed.
+
+4. Redistribution.
+
+You may reproduce and distribute copies of the Work or Derivative Works thereof
+in any medium, with or without modifications, and in Source or Object form,
+provided that You meet the following conditions:
+
+(a) You must give any other recipients of the Work or Derivative Works a copy of
+this License; and
+
+(b) You must cause any modified files to carry prominent notices stating that
+You changed the files; and
+
+(c) You must retain, in the Source form of any Derivative Works that You
+distribute, all copyright, patent, trademark, and attribution notices from the
+Source form of the Work, excluding those notices that do not pertain to any part
+of the Derivative Works; and
+
+(d) If the Work includes a "NOTICE" text file as part of its distribution, then
+any Derivative Works that You distribute must include a readable copy of the
+attribution notices contained within such NOTICE file, excluding those notices
+that do not pertain to any part of the Derivative Works, in at least one of the
+following places: within a NOTICE text file distributed as part of the
+Derivative Works; within the Source form or documentation, if provided along
+with the Derivative Works; or within a display generated by the Derivative
+Works, if and wherever such third-party notices normally appear. The contents
+of the NOTICE file are for informational purposes only and do not modify the
+License. You may add Your own attribution notices within Derivative Works,
+alongside or as an addendum to the NOTICE text from the Work, provided that such
+additional attribution notices cannot be construed as modifying the License.
+
+You may add Your own copyright statement to Your modifications and may provide
+additional or different license terms and conditions for use, reproduction, or
+distribution of Your modifications, or for any such Derivative Works as a whole,
+provided Your use, reproduction, and distribution of the Work otherwise complies
+with the conditions stated in this License.
+
+5. Submission of Contributions.
+
+Unless You explicitly state otherwise, any Contribution intentionally submitted
+for inclusion in the Work by You to the Licensor shall be under the terms and
+conditions of this License, without any additional terms or conditions.
+Notwithstanding the above, nothing herein shall supersede or modify the terms of
+any separate license agreement you may have executed with Licensor regarding
+such Contributions.
+
+6. Trademarks.
+
+This License does not grant permission to use the trade names, trademarks,
+service marks, or product names of the Licensor, except as required for
+reasonable and customary use in describing the origin of the Work and
+reproducing the content of the NOTICE file.
+
+7. Disclaimer of Warranty.
+
+Unless required by applicable law or agreed to in writing, Licensor provides the
+Work (and each Contributor provides its Contributions) on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied,
+including, without limitation, any warranties or conditions of TITLE,
+NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A PARTICULAR PURPOSE. You are
+solely responsible for determining the appropriateness of using or
+redistributing the Work and assume any risks associated with Your exercise of
+permissions under this License.
+
+8. Limitation of Liability.
+
+In no event and under no legal theory, whether in tort (including negligence),
+contract, or otherwise, unless required by applicable law (such as deliberate
+and grossly negligent acts) or agreed to in writing, shall any Contributor be
+liable to You for damages, including any direct, indirect, special, incidental,
+or consequential damages of any character arising as a result of this License or
+out of the use or inability to use the Work (including but not limited to
+damages for loss of goodwill, work stoppage, computer failure or malfunction,
+or any and all other commercial damages or losses), even if such Contributor
+has been advised of the possibility of such damages.
+
+9. Accepting Warranty or Additional Liability.
+
+While redistributing the Work or Derivative Works thereof, You may choose to
+offer, and charge a fee for, acceptance of support, warranty, indemnity, or
+other liability obligations and/or rights consistent with this License.
+However, in accepting such obligations, You may act only on Your own behalf and
+on Your sole responsibility, not on behalf of any other Contributor, and only if
+You agree to indemnify, defend, and hold each Contributor harmless for any
+liability incurred by, or claims asserted against, such Contributor by reason of
+your accepting any such warranty or additional liability.
+
+END OF TERMS AND CONDITIONS

package/NOTICE

@@ -0,0 +1,4 @@
+Lispex tree-sitter grammar
+Copyright 2025-2026 Lispex contributors
+
+Licensed under the Apache License, Version 2.0. See LICENSE.

package/binding.gyp

@@ -0,0 +1,23 @@
+{
+  "targets": [
+    {
+      "target_name": "tree_sitter_lispex_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"
+      ],
+      "conditions": [
+        ["OS!='win'", {
+          "cflags_c": ["-std=c11"]
+        }, {
+          "cflags_c": ["/std:c11", "/utf-8"]
+        }]
+      ]
+    }
+  ]
+}

package/bindings/node/binding.cc

@@ -0,0 +1,21 @@
+#include <napi.h>
+
+typedef struct TSLanguage TSLanguage;
+
+extern "C" TSLanguage *tree_sitter_lispex();
+
+// "tree-sitter", "language" hashed with BLAKE2.
+const napi_type_tag LANGUAGE_TYPE_TAG = {
+    0x8AF2E5212AD58ABF, 0xD5006CAD83ABBA16
+};
+
+Napi::Object Init(Napi::Env env, Napi::Object exports) {
+  exports["name"] = Napi::String::New(env, "lispex");
+  auto language =
+      Napi::External<TSLanguage>::New(env, tree_sitter_lispex());
+  language.TypeTag(&LANGUAGE_TYPE_TAG);
+  exports["language"] = language;
+  return exports;
+}
+
+NODE_API_MODULE(tree_sitter_lispex_binding, Init)

package/bindings/node/index.d.ts

@@ -0,0 +1,7 @@
+import type { Language } from "tree-sitter";
+
+declare const binding: {
+  language: Language;
+};
+
+export = binding;

package/bindings/node/index.js

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

package/grammar.js

@@ -0,0 +1,83 @@
+module.exports = grammar({
+  name: "lispex",
+
+  word: ($) => $.symbol,
+
+  externals: ($) => [
+    $.block_comment,
+    $.character,
+    $.boolean,
+    $.byte,
+    $.integer,
+    $.rational,
+    $.real,
+    $.symbol,
+    $.forbidden_reader_extension,
+  ],
+
+  extras: ($) => [
+    /[\s\uFEFF]/,
+    $.line_comment,
+    $.header_pragma,
+    $.block_comment,
+  ],
+
+  rules: {
+    source_file: ($) =>
+      repeat(
+        choice(
+          $.datum,
+          $.forbidden_reader_extension,
+        ),
+      ),
+
+    datum: ($) =>
+      choice(
+        $.quote,
+        $.quasiquote,
+        $.unquote,
+        $.unquote_splicing,
+        $.list,
+        $.dotted_list,
+        $.vector,
+        $.bytevector,
+        $.block_comment,
+        $.boolean,
+        $.character,
+        $.string,
+        $.rational,
+        $.real,
+        $.integer,
+        $.symbol,
+      ),
+
+    quote: ($) => seq("'", field("datum", $.datum)),
+    quasiquote: ($) => seq("`", field("datum", $.datum)),
+    unquote: ($) => seq(",", field("datum", $.datum)),
+    unquote_splicing: ($) => seq(",@", field("datum", $.datum)),
+
+    list: ($) => seq("(", repeat($.datum), ")"),
+    dotted_list: ($) =>
+      seq(
+        "(",
+        field("head", repeat1($.datum)),
+        ".",
+        field("tail", $.datum),
+        ")",
+      ),
+
+    vector: ($) => seq("#(", repeat($.datum), ")"),
+    bytevector: ($) => seq("#u8(", repeat($.byte), ")"),
+
+    string: (_) =>
+      token(
+        prec(
+          4,
+          /"(?:[^"\\]|\\["\\ntr]|\\[xX][0-9A-Fa-f]+;)*"/,
+        ),
+      ),
+
+    header_pragma: (_) => token(prec(3, /;![^\r\n]*/)),
+    line_comment: (_) => token(prec(1, /;[^\r\n]*/)),
+  },
+});

package/package.json

@@ -0,0 +1,61 @@
+{
+  "name": "tree-sitter-lispex",
+  "version": "0.1.0",
+  "description": "",
+  "license": "Apache-2.0",
+  "main": "bindings/node",
+  "types": "bindings/node",
+  "files": [
+    "LICENSE",
+    "NOTICE",
+    "binding.gyp",
+    "bindings/node/**",
+    "grammar.js",
+    "queries/**",
+    "src/**",
+    "tree-sitter.json"
+  ],
+  "scripts": {
+    "install": "node-gyp-build",
+    "generate": "tree-sitter generate",
+    "test": "tree-sitter test",
+    "test:node": "node scripts/test-node-binding.mjs",
+    "test:queries": "node scripts/check-queries.mjs",
+    "parse:acceptance": "node scripts/parse-acceptance.mjs",
+    "package:audit": "node scripts/package-audit.mjs",
+    "prepack": "tree-sitter generate"
+  },
+  "dependencies": {
+    "node-addon-api": "^8.5.0",
+    "node-gyp-build": "^4.8.4"
+  },
+  "devDependencies": {
+    "tree-sitter": "0.25.0",
+    "tree-sitter-cli": "0.25.10"
+  },
+  "peerDependencies": {
+    "tree-sitter": "^0.25.0"
+  },
+  "peerDependenciesMeta": {
+    "tree-sitter": {
+      "optional": true
+    }
+  },
+  "tree-sitter": [
+    {
+      "scope": "source.lispex",
+      "file-types": [
+        "lspx"
+      ],
+      "highlights": "queries/highlights.scm",
+      "injections": "queries/injections.scm",
+      "locals": "queries/locals.scm",
+      "indents": "queries/indents.scm"
+    }
+  ],
+  "directories": {
+    "test": "test"
+  },
+  "keywords": [],
+  "type": "commonjs"
+}

package/queries/highlights.scm

@@ -0,0 +1,35 @@
+(header_pragma) @preproc
+(line_comment) @comment
+(block_comment) @comment
+(forbidden_reader_extension) @error
+
+(boolean) @boolean
+(integer) @number
+(rational) @number
+(real) @number.float
+(character) @character
+(string) @string
+(byte) @number
+
+[
+  "'"
+  "`"
+  ","
+  ",@"
+  "."
+] @operator
+
+((symbol) @keyword
+  (#match? @keyword "^(lambda|if|begin|set!|define|let|let\\*|letrec|quote|quasiquote|unquote|unquote-splicing|values|call-with-values|call/cc|dynamic-wind|cond|case|and|or|when|unless|do|guard)$"))
+
+((list
+  .
+  (datum
+    (symbol) @function.call)))
+
+((dotted_list
+  .
+  (datum
+    (symbol) @function.call)))
+
+(symbol) @variable

package/queries/indents.scm

@@ -0,0 +1,8 @@
+[
+  (list)
+  (dotted_list)
+  (vector)
+  (bytevector)
+] @indent
+
+")" @outdent

package/queries/injections.scm

@@ -0,0 +1 @@
+; Lispex has no embedded-language reader form.

package/queries/locals.scm

@@ -0,0 +1,23 @@
+(source_file) @local.scope
+
+((list
+  .
+  (datum
+    (symbol) @_define)
+  .
+  (datum
+    (symbol) @local.definition))
+  (#eq? @_define "define"))
+
+((list
+  .
+  (datum
+    (symbol) @_lambda)
+  .
+  (datum
+    (list
+      (datum
+        (symbol) @local.definition))))
+  (#eq? @_lambda "lambda"))
+
+(symbol) @local.reference