sascha
/
difftastic
mirror of https://github.com/Wilfred/difftastic/
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Unvendor tree-sitter-erlang 

For #891.
Note that the vendored parser was simply left over: we were already
pulling the parser from crates.io. Hence not updating the changelog.
pull/896/head
Antonin Delpeuch 2025-10-07 07:32:20 +07:00 committed by Wilfred Hughes
parent dc37b874ac
commit 8bb43e5fec
35 changed files with 0 additions and 68119 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
vendored_parsers/tree-sitter-erlang-src vendored
Unescape Escape View File

@ -1 +0,0 @@
tree-sitter-erlang/src

31
vendored_parsers/tree-sitter-erlang/.github/ISSUE_TEMPLATE/bug_report.md vendored
Unescape Escape View File

@ -1,31 +0,0 @@
---
name: Bug report
about: Report unexpected parsing results
title: ''
labels: 'bug'
assignees: ''
---
The following piece of code is valid but it is parsed incorrectly:
```javascript
```
Here's a link to the TypeScript Playground showing that the snippet above is valid JavaScript or TypeScript:
<!-- Please check your code at https://www.typescriptlang.org/play
and paste the URL below. -->
<!-- Please run `tree-sitter parse YOUR_FILE` and show us the output. -->
The output of `tree-sitter parse` is the following:
```
```
<!-- If there is no `ERROR` or `MISSING` node in the output above,
explain what you were expecting: -->
<!-- Name of the broken/missing feature, link to official
documentation, and any other relevant info is appreciated: -->

13
vendored_parsers/tree-sitter-erlang/.github/ISSUE_TEMPLATE/feature_request.md vendored
Unescape Escape View File

@ -1,13 +0,0 @@
---
name: Feature request
about: Suggest an idea for this project
title: ''
labels: ''
assignees: ''
---
<!--
The tree-sitter-erlang project is an Erlang parser only.
How can we improve it?
-->

22
vendored_parsers/tree-sitter-erlang/.github/workflows/ci.yml vendored
Unescape Escape View File

@ -1,22 +0,0 @@
name: Build/test
on:
pull_request:
branches:
- "**"
push:
branches:
- "main"
jobs:
test:
runs-on: ${{ matrix.os }}
strategy:
fail-fast: true
matrix:
os: [macos-latest, ubuntu-latest, windows-latest]
steps:
- uses: actions/checkout@v2
- uses: actions/setup-node@v2
with:
node-version: 16
- run: npm ci
- run: npm test

11
vendored_parsers/tree-sitter-erlang/.gitignore vendored
Unescape Escape View File

@ -1,11 +0,0 @@
*.wasm
node_modules
build
examples
*.log
# Output of running `npm run parse -- --debug-graph foo.erl`
log.html
# Input to the parse test
foo.erl

10
vendored_parsers/tree-sitter-erlang/.prettierrc vendored
Unescape Escape View File

@ -1,10 +0,0 @@
{
"arrowParens": "avoid",
"bracketSameLine": true,
"bracketSpacing": false,
"requirePragma": true,
"singleQuote": true,
"trailingComma": "all",
"tabWidth": 4,
"indentSize": 4
}

8
vendored_parsers/tree-sitter-erlang/CHANGELOG.md vendored
Unescape Escape View File

@ -1,8 +0,0 @@
0.1.0 (June 16, 2023)
* Add support for OTP 26 constructs
* maybe
* map comprehension
0.0.1 (September 26, 2022)
* Initial Release

80
vendored_parsers/tree-sitter-erlang/CODE_OF_CONDUCT.md vendored
Unescape Escape View File

@ -1,80 +0,0 @@
# Code of Conduct
## Our Pledge
In the interest of fostering an open and welcoming environment, we as
contributors and maintainers pledge to make participation in our project and
our community a harassment-free experience for everyone, regardless of age, body
size, disability, ethnicity, sex characteristics, gender identity and expression,
level of experience, education, socio-economic status, nationality, personal
appearance, race, religion, or sexual identity and orientation.
## Our Standards
Examples of behavior that contributes to creating a positive environment
include:
* Using welcoming and inclusive language
* Being respectful of differing viewpoints and experiences
* Gracefully accepting constructive criticism
* Focusing on what is best for the community
* Showing empathy towards other community members
Examples of unacceptable behavior by participants include:
* The use of sexualized language or imagery and unwelcome sexual attention or
advances
* Trolling, insulting/derogatory comments, and personal or political attacks
* Public or private harassment
* Publishing others' private information, such as a physical or electronic
address, without explicit permission
* Other conduct which could reasonably be considered inappropriate in a
professional setting
## Our Responsibilities
Project maintainers are responsible for clarifying the standards of acceptable
behavior and are expected to take appropriate and fair corrective action in
response to any instances of unacceptable behavior.
Project maintainers have the right and responsibility to remove, edit, or
reject comments, commits, code, wiki edits, issues, and other contributions
that are not aligned to this Code of Conduct, or to ban temporarily or
permanently any contributor for other behaviors that they deem inappropriate,
threatening, offensive, or harmful.
## Scope
This Code of Conduct applies within all project spaces, and it also applies when
an individual is representing the project or its community in public spaces.
Examples of representing a project or community include using an official
project e-mail address, posting via an official social media account, or acting
as an appointed representative at an online or offline event. Representation of
a project may be further defined and clarified by project maintainers.
This Code of Conduct also applies outside the project spaces when there is a
reasonable belief that an individual's behavior may have a negative impact on
the project or its community.
## Enforcement
Instances of abusive, harassing, or otherwise unacceptable behavior may be
reported by contacting the project team at <opensource-conduct@fb.com>. All
complaints will be reviewed and investigated and will result in a response that
is deemed necessary and appropriate to the circumstances. The project team is
obligated to maintain confidentiality with regard to the reporter of an incident.
Further details of specific enforcement policies may be posted separately.
Project maintainers who do not follow or enforce the Code of Conduct in good
faith may face temporary or permanent repercussions as determined by other
members of the project's leadership.
## Attribution
This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
available at https://www.contributor-covenant.org/version/1/4/code-of-conduct.html
[homepage]: https://www.contributor-covenant.org
For answers to common questions about this code of conduct, see
https://www.contributor-covenant.org/faq

35
vendored_parsers/tree-sitter-erlang/CONTRIBUTING.md vendored
Unescape Escape View File

@ -1,35 +0,0 @@
# Contributing to tree-sitter-erlang
We want to make contributing to this project as easy and transparent as possible.
## Our Development Process
tree-sitter-erlang is currently developed in Meta's internal repositories and then exported
out to GitHub by a Meta team member; however, we invite you to submit pull
requests as described below.
## Pull Requests
We actively welcome your pull requests.
1. Fork the repo and create your branch from `main`.
2. If you've added code that should be tested, add tests.
3. Ensure the test suite passes.
4. If you haven't already, complete the Contributor License Agreement ("CLA").
## Contributor License Agreement ("CLA")
In order to accept your pull request, we need you to submit a CLA. You only need
to do this once to work on any of Facebook's open source projects.
Complete your CLA here: <https://code.facebook.com/cla>
## Issues
We use GitHub issues to track public bugs. Please ensure your description is
clear and has sufficient instructions to be able to reproduce the issue.
## License
By contributing to tree-sitter-erlang, you agree that your contributions will be
licensed under the [LICENSE](LICENSE) in the root directory of this source tree.

25
vendored_parsers/tree-sitter-erlang/Cargo.toml vendored
Unescape Escape View File

@ -1,25 +0,0 @@
[package]
categories = ["parsing", "text-editors"]
description = "erlang grammar for the tree-sitter parsing library"
edition = "2018"
keywords = ["incremental", "parsing", "erlang"]
license = "MIT"
name = "tree-sitter-erlang"
version = "0.1.0"
build = "bindings/rust/build.rs"
include = [
"bindings/rust/*",
"grammar.js",
"queries/*",
"src/*",
]
[lib]
path = "bindings/rust/lib.rs"
[dependencies]
tree-sitter = "0.20.10"
[build-dependencies]
cc = "1.0.79"

201
vendored_parsers/tree-sitter-erlang/LICENSE vendored
Unescape Escape View File

@ -1,201 +0,0 @@
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
(an example is provided in the Appendix below).
"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 that You distribute, 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
APPENDIX: How to apply the Apache License to your work.
To apply the Apache License to your work, attach the following
boilerplate notice, with the fields enclosed by brackets "[]"
replaced with your own identifying information. (Don't include
the brackets!) The text should be enclosed in the appropriate
comment syntax for the file format. We also recommend that a
file or class name and description of purpose be included on the
same "printed page" as the copyright notice for easier
identification within third-party archives.
Copyright [yyyy] [name of copyright owner]
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.

48
vendored_parsers/tree-sitter-erlang/Makefile vendored
Unescape Escape View File

@ -1,48 +0,0 @@
# TREE_SITTER=tree-sitter
TREE_SITTER=npm run
all: fmt gen test
fmt:
./node_modules/.bin/prettier --write grammar.js
.PHONY: test
test: gen
$(TREE_SITTER) test
.PHONY: test-highlight
test-highlight:
# Note: test-highlight uses a filter for non-existent corpus
# tests, so only highlights run. And does not gen.
$(TREE_SITTER) test-highlight
.PHONY: update
update: gen
$(TREE_SITTER) test -- --update
.PHONY: debug
debug: gen
$(TREE_SITTER) test -d
.PHONY: gen
gen:
$(TREE_SITTER) generate
ruby -e 'ARGV.each{|f| File.write(f, "// @"+"generated\n\n"+File.read(f))}' src/parser.c src/tree_sitter/parser.h
ruby -rjson -e 'ARGV.each{|f| File.write(f, JSON.pretty_generate(JSON.parse(File.read(f)).tap{|j| j["@"+"generated"] = true}))}' src/grammar.json
ruby -rjson -e 'ARGV.each{|f| File.write(f, JSON.pretty_generate(JSON.parse(File.read(f)).tap{|j| j << {"@"+"generated" => true}}))}' src/node-types.json
.PHONY: deps
deps:
npm install
.PHONY: web
web: wasm
$(TREE_SITTER) web-ui
.PHONY: wasm
wasm:
$(TREE_SITTER) build-wasm
.PHONY: publish
publish: all wasm
cp ./tree-sitter-erlang.wasm ./docs

34
vendored_parsers/tree-sitter-erlang/README.md vendored
Unescape Escape View File

@ -1,34 +0,0 @@
# Tree Sitter Erlang
This represents tree-sitter grammar used for the Erlang language in the
ELP project.
It started as a direct clone of
https://github.com/AbstractMachinesLab/tree-sitter-erlang at
[7b436e1ca50f0002f6765a9a2a00f6156b2cc881](https://github.com/AbstractMachinesLab/tree-sitter-erlang/commit/7b436e1ca50f0002f6765a9a2a00f6156b2cc881),
but was later heavily modified for completeness.
## Usage
Install the required toolchain with
```
make deps
```
Edit the `grammar.js` file and re-generate the code with:
```
make gen
```
Useful test command, parses `foo.erl` and opens a browser window to
show the process, with pretty pictures of the generated AST.
```
npm run parse -- --debug-graph testdata/foo.erl
```
## License
tree-sitter-erlang is [Apache licensed](./LICENSE).

18
vendored_parsers/tree-sitter-erlang/binding.gyp vendored
Unescape Escape View File

@ -1,18 +0,0 @@
{
"targets": [
{
"target_name": "tree_sitter_erlang_binding",
"include_dirs": [
"<!(node -e \"require('nan')\")",
"src"
],
"sources": [
"src/parser.c",
"bindings/node/binding.cc"
],
"cflags_c": [
"-std=c99",
]
}
]
}

30
vendored_parsers/tree-sitter-erlang/bindings/node/binding.cc vendored
Unescape Escape View File

@ -1,30 +0,0 @@
// @generated
#include "tree_sitter/parser.h"
#include <node.h>
#include "nan.h"
using namespace v8;
extern "C" TSLanguage * tree_sitter_erlang();
namespace {
NAN_METHOD(New) {}
void Init(Local<Object> exports, Local<Object> module) {
Local<FunctionTemplate> tpl = Nan::New<FunctionTemplate>(New);
tpl->SetClassName(Nan::New("Language").ToLocalChecked());
tpl->InstanceTemplate()->SetInternalFieldCount(1);
Local<Function> constructor = Nan::GetFunction(tpl).ToLocalChecked();
Local<Object> instance = constructor->NewInstance(Nan::GetCurrentContext()).ToLocalChecked();
Nan::SetInternalFieldPointer(instance, 0, tree_sitter_erlang());
Nan::Set(instance, Nan::New("name").ToLocalChecked(), Nan::New("erlang").ToLocalChecked());
Nan::Set(module, Nan::New("exports").ToLocalChecked(), instance);
}
NODE_MODULE(tree_sitter_erlang_binding, Init)
} // namespace

35
vendored_parsers/tree-sitter-erlang/bindings/node/index.js vendored
Unescape Escape View File

@ -1,35 +0,0 @@
/**
* Copyright (c) Meta Platforms, Inc. and affiliates.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
try {
module.exports = require("../../build/Release/tree_sitter_erlang_binding");
} catch (error1) {
if (error1.code !== 'MODULE_NOT_FOUND') {
throw error1;
}
try {
module.exports = require("../../build/Debug/tree_sitter_erlang_binding");
} catch (error2) {
if (error2.code !== 'MODULE_NOT_FOUND') {
throw error2;
}
throw error1
}
}
try {
module.exports.nodeTypeInfo = require("../../src/node-types.json");
} catch (_) {}

59
vendored_parsers/tree-sitter-erlang/bindings/rust/build.rs vendored
Unescape Escape View File

@ -1,59 +0,0 @@
/*
* Copyright (c) Meta Platforms, Inc. and affiliates.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
// Note: If this file does not exist, it is generated by `tree-sitter generate`.
fn main() {
let src_dir = std::path::Path::new("src");
let mut c_config = cc::Build::new();
c_config.include(&src_dir);
c_config
.flag_if_supported("-Wno-unused-const-variable")
.flag_if_supported("-Wno-unused-parameter")
.flag_if_supported("-Wno-unused-but-set-variable")
.flag_if_supported("-Wno-trigraphs");
let parser_path = src_dir.join("parser.c");
c_config.file(&parser_path);
// If your language uses an external scanner written in C,
// then include this block of code:
/*
let scanner_path = src_dir.join("scanner.c");
c_config.file(&scanner_path);
println!("cargo:rerun-if-changed={}", scanner_path.to_str().unwrap());
*/
c_config.compile("parser");
println!("cargo:rerun-if-changed={}", parser_path.to_str().unwrap());
// If your language uses an external scanner written in C++,
// then include this block of code:
/*
let mut cpp_config = cc::Build::new();
cpp_config.cpp(true);
cpp_config.include(&src_dir);
cpp_config
.flag_if_supported("-Wno-unused-parameter")
.flag_if_supported("-Wno-unused-but-set-variable");
let scanner_path = src_dir.join("scanner.cc");
cpp_config.file(&scanner_path);
cpp_config.compile("scanner");
println!("cargo:rerun-if-changed={}", scanner_path.to_str().unwrap());
*/
}

70
vendored_parsers/tree-sitter-erlang/bindings/rust/lib.rs vendored
Unescape Escape View File

@ -1,70 +0,0 @@
/*
* Copyright (c) Meta Platforms, Inc. and affiliates.
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
// Note: If this file does not exist, it is generated by `tree-sitter generate`.
//! This crate provides erlang language support for the [tree-sitter][] parsing library.
//!
//! Typically, you will use the [language][language func] function to add this language to a
//! tree-sitter [Parser][], and then use the parser to parse some code:
//!
//! ```
//! let code = "";
//! let mut parser = tree_sitter::Parser::new();
//! parser.set_language(tree_sitter_erlang::language()).expect("Error loading erlang grammar");
//! let tree = parser.parse(code, None).unwrap();
//! ```
//!
//! [Language]: https://docs.rs/tree-sitter/*/tree_sitter/struct.Language.html
//! [language func]: fn.language.html
//! [Parser]: https://docs.rs/tree-sitter/*/tree_sitter/struct.Parser.html
//! [tree-sitter]: https://tree-sitter.github.io/
use tree_sitter::Language;
extern "C" {
fn tree_sitter_erlang() -> Language;
}
/// Get the tree-sitter [Language][] for this grammar.
///
/// [Language]: https://docs.rs/tree-sitter/*/tree_sitter/struct.Language.html
pub fn language() -> Language {
unsafe { tree_sitter_erlang() }
}
/// The content of the [`node-types.json`][] file for this grammar.
///
/// [`node-types.json`]: https://tree-sitter.github.io/tree-sitter/using-parsers#static-node-types
pub const NODE_TYPES: &'static str = include_str!("../../src/node-types.json");
// Uncomment these to include any queries that this grammar contains
// pub const HIGHLIGHTS_QUERY: &'static str = include_str!("../../queries/highlights.scm");
// pub const INJECTIONS_QUERY: &'static str = include_str!("../../queries/injections.scm");
// pub const LOCALS_QUERY: &'static str = include_str!("../../queries/locals.scm");
// pub const TAGS_QUERY: &'static str = include_str!("../../queries/tags.scm");
#[cfg(test)]
mod tests {
#[test]
fn test_can_load_grammar() {
let mut parser = tree_sitter::Parser::new();
parser
.set_language(super::language())
.expect("Error loading erlang language");
}
}

1036
vendored_parsers/tree-sitter-erlang/grammar.js vendored
View File

File diff suppressed because it is too large Load Diff

46
vendored_parsers/tree-sitter-erlang/package-lock.json generated vendored
Unescape Escape View File

@ -1,46 +0,0 @@
{
"name": "tree-sitter-erlang",
"version": "0.0.0",
"lockfileVersion": 3,
"requires": true,
"packages": {
"": {
"name": "tree-sitter-erlang",
"version": "0.0.0",
"license": "Apache-2.0",
"dependencies": {
"nan": "^2.14.1",
"prettier": "^2.2.1",
"tree-sitter-cli": "^0.20.8"
}
},
"node_modules/nan": {
"version": "2.17.0",
"resolved": "https://registry.npmjs.org/nan/-/nan-2.17.0.tgz",
"integrity": "sha512-2ZTgtl0nJsO0KQCjEpxcIr5D+Yv90plTitZt9JBfQvVJDS5seMl3FOvsh3+9CoYWXf/1l5OaZzzF6nDm4cagaQ=="
},
"node_modules/prettier": {
"version": "2.8.8",
"resolved": "https://registry.npmjs.org/prettier/-/prettier-2.8.8.tgz",
"integrity": "sha512-tdN8qQGvNjw4CHbY+XXk0JgCXn9QiF21a55rBe5LJAU+kDyC4WQn4+awm2Xfk2lQMk5fKup9XgzTZtGkjBdP9Q==",
"bin": {
"prettier": "bin-prettier.js"
},
"engines": {
"node": ">=10.13.0"
},
"funding": {
"url": "https://github.com/prettier/prettier?sponsor=1"
}
},
"node_modules/tree-sitter-cli": {
"version": "0.20.8",
"resolved": "https://registry.npmjs.org/tree-sitter-cli/-/tree-sitter-cli-0.20.8.tgz",
"integrity": "sha512-XjTcS3wdTy/2cc/ptMLc/WRyOLECRYcMTrSWyhZnj1oGSOWbHLTklgsgRICU3cPfb0vy+oZCC33M43u6R1HSCA==",
"hasInstallScript": true,
"bin": {
"tree-sitter": "cli.js"
}
}
}
}

32
vendored_parsers/tree-sitter-erlang/package.json vendored
Unescape Escape View File

@ -1,32 +0,0 @@
{
"name": "tree-sitter-erlang",
"version": "0.0.0",
"description": "Tree Sitter grammar for Erlang",
"scripts": {
"test": "tree-sitter test",
"test-highlight": "tree-sitter test -f does-not-exist",
"generate": "tree-sitter generate",
"parse": "tree-sitter parse"
},
"authors": ["Leandro Ostera <leandro@ostera.io>", "Alan Zimmerman <alanzimm@fb.com>"],
"license": "Apache-2.0",
"dependencies": {
"nan": "^2.14.1",
"prettier": "^2.2.1",
"tree-sitter-cli": "^0.20.8"
},
"main": "bindings/node",
"tree-sitter": [
{
"scope": "source.erlang",
"file-types": [
"erl",
"hrl",
"app.src",
"app",
"escript",
"rebar.config"
]
}
]
}

6157
vendored_parsers/tree-sitter-erlang/src/grammar.json vendored
View File

File diff suppressed because it is too large Load Diff

3551
vendored_parsers/tree-sitter-erlang/src/node-types.json vendored
View File

File diff suppressed because it is too large Load Diff

51400
vendored_parsers/tree-sitter-erlang/src/parser.c vendored
View File

File diff suppressed because it is too large Load Diff

226
vendored_parsers/tree-sitter-erlang/src/tree_sitter/parser.h vendored
Unescape Escape View File

@ -1,226 +0,0 @@
// @generated
#ifndef TREE_SITTER_PARSER_H_
#define TREE_SITTER_PARSER_H_
#ifdef __cplusplus
extern "C" {
#endif
#include <stdbool.h>
#include <stdint.h>
#include <stdlib.h>
#define ts_builtin_sym_error ((TSSymbol)-1)
#define ts_builtin_sym_end 0
#define TREE_SITTER_SERIALIZATION_BUFFER_SIZE 1024
typedef uint16_t TSStateId;
#ifndef TREE_SITTER_API_H_
typedef uint16_t TSSymbol;
typedef uint16_t TSFieldId;
typedef struct TSLanguage TSLanguage;
#endif
typedef struct {
TSFieldId field_id;
uint8_t child_index;
bool inherited;
} TSFieldMapEntry;
typedef struct {
uint16_t index;
uint16_t length;
} TSFieldMapSlice;
typedef struct {
bool visible;
bool named;
bool supertype;
} TSSymbolMetadata;
typedef struct TSLexer TSLexer;
struct TSLexer {
int32_t lookahead;
TSSymbol result_symbol;
void (*advance)(TSLexer *, bool);
void (*mark_end)(TSLexer *);
uint32_t (*get_column)(TSLexer *);
bool (*is_at_included_range_start)(const TSLexer *);
bool (*eof)(const TSLexer *);
};
typedef enum {
TSParseActionTypeShift,
TSParseActionTypeReduce,
TSParseActionTypeAccept,
TSParseActionTypeRecover,
} TSParseActionType;
typedef union {
struct {
uint8_t type;
TSStateId state;
bool extra;
bool repetition;
} shift;
struct {
uint8_t type;
uint8_t child_count;
TSSymbol symbol;
int16_t dynamic_precedence;
uint16_t production_id;
} reduce;
uint8_t type;
} TSParseAction;
typedef struct {
uint16_t lex_state;
uint16_t external_lex_state;
} TSLexMode;
typedef union {
TSParseAction action;
struct {
uint8_t count;
bool reusable;
} entry;
} TSParseActionEntry;
struct TSLanguage {
uint32_t version;
uint32_t symbol_count;
uint32_t alias_count;
uint32_t token_count;
uint32_t external_token_count;
uint32_t state_count;
uint32_t large_state_count;
uint32_t production_id_count;
uint32_t field_count;
uint16_t max_alias_sequence_length;
const uint16_t *parse_table;
const uint16_t *small_parse_table;
const uint32_t *small_parse_table_map;
const TSParseActionEntry *parse_actions;
const char * const *symbol_names;
const char * const *field_names;
const TSFieldMapSlice *field_map_slices;
const TSFieldMapEntry *field_map_entries;
const TSSymbolMetadata *symbol_metadata;
const TSSymbol *public_symbol_map;
const uint16_t *alias_map;
const TSSymbol *alias_sequences;
const TSLexMode *lex_modes;
bool (*lex_fn)(TSLexer *, TSStateId);
bool (*keyword_lex_fn)(TSLexer *, TSStateId);
TSSymbol keyword_capture_token;
struct {
const bool *states;
const TSSymbol *symbol_map;
void *(*create)(void);
void (*destroy)(void *);
bool (*scan)(void *, TSLexer *, const bool *symbol_whitelist);
unsigned (*serialize)(void *, char *);
void (*deserialize)(void *, const char *, unsigned);
} external_scanner;
const TSStateId *primary_state_ids;
};
/*
* Lexer Macros
*/
#define START_LEXER() \
bool result = false; \
bool skip = false; \
bool eof = false; \
int32_t lookahead; \
goto start; \
next_state: \
lexer->advance(lexer, skip); \
start: \
skip = false; \
lookahead = lexer->lookahead;
#define ADVANCE(state_value) \
{ \
state = state_value; \
goto next_state; \
}
#define SKIP(state_value) \
{ \
skip = true; \
state = state_value; \
goto next_state; \
}
#define ACCEPT_TOKEN(symbol_value) \
result = true; \
lexer->result_symbol = symbol_value; \
lexer->mark_end(lexer);
#define END_STATE() return result;
/*
* Parse Table Macros
*/
#define SMALL_STATE(id) id - LARGE_STATE_COUNT
#define STATE(id) id
#define ACTIONS(id) id
#define SHIFT(state_value) \
{{ \
.shift = { \
.type = TSParseActionTypeShift, \
.state = state_value \
} \
}}
#define SHIFT_REPEAT(state_value) \
{{ \
.shift = { \
.type = TSParseActionTypeShift, \
.state = state_value, \
.repetition = true \
} \
}}
#define SHIFT_EXTRA() \
{{ \
.shift = { \
.type = TSParseActionTypeShift, \
.extra = true \
} \
}}
#define REDUCE(symbol_val, child_count_val, ...) \
{{ \
.reduce = { \
.type = TSParseActionTypeReduce, \
.symbol = symbol_val, \
.child_count = child_count_val, \
__VA_ARGS__ \
}, \
}}
#define RECOVER() \
{{ \
.type = TSParseActionTypeRecover \
}}
#define ACCEPT_INPUT() \
{{ \
.type = TSParseActionTypeAccept \
}}
#ifdef __cplusplus
}
#endif
#endif // TREE_SITTER_PARSER_H_

912
vendored_parsers/tree-sitter-erlang/test/corpus/attributes.txt vendored
Unescape Escape View File

@ -1,912 +0,0 @@
================================================================================
module attribute
================================================================================
-module(foo).
-'module'(foo).
--------------------------------------------------------------------------------
(source_file
(module_attribute
(atom))
(module_attribute
(atom)))
================================================================================
behaviour attribute
================================================================================
-behaviour(gen_server).
-behavior(gen_server).
-'behaviour'(gen_server).
-'behavior'(gen_server).
--------------------------------------------------------------------------------
(source_file
(behaviour_attribute
(atom))
(behaviour_attribute
(atom))
(behaviour_attribute
(atom))
(behaviour_attribute
(atom)))
================================================================================
deprecated attribute with arity
================================================================================
-deprecated({f,1}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(integer))))
================================================================================
deprecated attribute with arity wildcard
================================================================================
-deprecated({f,'_'}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(deprecated_wildcard))))
================================================================================
deprecated module attribute
================================================================================
-deprecated(module).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_module
(atom))))
================================================================================
deprecated '_', '_' attribute
================================================================================
-deprecated({'_','_'}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(deprecated_wildcard))))
================================================================================
deprecated function/arity/desc attribute
================================================================================
-deprecated({f,1,"Use g/1 instead"}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(integer)
(deprecation_desc
(multi_string
(string))))))
================================================================================
deprecated '_', '_', atom attribute
================================================================================
-deprecated({'_','_',eventually}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(deprecated_wildcard)
(deprecation_desc
(atom)))))
================================================================================
deprecated list attribute with func, arity and atom desc
================================================================================
-deprecated([{g,1,next_version}]).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fas
(deprecated_fa
(atom)
(integer)
(deprecation_desc
(atom))))))
================================================================================
deprecated list attribute
================================================================================
-deprecated([{foo,'_',next}, {bar,1,"desc"}, {baz, 2}, {'_', '_', "all"}]).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fas
(deprecated_fa
(atom)
(deprecated_wildcard)
(deprecation_desc
(atom)))
(deprecated_fa
(atom)
(integer)
(deprecation_desc
(multi_string
(string))))
(deprecated_fa
(atom)
(integer))
(deprecated_fa
(atom)
(deprecated_wildcard)
(deprecation_desc
(multi_string
(string)))))))
================================================================================
deprecated multi-string description
================================================================================
-deprecated({new, 1, "str1" "str2"}).
--------------------------------------------------------------------------------
(source_file
(deprecated_attribute
(deprecated_fa
(atom)
(integer)
(deprecation_desc
(multi_string
(string)
(string))))))
================================================================================
include attribute
================================================================================
-include("foo.h").
-'include'("foo.h").
--------------------------------------------------------------------------------
(source_file
(pp_include
(string))
(pp_include
(string)))
================================================================================
include attribute, concatenation
================================================================================
-include("root" "foo.h").
--------------------------------------------------------------------------------
(source_file
(pp_include
(string)
(string)))
================================================================================
include_lib attribute
================================================================================
-include_lib("foo.h").
-'include_lib'("foo.h").
--------------------------------------------------------------------------------
(source_file
(pp_include_lib
(string))
(pp_include_lib
(string)))
================================================================================
include_lib attribute, concatenation
================================================================================
-include_lib(?APP "foo.h").
--------------------------------------------------------------------------------
(source_file
(pp_include_lib
(macro_call_expr
(var))
(string)))
================================================================================
export attribute
================================================================================
-export([foo/1]).
-'export'([]).
--------------------------------------------------------------------------------
(source_file
(export_attribute
(fa
(atom)
(arity
(integer))))
(export_attribute))
================================================================================
import attribute
================================================================================
-import(bar, [foo/1, baz/3]).
-'import'(baz, []).
--------------------------------------------------------------------------------
(source_file
(import_attribute
(atom)
(fa
(atom)
(arity
(integer)))
(fa
(atom)
(arity
(integer))))
(import_attribute
(atom)))
================================================================================
export type attribute
================================================================================
-export_type([foo/0]).
-'export_type'([]).
--------------------------------------------------------------------------------
(source_file
(export_type_attribute
(fa
(atom)
(arity
(integer))))
(export_type_attribute))
================================================================================
compile attribute
================================================================================
-compile(export_all).
-'compile'([export_all, blah]).
--------------------------------------------------------------------------------
(source_file
(compile_options_attribute
(atom))
(compile_options_attribute
(list
(atom)
(atom))))
================================================================================
file attribute
================================================================================
-file("baz.erl", 45).
-'file'("baz.erl", 45).
--------------------------------------------------------------------------------
(source_file
(file_attribute
(string)
(integer))
(file_attribute
(string)
(integer)))
================================================================================
record decl
================================================================================
-record(foo, {f1, f2 = 3}).
--------------------------------------------------------------------------------
(source_file
(record_decl
(atom)
(record_field
(atom))
(record_field
(atom)
(field_expr
(integer)))))
================================================================================
record decl with types
================================================================================
-record(foo, {f1 :: atom(), f2 = 3}).
--------------------------------------------------------------------------------
(source_file
(record_decl
(atom)
(record_field
(atom)
(field_type
(call
(atom)
(expr_args))))
(record_field
(atom)
(field_expr
(integer)))))
================================================================================
record decl from manual
================================================================================
-record(name, {first = "Robert", last = "Ericsson"}).
-record(person, {name = #name{}, phone}).
--------------------------------------------------------------------------------
(source_file
(record_decl
(atom)
(record_field
(atom)
(field_expr
(string)))
(record_field
(atom)
(field_expr
(string))))
(record_decl
(atom)
(record_field
(atom)
(field_expr
(record_expr
(record_name
(atom)))))
(record_field
(atom))))
================================================================================
record decl - empty record
================================================================================
-'record'(state, {}).
--------------------------------------------------------------------------------
(source_file
(record_decl
(atom)))
================================================================================
type decl
================================================================================
-type my_struct_type() :: atom() | integer().
-opaque my_opaq_type() :: term().
-'type' orddict(Key, Val) :: [{Key, Val}].
-'opaque' useless(A) :: A.
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args))))
(opaque
(type_name
(atom)
(var_args))
(call
(atom)
(expr_args)))
(type_alias
(type_name
(atom)
(var_args
(var)
(var)))
(list
(tuple
(var)
(var))))
(opaque
(type_name
(atom)
(var_args
(var)))
(var)))
================================================================================
function spec 1
================================================================================
-spec my_function(integer()) -> integer().
--------------------------------------------------------------------------------
(source_file
(spec
(atom)
(type_sig
(expr_args
(call
(atom)
(expr_args)))
(call
(atom)
(expr_args)))))
================================================================================
function spec 2
================================================================================
-spec empty_map_02() -> map().
--------------------------------------------------------------------------------
(source_file
(spec
(atom)
(type_sig
(expr_args)
(call
(atom)
(expr_args)))))
================================================================================
function spec 3
================================================================================
-spec foo() -> #{A => B} when A :: integer(), B :: float().
--------------------------------------------------------------------------------
(source_file
(spec
(atom)
(type_sig
(expr_args)
(map_expr
(map_field
(var)
(var)))
(type_guards
(ann_type
(ann_var
(var))
(call
(atom)
(expr_args)))
(ann_type
(ann_var
(var))
(call
(atom)
(expr_args)))))))
================================================================================
wild attribute 1
================================================================================
-foo(bar).
--------------------------------------------------------------------------------
(source_file
(wild_attribute
(attr_name
(atom))
(paren_expr
(atom))))
================================================================================
wild attribute 2
================================================================================
-oncall("whatsapp_c3").
--------------------------------------------------------------------------------
(source_file
(wild_attribute
(attr_name
(atom))
(paren_expr
(string))))
================================================================================
function declaration
================================================================================
foo(Bar, Baz) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(var)
(var))
(clause_body
(atom)))))
================================================================================
undef attribute
================================================================================
-undef(FOO).
-'undef'(FOO).
--------------------------------------------------------------------------------
(source_file
(pp_undef
(var))
(pp_undef
(var)))
================================================================================
ifdef attribute
================================================================================
-ifdef(FOO).
-'ifdef'(FOO).
--------------------------------------------------------------------------------
(source_file
(pp_ifdef
(var))
(pp_ifdef
(var)))
================================================================================
ifndef attribute
================================================================================
-ifndef(FOO).
-'ifndef'(FOO).
--------------------------------------------------------------------------------
(source_file
(pp_ifndef
(var))
(pp_ifndef
(var)))
================================================================================
else attribute
================================================================================
-else.
-'else'.
--------------------------------------------------------------------------------
(source_file
(pp_else)
(pp_else))
================================================================================
endif attribute
================================================================================
-endif.
-'endif'.
--------------------------------------------------------------------------------
(source_file
(pp_endif)
(pp_endif))
================================================================================
if $.expression
================================================================================
-if 1.
-'if'(1).
--------------------------------------------------------------------------------
(source_file
(pp_if
(integer))
(pp_if
(paren_expr
(integer))))
================================================================================
elif attribute
================================================================================
-elif(TRUE).
-'elif'(TRUE).
--------------------------------------------------------------------------------
(source_file
(pp_elif
(paren_expr
(var)))
(pp_elif
(paren_expr
(var))))
================================================================================
simple spec
================================================================================
-spec foo() -> ok.
-'spec' foo() -> ok.
--------------------------------------------------------------------------------
(source_file
(spec
(atom)
(type_sig
(expr_args)
(atom)))
(spec
(atom)
(type_sig
(expr_args)
(atom))))
================================================================================
callback
================================================================================
-callback foo(Bar) -> ok.
-'callback' foo(Bar) -> ok.
--------------------------------------------------------------------------------
(source_file
(callback
(atom)
(type_sig
(expr_args
(var))
(atom)))
(callback
(atom)
(type_sig
(expr_args
(var))
(atom))))
================================================================================
string with % in it
================================================================================
foo() -> "\"%".
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(string)))))
================================================================================
string
================================================================================
foo() -> ("whatsapp_c3").
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(paren_expr
(string))))))
================================================================================
char %
================================================================================
foo() -> $%.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char space
================================================================================
foo() -> $ .
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \]
================================================================================
foo() -> $\].
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \^g
================================================================================
foo() -> $\^g.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \\
================================================================================
foo() -> $\\.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \^]
================================================================================
foo() -> $\^].
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \^Z
================================================================================
foo() -> $\^Z.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
char \%
================================================================================
foo() -> $\%.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(char)))))
================================================================================
optional_callbacks attribute
================================================================================
-optional_callbacks([foo/1, bar/2]).
--------------------------------------------------------------------------------
(source_file
(optional_callbacks_attribute
(fa
(atom)
(arity
(integer)))
(fa
(atom)
(arity
(integer)))))

44
vendored_parsers/tree-sitter-erlang/test/corpus/expected_errors.txt vendored
Unescape Escape View File

@ -1,44 +0,0 @@
================================================================================
top level error
================================================================================
-if (true).
-define(CASE_START_PEER_NODE,
case true of
Node ->
Node;
).
-else.
-define(CASE_START_PEER_NODE,
case true of
Node ->
Node;).
-endif.
--------------------------------------------------------------------------------
(ERROR
(pp_if
(paren_expr
(atom)))
(macro_lhs
(var))
(atom)
(cr_clause
(var)
(clause_body
(var)))
(ERROR)
(atom)
(ERROR)
(atom)
(var)
(atom)
(cr_clause
(var)
(clause_body
(var)))
(ERROR)
(unary_op_expr
(atom)))

776
vendored_parsers/tree-sitter-erlang/test/corpus/expr.txt vendored
Unescape Escape View File

@ -1,776 +0,0 @@
================================================================================
record index
================================================================================
f() -> #record.field.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(record_index_expr
(record_name
(atom))
(record_field_name
(atom)))))))
================================================================================
record field
================================================================================
f(X) -> X#record.field.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(var))
(clause_body
(record_field_expr
(var)
(record_name
(atom))
(record_field_name
(atom)))))))
================================================================================
record expr
================================================================================
f() -> #record{a = 1}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(record_expr
(record_name
(atom))
(record_field
(atom)
(field_expr
(integer))))))))
================================================================================
record update
================================================================================
f(X) -> X#record{a = 1}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(var))
(clause_body
(record_update_expr
(var)
(record_name
(atom))
(record_field
(atom)
(field_expr
(integer))))))))
================================================================================
try
================================================================================
f(X) ->
try 1 of
X -> ok;
Y when Z -> ok
catch
Pattern -> ok;
error:Pattern -> ok;
throw:Pattern:Stack -> ok;
exit:Complex + Pattern:Stack -> ok
after
ok
end,
try _
catch
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(var))
(clause_body
(try_expr
(integer)
(cr_clause
(var)
(clause_body
(atom)))
(cr_clause
(var)
(guard
(guard_clause
(var)))
(clause_body
(atom)))
(catch_clause
(var)
(clause_body
(atom)))
(catch_clause
(try_class
(atom))
(var)
(clause_body
(atom)))
(catch_clause
(try_class
(atom))
(var)
(try_stack
(var))
(clause_body
(atom)))
(catch_clause
(try_class
(atom))
(binary_op_expr
(var)
(var))
(try_stack
(var))
(clause_body
(atom)))
(try_after
(atom)))
(try_expr
(var))))))
================================================================================
funs
================================================================================
f() -> [
fun foo/1,
fun mod:foo/1,
fun () -> ok end
].
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(list
(internal_fun
(atom)
(arity
(integer)))
(external_fun
(module
(atom))
(atom)
(arity
(integer)))
(anonymous_fun
(fun_clause
(expr_args)
(clause_body
(atom)))))))))
================================================================================
list
================================================================================
f() ->
[],
[A],
[A, B],
[A | B],
[A + B | B + C],
[A, B | C].
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(list)
(list
(var))
(list
(var)
(var))
(list
(pipe
(var)
(var)))
(list
(pipe
(binary_op_expr
(var)
(var))
(binary_op_expr
(var)
(var))))
(list
(var)
(pipe
(var)
(var)))))))
================================================================================
binary
================================================================================
f(<<_>>) ->
<<>>,
<<1>>,
<<1/integer>>,
<<1:32/integer>>,
<<+1:32/integer>>,
<<1:32/integer-unit:8>>.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(binary
(bin_element
(var))))
(clause_body
(binary)
(binary
(bin_element
(integer)))
(binary
(bin_element
(integer)
(bit_type_list
(atom))))
(binary
(bin_element
(integer)
(bit_size_expr
(integer))
(bit_type_list
(atom))))
(binary
(bin_element
(unary_op_expr
(integer))
(bit_size_expr
(integer))
(bit_type_list
(atom))))
(binary
(bin_element
(integer)
(bit_size_expr
(integer))
(bit_type_list
(atom)
(bit_type_unit
(integer)))))))))
================================================================================
catch
================================================================================
f() ->
catch 1 + 2.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(catch_expr
(binary_op_expr
(integer)
(integer)))))))
================================================================================
receive
================================================================================
f() ->
receive
end,
receive
ok -> ok;
error -> error
end,
receive
after 1000 -> ok
end,
receive
ok -> ok
after Timeout -> timeout
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(receive_expr)
(receive_expr
(cr_clause
(atom)
(clause_body
(atom)))
(cr_clause
(atom)
(clause_body
(atom))))
(receive_expr
(receive_after
(integer)
(clause_body
(atom))))
(receive_expr
(cr_clause
(atom)
(clause_body
(atom)))
(receive_after
(var)
(clause_body
(atom))))))))
================================================================================
case
================================================================================
f() ->
case _ of
end,
case Foo of
A when A; B, C -> ok;
_ -> error
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(case_expr
(var))
(case_expr
(var)
(cr_clause
(var)
(guard
(guard_clause
(var))
(guard_clause
(var)
(var)))
(clause_body
(atom)))
(cr_clause
(var)
(clause_body
(atom))))))))
================================================================================
function call
================================================================================
f() ->
foo(),
(foo)(),
mod:foo(),
(mod:foo)(),
(Mod):(Foo)().
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(call
(atom)
(expr_args))
(call
(paren_expr
(atom))
(expr_args))
(call
(remote
(remote_module
(atom))
(atom))
(expr_args))
(call
(paren_expr
(remote
(remote_module
(atom))
(atom)))
(expr_args))
(call
(remote
(remote_module
(paren_expr
(var)))
(paren_expr
(var)))
(expr_args))))))
================================================================================
variable assignment
================================================================================
f() ->
A = 3 + B.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(match_expr
(var)
(binary_op_expr
(integer)
(var)))))))
================================================================================
fun
================================================================================
foo() -> fun(X) -> X end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(anonymous_fun
(fun_clause
(expr_args
(var))
(clause_body
(var))))))))
================================================================================
named fun
================================================================================
foo() -> fun Named(X) -> X end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(anonymous_fun
(fun_clause
(var)
(expr_args
(var))
(clause_body
(var))))))))
================================================================================
maybe
================================================================================
f() ->
maybe
{ok, A} ?= a(),
true = A >= 0,
{ok, B} ?= b(),
A + B
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(maybe_expr
(cond_match_expr
(tuple
(atom)
(var))
(call
(atom)
(expr_args)))
(match_expr
(atom)
(binary_op_expr
(var)
(integer)))
(cond_match_expr
(tuple
(atom)
(var))
(call
(atom)
(expr_args)))
(binary_op_expr
(var)
(var)))))))
================================================================================
maybe else
================================================================================
f() ->
maybe
{ok, A} ?= a(),
true = A >= 0,
A
else
Err when Err /= warn -> error;
false -> error
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(maybe_expr
(cond_match_expr
(tuple
(atom)
(var))
(call
(atom)
(expr_args)))
(match_expr
(atom)
(binary_op_expr
(var)
(integer)))
(var)
(cr_clause
(var)
(guard
(guard_clause
(binary_op_expr
(var)
(atom))))
(clause_body
(atom)))
(cr_clause
(atom)
(clause_body
(atom))))))))
================================================================================
simple map comprehension
================================================================================
f() ->
#{K => V || K := V <- #{1 => 2, 3 => 4}}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(map_comprehension
(map_field
(var)
(var))
(lc_exprs
(map_generator
(map_field
(var)
(var))
(map_expr
(map_field
(integer)
(integer))
(map_field
(integer)
(integer))))))))))
================================================================================
simple map comprehension with filter
================================================================================
f() ->
#{K => V || K := V <- #{1 => 2, 3 => 4}, K>1}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(map_comprehension
(map_field
(var)
(var))
(lc_exprs
(map_generator
(map_field
(var)
(var))
(map_expr
(map_field
(integer)
(integer))
(map_field
(integer)
(integer))))
(binary_op_expr
(var)
(integer))))))))
================================================================================
map comprehension with list generator
================================================================================
f() ->
#{K => K + 1 || K <- [1, 2, 3], K>1}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(map_comprehension
(map_field
(var)
(binary_op_expr
(var)
(integer)))
(lc_exprs
(generator
(var)
(list
(integer)
(integer)
(integer)))
(binary_op_expr
(var)
(integer))))))))
================================================================================
map comprehension with binary generator
================================================================================
f() ->
#{K => V || <<K, V>> <= <<1, 2, 3, 4>>, K>1}.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(map_comprehension
(map_field
(var)
(var))
(lc_exprs
(b_generator
(binary
(bin_element
(var))
(bin_element
(var)))
(binary
(bin_element
(integer))
(bin_element
(integer))
(bin_element
(integer))
(bin_element
(integer))))
(binary_op_expr
(var)
(integer))))))))
================================================================================
list comprehension with map generator
================================================================================
f() ->
[{K, V} || K := V <- #{1 => 2, 3 => 4}, K>1].
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(list_comprehension
(tuple
(var)
(var))
(lc_exprs
(map_generator
(map_field
(var)
(var))
(map_expr
(map_field
(integer)
(integer))
(map_field
(integer)
(integer))))
(binary_op_expr
(var)
(integer))))))))

100
vendored_parsers/tree-sitter-erlang/test/corpus/fault_tolerance.txt vendored
Unescape Escape View File

@ -1,100 +0,0 @@
================================================================================
incomplete behaviour attribute WIP
================================================================================
-behavior(gen
--------------------------------------------------------------------------------
(source_file
(ERROR
(atom)))
================================================================================
missing dot after export attribute (limitation)
================================================================================
-export([foo/1]).
-'export'([])
--------------------------------------------------------------------------------
(source_file
(export_attribute
(fa
(atom)
(arity
(integer))))
(export_attribute
(MISSING ".")))
================================================================================
missing dot after variable (limitation)
================================================================================
test(X) ->
--------------------------------------------------------------------------------
(source_file
(ERROR
(atom)
(expr_args
(var))))
================================================================================
function after missing dot (limitation)
================================================================================
foo() ->
b
bar() -> ok. % ideally would be in AST
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args)
(clause_body
(atom)))
(function_clause
(atom)
(expr_args)
(clause_body
(atom))))
(comment))
================================================================================
function reference missing dot (limitation)
================================================================================
foo() ->
fun sample2:f
--------------------------------------------------------------------------------
(source_file
(ERROR
(atom)
(expr_args)
(module
(atom))
(atom)))
================================================================================
incomplete record index (limitation)
================================================================================
foo() -> #r.
--------------------------------------------------------------------------------
(source_file
(ERROR
(atom)
(expr_args)
(record_name
(atom))))

405
vendored_parsers/tree-sitter-erlang/test/corpus/macros.txt vendored
Unescape Escape View File

@ -1,405 +0,0 @@
================================================================================
expr
================================================================================
-define(X, a).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(atom)))
================================================================================
guard and
================================================================================
-define(X, a, b, c).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(replacement_guard_and
(atom)
(atom)
(atom))))
================================================================================
guard or
================================================================================
-define(X, a; b, c).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(replacement_guard_or
(replacement_guard_and
(atom))
(replacement_guard_and
(atom)
(atom)))))
================================================================================
function clauses
================================================================================
-define(X,
foo() -> ok;
foo() -> not_ok
).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(replacement_function_clauses
(function_clause
(atom)
(expr_args)
(clause_body
(atom)))
(function_clause
(atom)
(expr_args)
(clause_body
(atom))))))
================================================================================
statement list
================================================================================
-define(IS_STRING(X), is_binary(X); is_list(X); is_atom(X)).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var)
(var_args
(var)))
(replacement_guard_or
(replacement_guard_and
(call
(atom)
(expr_args
(var))))
(replacement_guard_and
(call
(atom)
(expr_args
(var))))
(replacement_guard_and
(call
(atom)
(expr_args
(var)))))))
================================================================================
function clause
================================================================================
-define(MATCH(Type, Predicate),
match({type, _, Type, []}, Val) ->
?CHECK(Predicate(Val), ?FMT("Expected ~p, got ~p", [Type, Val]))
).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var)
(var_args
(var)
(var)))
(replacement_function_clauses
(function_clause
(atom)
(expr_args
(tuple
(atom)
(var)
(var)
(list))
(var))
(clause_body
(macro_call_expr
(var)
(macro_call_args
(macro_expr
(call
(var)
(expr_args
(var))))
(macro_expr
(macro_call_expr
(var)
(macro_call_args
(macro_expr
(string))
(macro_expr
(list
(var)
(var)))))))))))))
================================================================================
LOOP macro
================================================================================
-define(LOOP(),
[] when Suffix =:= []; length(Prefix) > 3 ->
null;
[] ->
[Digit | Rest] = Suffix,
?FUNCTION_NAME(Prefix ++ [Digit], Rest)
).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var)
(var_args))
(replacement_cr_clauses
(cr_clause
(list)
(guard
(guard_clause
(binary_op_expr
(var)
(list)))
(guard_clause
(binary_op_expr
(call
(atom)
(expr_args
(var)))
(integer))))
(clause_body
(atom)))
(cr_clause
(list)
(clause_body
(match_expr
(list
(pipe
(var)
(var)))
(var))
(macro_call_expr
(var)
(macro_call_args
(macro_expr
(binary_op_expr
(var)
(list
(var))))
(macro_expr
(var)))))))))
================================================================================
Comma separated macro
================================================================================
-define(SECURE_REQUEST(SessionID, Env, ImplFun, Args, Flag),
{current_function, {_Mod, CurFunction, _Arity}} = process_info(
self(),
current_function
),
secure_req(SessionID, Env, CurFunction, ImplFun, Args, Flag)
).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var)
(var_args
(var)
(var)
(var)
(var)
(var)))
(replacement_guard_and
(match_expr
(tuple
(atom)
(tuple
(var)
(var)
(var)))
(call
(atom)
(expr_args
(call
(atom)
(expr_args))
(atom))))
(call
(atom)
(expr_args
(var)
(var)
(var)
(var)
(var)
(var))))))
================================================================================
Empty macro
================================================================================
-define(E2E_SPEC, ).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))))
================================================================================
Calling a macro
================================================================================
lookup(Prefix, Suffix) ->
case ets:select(Prefix) of
[CCI] ->
{CCI, Suffix};
?LOOP()
end.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(var)
(var))
(clause_body
(case_expr
(call
(remote
(remote_module
(atom))
(atom))
(expr_args
(var)))
(cr_clause
(list
(var))
(clause_body
(tuple
(var)
(var))))
(macro_call_expr
(var)
(macro_call_args)))))))
================================================================================
Macro type
================================================================================
-define(TYPE, integer() | atom()).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args)))))
================================================================================
Concatables
================================================================================
-define(TXT(Str), "abc" Str ??Str).
-define(TXT(Str), Str "abc").
-define(TXT(Str), ??Str "abc").
-define(TXT(Str), "abc" "def").
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var)
(var_args
(var)))
(concatables
(string)
(var)
(macro_string
(var))))
(pp_define
(macro_lhs
(var)
(var_args
(var)))
(concatables
(var)
(string)))
(pp_define
(macro_lhs
(var)
(var_args
(var)))
(concatables
(macro_string
(var))
(string)))
(pp_define
(macro_lhs
(var)
(var_args
(var)))
(concatables
(string)
(string))))
================================================================================
Macro type in call
================================================================================
-define(X, ?MACRO(integer() | atom())).
--------------------------------------------------------------------------------
(source_file
(pp_define
(macro_lhs
(var))
(macro_call_expr
(var)
(macro_call_args
(macro_expr
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args))))))))

108
vendored_parsers/tree-sitter-erlang/test/corpus/pat_expr.txt vendored
Unescape Escape View File

@ -1,108 +0,0 @@
================================================================================
binary operator
================================================================================
f(1 + 1) -> ok;
f([] ++ []) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(binary_op_expr
(integer)
(integer)))
(clause_body
(atom)))
(function_clause
(atom)
(expr_args
(binary_op_expr
(list)
(list)))
(clause_body
(atom)))))
================================================================================
unary operator
================================================================================
f(+1) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(unary_op_expr
(integer)))
(clause_body
(atom)))))
================================================================================
match
================================================================================
f(A = B) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(match_expr
(var)
(var)))
(clause_body
(atom)))))
================================================================================
record index
================================================================================
f(#record.field) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(record_index_expr
(record_name
(atom))
(record_field_name
(atom))))
(clause_body
(atom)))))
================================================================================
record pat
================================================================================
f(#record{a = 1}) -> ok.
--------------------------------------------------------------------------------
(source_file
(fun_decl
(function_clause
(atom)
(expr_args
(record_expr
(record_name
(atom))
(record_field
(atom)
(field_expr
(integer)))))
(clause_body
(atom)))))

191
vendored_parsers/tree-sitter-erlang/test/corpus/types.txt vendored
Unescape Escape View File

@ -1,191 +0,0 @@
================================================================================
binary type
================================================================================
-type x() :: {<<>>, <<_:_*8>>, <<_:8, _:_*8>>, <<_:_*1>>, <<_:1, _:_*1>>}.
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(tuple
(binary)
(binary
(bin_element
(var)
(bit_size_expr
(binary_op_expr
(var)
(integer)))))
(binary
(bin_element
(var)
(bit_size_expr
(integer)))
(bin_element
(var)
(bit_size_expr
(binary_op_expr
(var)
(integer)))))
(binary
(bin_element
(var)
(bit_size_expr
(binary_op_expr
(var)
(integer)))))
(binary
(bin_element
(var)
(bit_size_expr
(integer)))
(bin_element
(var)
(bit_size_expr
(binary_op_expr
(var)
(integer))))))))
================================================================================
ann type
================================================================================
-type x() :: A :: B :: atom().
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(ann_type
(ann_var
(var))
(ann_type
(ann_var
(var))
(call
(atom)
(expr_args))))))
================================================================================
union type
================================================================================
-type x() :: atom() | integer() | float().
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(pipe
(call
(atom)
(expr_args))
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args))))))
================================================================================
union type in list
================================================================================
-type x() :: [atom() | integer() | float()].
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(list
(pipe
(call
(atom)
(expr_args))
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args)))))))
================================================================================
union and ann types mixed
================================================================================
-type x() :: A :: B :: atom() | C :: term() | none().
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(ann_type
(ann_var
(var))
(ann_type
(ann_var
(var))
(pipe
(call
(atom)
(expr_args))
(ann_type
(ann_var
(var))
(pipe
(call
(atom)
(expr_args))
(call
(atom)
(expr_args)))))))))
================================================================================
fun types
================================================================================
-type x() :: {fun(), fun((...) -> atom()), fun((atom()) -> atom())}.
--------------------------------------------------------------------------------
(source_file
(type_alias
(type_name
(atom)
(var_args))
(tuple
(fun_type)
(fun_type
(fun_type_sig
(expr_args
(dotdotdot))
(call
(atom)
(expr_args))))
(fun_type
(fun_type_sig
(expr_args
(call
(atom)
(expr_args)))
(call
(atom)
(expr_args)))))))

189
vendored_parsers/tree-sitter-erlang/test/highlight/attributes.erl vendored
Unescape Escape View File

@ -1,189 +0,0 @@
%% Copyright (c) Facebook, Inc. and its affiliates.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
%% You may obtain a copy of the License at
%%
%% http://www.apache.org/licenses/LICENSE-2.0
%%
%% Unless required by applicable law or agreed to in writing, software
%% distributed under the License is distributed on an "AS IS" BASIS,
%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
%% See the License for the specific language governing permissions and
%% limitations under the License.
%% ---------------------------------------------------------------------
%% Based on
%% https://github.com/the-mikedavis/tree-sitter-erlang/blob/main/test/highlight/attributes.erl
-module(attributes).
% ^ keyword
% ^ punctuation.bracket
% ^ module
% ^ punctuation.bracket
% ^ punctuation.delimiter
-module('lru').
% ^ keyword
% ^ module
-export([a_func/1,another_func/2]).
% ^ keyword
% ^ punctuation.bracket
% ^ function
% ^ operator
% ^ number
% ^ function
-export_type([a_type/1,another_type/2]).
% ^ keyword
% ^ punctuation.bracket
% ^ function
% ^ operator
% ^ number
% ^ function
-import(lists, [sort/1,map/2]).
% ^ keyword
% ^ module
% ^ function
% ^ operator
% ^ number
-type t() :: integer()
% ^ keyword
% ^ function
% ^ operator
% ^ function
| 0
% ^ operator
% ^ number
| 0..1
% ^ operator
% ^ number
% ^ number
| $a..$b
% ^ operator
% ^ constant
% ^ constant
| [non_neg_integer(), ...]
% ^ operator
% ^ punctuation.bracket
% ^ function
% ^ comment.discard
| #{mfa() => atom()}.
% ^ operator
% ^ operator
% ^ punctuation.bracket
-opaque o() :: integer().
% ^ keyword
% ^ function
% ^ operator
% ^ function
-spec ok_this(Term) -> {ok, Term} when Term :: any().
% ^ keyword
% ^ function
% ^ variable
% ^ operator
% ^ punctuation.bracket
% ^ string.special.symbol
% ^ punctuation.delimiter
% ^ variable
% ^ keyword
% ^ variable
% ^ operator
% ^ function
-spec erlang:ok() -> ok.
% ^ module
% ^ function
% ^ string.special.symbol
-ifdef(debug).
% ^ keyword
% ^ keyword.directive
-ifdef(TEST).
% ^ keyword
% ^ keyword.directive
-define(LOG(X), io:format("~80~n", [X])).
% ^ keyword
% ^ keyword.directive
% ^ variable
% ^ module
% ^ function
% ^ string
% ^ variable
-define(SUB_PASS_TIMES, compile__sub_pass_times).
% ^ keyword
% ^ constant
% ^ string.special.symbol
-elif true.
% ^ keyword
-else.
% ^ keyword
-define(LOG(X), ok).
% ^ keyword
% ^ keyword.directive
% ^ variable
% ^ string.special.symbol
-endif.
% ^ keyword
-record(person, {name,
% ^ keyword
% ^ type
% ^ property
email_address="",
% ^ property
% ^ string
ssn :: string(),
% ^ property
phone=1 :: integer()}).
% ^ property
-record(?MODULE, {name}).
% ^ constant
% ^ property
-compile({no_auto_import,[min/2]}).
% ^ keyword
% % ^ string.special.symbol
% ^ function
-include("file.hrl").
% ^ keyword
-file("myfile.erl", 3).
% ^ keyword
-callback name(Arguments) -> Result.
% ^ keyword
% ^ function
-optional_callbacks([a_callback/3]).
% ^ keyword
% ^ function
-ifndef(TEST).
% ^ keyword
% ^ keyword.directive
-behaviour(gen_server).
% ^ keyword
% ^ module
-behavior(gen_server).
% ^ keyword
% ^ module
-dialyzer({nowarn_function, [compile/1]}).
% ^ keyword
% ^ string.special.symbol
% ^ function
-record(garbage_collection, {}).
%% ^ keyword
%% ^ type

2183
vendored_parsers/tree-sitter-erlang/test/highlight/compile.erl vendored
View File

File diff suppressed because it is too large Load Diff

32
vendored_parsers/tree-sitter-erlang/test/highlight/expressions.erl vendored
Unescape Escape View File

@ -1,32 +0,0 @@
%% Copyright (c) Facebook, Inc. and its affiliates.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
%% You may obtain a copy of the License at
%%
%% http://www.apache.org/licenses/LICENSE-2.0
%%
%% Unless required by applicable law or agreed to in writing, software
%% distributed under the License is distributed on an "AS IS" BASIS,
%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
%% See the License for the specific language governing permissions and
%% limitations under the License.
%% ---------------------------------------------------------------------
foo() ->
?assertMatch({ok, _}, start()),
%% ^ keyword.directive
?_assertEqual(a, a),
%% ^ keyword.directive
State#state.config#config.pid
%% ^ variable
%% ^ operator
%% ^ type
%% ^ punctuation.delimiter
%% ^ property
%% ^ operator
%% ^ type
%% ^ property
.