mirror of https://github.com/Wilfred/difftastic/
Compare commits
3 Commits
3943c1401a
...
0f2b1022f2
| Author | SHA1 | Date |
|---|---|---|
Antonin Delpeuch
|
0f2b1022f2 | |
Wilfred Hughes
|
0a3f8c2f92 | |
|
Wilfred Hughes
|
57bcd173a7 |
@ -1 +0,0 @@
|
|||||||
../tree-sitter-clojure/queries/highlights.scm
|
|
||||||
@ -1 +0,0 @@
|
|||||||
tree-sitter-clojure/src
|
|
||||||
@ -1,5 +0,0 @@
|
|||||||
node_modules
|
|
||||||
bin
|
|
||||||
build
|
|
||||||
*.log
|
|
||||||
|
|
||||||
@ -1,175 +0,0 @@
|
|||||||
## Changelog
|
|
||||||
|
|
||||||
Bits may be missing and/or inaccurate :)
|
|
||||||
|
|
||||||
### Future?
|
|
||||||
|
|
||||||
* Handle zero bytes?
|
|
||||||
* Decide about inline use (e.g. add some \_bare\_\* constructs? stop using?)
|
|
||||||
([#41](https://github.com/sogaiu/tree-sitter-clojure/issues/41))
|
|
||||||
|
|
||||||
### v0.0.13 - 2024-05-15
|
|
||||||
|
|
||||||
* Features and Fixes
|
|
||||||
* Increase API number from 13 to 14
|
|
||||||
([#60](https://github.com/sogaiu/tree-sitter-clojure/issues/60))
|
|
||||||
* Remove Node and Rust Bindings
|
|
||||||
([#61](https://github.com/sogaiu/tree-sitter-clojure/issues/61))
|
|
||||||
* Update version info in package.json
|
|
||||||
|
|
||||||
* Docs
|
|
||||||
* What and why doc - update bindings info
|
|
||||||
|
|
||||||
### v0.0.12 - 2023-05-07
|
|
||||||
|
|
||||||
* Features and Fixes
|
|
||||||
* Loosen sym_val_lit definition
|
|
||||||
([#51](https://github.com/sogaiu/tree-sitter-clojure/issues/51))
|
|
||||||
* Handle metadata that is an evaling_lit
|
|
||||||
([#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35),
|
|
||||||
[#46](https://github.com/sogaiu/tree-sitter-clojure/issues/46),
|
|
||||||
[#50](https://github.com/sogaiu/tree-sitter-clojure/issues/50))
|
|
||||||
* Handle construct used for ClojureDart's parameterized types
|
|
||||||
([#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35),
|
|
||||||
[#44](https://github.com/sogaiu/tree-sitter-clojure/pull/44),
|
|
||||||
[#46](https://github.com/sogaiu/tree-sitter-clojure/issues/46))
|
|
||||||
* Generate parser.c and friends with tree-sitter 0.20.7 (ABI 13)
|
|
||||||
([#26](https://github.com/sogaiu/tree-sitter-clojure/pull/26),
|
|
||||||
[#34](https://github.com/sogaiu/tree-sitter-clojure/issues/34),
|
|
||||||
[#45](https://github.com/sogaiu/tree-sitter-clojure/issues/45))
|
|
||||||
* Docs
|
|
||||||
* README
|
|
||||||
* Add section on "what and why"
|
|
||||||
([#38](https://github.com/sogaiu/tree-sitter-clojure/issues/38))
|
|
||||||
* Add section pointing to other docs
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Move resources list to own document
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Remove npm-related descriptions
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Use doc - mostly new users added
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Scope doc - corrections and refinements
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Testing doc - link and format updates
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* What and why doc - added
|
|
||||||
([#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Limits doc - added
|
|
||||||
* notes.txt - removed
|
|
||||||
* Developer-related
|
|
||||||
* Improve maintainability of grammar.js
|
|
||||||
([#39](https://github.com/sogaiu/tree-sitter-clojure/issues/39),
|
|
||||||
[#40](https://github.com/sogaiu/tree-sitter-clojure/issues/40))
|
|
||||||
* Remove dependence on npm
|
|
||||||
([#36](https://github.com/sogaiu/tree-sitter-clojure/issues/36),
|
|
||||||
[#37](https://github.com/sogaiu/tree-sitter-clojure/issues/37),
|
|
||||||
[#38](https://github.com/sogaiu/tree-sitter-clojure/issues/38),
|
|
||||||
[#45](https://github.com/sogaiu/tree-sitter-clojure/issues/45))
|
|
||||||
* Cleanup package.json
|
|
||||||
([#34](https://github.com/sogaiu/tree-sitter-clojure/issues/34),
|
|
||||||
[#36](https://github.com/sogaiu/tree-sitter-clojure/issues/36),
|
|
||||||
[#37](https://github.com/sogaiu/tree-sitter-clojure/issues/37),
|
|
||||||
[#38](https://github.com/sogaiu/tree-sitter-clojure/issues/38),
|
|
||||||
[#45](https://github.com/sogaiu/tree-sitter-clojure/issues/45))
|
|
||||||
* Move corpus to test/corpus
|
|
||||||
* Most developer-bits moved to separate repository
|
|
||||||
([#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35),
|
|
||||||
[#36](https://github.com/sogaiu/tree-sitter-clojure/issues/36),
|
|
||||||
[#39](https://github.com/sogaiu/tree-sitter-clojure/issues/39),
|
|
||||||
[#42](https://github.com/sogaiu/tree-sitter-clojure/issues/42),
|
|
||||||
[#43](https://github.com/sogaiu/tree-sitter-clojure/issues/43),
|
|
||||||
[#45](https://github.com/sogaiu/tree-sitter-clojure/issues/45),
|
|
||||||
[#46](https://github.com/sogaiu/tree-sitter-clojure/issues/46),
|
|
||||||
[#47](https://github.com/sogaiu/tree-sitter-clojure/issues/47))
|
|
||||||
* Credits
|
|
||||||
* borkdude
|
|
||||||
([#51](https://github.com/sogaiu/tree-sitter-clojure/issues/51))
|
|
||||||
* cgrand
|
|
||||||
([#44](https://github.com/sogaiu/tree-sitter-clojure/pull/44))
|
|
||||||
* dannyfreeman
|
|
||||||
([#26](https://github.com/sogaiu/tree-sitter-clojure/pull/26),
|
|
||||||
[#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35),
|
|
||||||
[#37](https://github.com/sogaiu/tree-sitter-clojure/issues/37),
|
|
||||||
[#38](https://github.com/sogaiu/tree-sitter-clojure/issues/38),
|
|
||||||
[#39](https://github.com/sogaiu/tree-sitter-clojure/issues/39),
|
|
||||||
[#40](https://github.com/sogaiu/tree-sitter-clojure/issues/40),
|
|
||||||
[#41](https://github.com/sogaiu/tree-sitter-clojure/issues/41),
|
|
||||||
[#42](https://github.com/sogaiu/tree-sitter-clojure/issues/42),
|
|
||||||
[#43](https://github.com/sogaiu/tree-sitter-clojure/issues/43),
|
|
||||||
[#46](https://github.com/sogaiu/tree-sitter-clojure/issues/46),
|
|
||||||
[#48](https://github.com/sogaiu/tree-sitter-clojure/pull/48),
|
|
||||||
[#49](https://github.com/sogaiu/tree-sitter-clojure/issues/49),
|
|
||||||
[#51](https://github.com/sogaiu/tree-sitter-clojure/issues/51))
|
|
||||||
* dmiller
|
|
||||||
([#42](https://github.com/sogaiu/tree-sitter-clojure/issues/42))
|
|
||||||
* IGJoshua
|
|
||||||
([#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35))
|
|
||||||
* NoahTheDuke
|
|
||||||
([#26](https://github.com/sogaiu/tree-sitter-clojure/pull/26),
|
|
||||||
[#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35),
|
|
||||||
[#37](https://github.com/sogaiu/tree-sitter-clojure/issues/37),
|
|
||||||
[#38](https://github.com/sogaiu/tree-sitter-clojure/issues/38),
|
|
||||||
[#39](https://github.com/sogaiu/tree-sitter-clojure/issues/39),
|
|
||||||
[#40](https://github.com/sogaiu/tree-sitter-clojure/issues/40),
|
|
||||||
[#42](https://github.com/sogaiu/tree-sitter-clojure/issues/42))
|
|
||||||
* phronmophobic
|
|
||||||
([#35](https://github.com/sogaiu/tree-sitter-clojure/issues/35))
|
|
||||||
|
|
||||||
### v0.0.11 - 2023-01-22
|
|
||||||
|
|
||||||
* Update version info in package.json
|
|
||||||
|
|
||||||
### v0.0.10 - 2023-01-06
|
|
||||||
|
|
||||||
* Tokenize symbols and keywords further
|
|
||||||
([#31](https://github.com/sogaiu/tree-sitter-clojure/issues/31)) -
|
|
||||||
dannyfreeman
|
|
||||||
* Address symbols after metadata issue
|
|
||||||
([#21](https://github.com/sogaiu/tree-sitter-clojure/issues/21)) -
|
|
||||||
dannyfreeman
|
|
||||||
* Change formatting of grammar.js
|
|
||||||
|
|
||||||
### v0.0.9 - 2022-06-03
|
|
||||||
|
|
||||||
* Add corpus for light testing
|
|
||||||
* Add highlighting queries for difftastic
|
|
||||||
([#20](https://github.com/sogaiu/tree-sitter-clojure/issues/20))
|
|
||||||
* Remove web-tree-sitter dependency
|
|
||||||
([#19](https://github.com/sogaiu/tree-sitter-clojure/issues/19))
|
|
||||||
* Re-add binding.gyp
|
|
||||||
|
|
||||||
### v0.0.8 - 2021-03-17
|
|
||||||
|
|
||||||
* Upgrade tree-sitter to 0.19.3
|
|
||||||
* Add Cargo.toml
|
|
||||||
* Upgrade tree-sitter to 0.19.2
|
|
||||||
* Add generated bindings directory and content
|
|
||||||
|
|
||||||
### v0.0.7 - 2021-01-05
|
|
||||||
|
|
||||||
* CC0-1.0 ([#11](https://github.com/sogaiu/tree-sitter-clojure/issues/11))
|
|
||||||
* Tweak grammar.js
|
|
||||||
|
|
||||||
### v0.0.3 - 2020-10-30
|
|
||||||
|
|
||||||
* Add generated src directory and content
|
|
||||||
* Major renaming
|
|
||||||
* More fields
|
|
||||||
* Refine metadata bits
|
|
||||||
* Refine \_bare\_\* constructs usage
|
|
||||||
* Address discard / number parsing issue
|
|
||||||
([#7](https://github.com/sogaiu/tree-sitter-clojure/issues/7))
|
|
||||||
* Octal number tweak
|
|
||||||
* Restore visibility of comment nodes
|
|
||||||
* ?
|
|
||||||
|
|
||||||
### v0.0.2 - 2020-09-02
|
|
||||||
|
|
||||||
* Handle whitespace explicitly, no extras
|
|
||||||
* Start using some \_bare\_\* constructs
|
|
||||||
* ?
|
|
||||||
|
|
||||||
### v0.0.1 - 2020-07-05
|
|
||||||
|
|
||||||
* First tagging
|
|
||||||
@ -1,121 +0,0 @@
|
|||||||
Creative Commons Legal Code
|
|
||||||
|
|
||||||
CC0 1.0 Universal
|
|
||||||
|
|
||||||
CREATIVE COMMONS CORPORATION IS NOT A LAW FIRM AND DOES NOT PROVIDE
|
|
||||||
LEGAL SERVICES. DISTRIBUTION OF THIS DOCUMENT DOES NOT CREATE AN
|
|
||||||
ATTORNEY-CLIENT RELATIONSHIP. CREATIVE COMMONS PROVIDES THIS
|
|
||||||
INFORMATION ON AN "AS-IS" BASIS. CREATIVE COMMONS MAKES NO WARRANTIES
|
|
||||||
REGARDING THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS
|
|
||||||
PROVIDED HEREUNDER, AND DISCLAIMS LIABILITY FOR DAMAGES RESULTING FROM
|
|
||||||
THE USE OF THIS DOCUMENT OR THE INFORMATION OR WORKS PROVIDED
|
|
||||||
HEREUNDER.
|
|
||||||
|
|
||||||
Statement of Purpose
|
|
||||||
|
|
||||||
The laws of most jurisdictions throughout the world automatically confer
|
|
||||||
exclusive Copyright and Related Rights (defined below) upon the creator
|
|
||||||
and subsequent owner(s) (each and all, an "owner") of an original work of
|
|
||||||
authorship and/or a database (each, a "Work").
|
|
||||||
|
|
||||||
Certain owners wish to permanently relinquish those rights to a Work for
|
|
||||||
the purpose of contributing to a commons of creative, cultural and
|
|
||||||
scientific works ("Commons") that the public can reliably and without fear
|
|
||||||
of later claims of infringement build upon, modify, incorporate in other
|
|
||||||
works, reuse and redistribute as freely as possible in any form whatsoever
|
|
||||||
and for any purposes, including without limitation commercial purposes.
|
|
||||||
These owners may contribute to the Commons to promote the ideal of a free
|
|
||||||
culture and the further production of creative, cultural and scientific
|
|
||||||
works, or to gain reputation or greater distribution for their Work in
|
|
||||||
part through the use and efforts of others.
|
|
||||||
|
|
||||||
For these and/or other purposes and motivations, and without any
|
|
||||||
expectation of additional consideration or compensation, the person
|
|
||||||
associating CC0 with a Work (the "Affirmer"), to the extent that he or she
|
|
||||||
is an owner of Copyright and Related Rights in the Work, voluntarily
|
|
||||||
elects to apply CC0 to the Work and publicly distribute the Work under its
|
|
||||||
terms, with knowledge of his or her Copyright and Related Rights in the
|
|
||||||
Work and the meaning and intended legal effect of CC0 on those rights.
|
|
||||||
|
|
||||||
1. Copyright and Related Rights. A Work made available under CC0 may be
|
|
||||||
protected by copyright and related or neighboring rights ("Copyright and
|
|
||||||
Related Rights"). Copyright and Related Rights include, but are not
|
|
||||||
limited to, the following:
|
|
||||||
|
|
||||||
i. the right to reproduce, adapt, distribute, perform, display,
|
|
||||||
communicate, and translate a Work;
|
|
||||||
ii. moral rights retained by the original author(s) and/or performer(s);
|
|
||||||
iii. publicity and privacy rights pertaining to a person's image or
|
|
||||||
likeness depicted in a Work;
|
|
||||||
iv. rights protecting against unfair competition in regards to a Work,
|
|
||||||
subject to the limitations in paragraph 4(a), below;
|
|
||||||
v. rights protecting the extraction, dissemination, use and reuse of data
|
|
||||||
in a Work;
|
|
||||||
vi. database rights (such as those arising under Directive 96/9/EC of the
|
|
||||||
European Parliament and of the Council of 11 March 1996 on the legal
|
|
||||||
protection of databases, and under any national implementation
|
|
||||||
thereof, including any amended or successor version of such
|
|
||||||
directive); and
|
|
||||||
vii. other similar, equivalent or corresponding rights throughout the
|
|
||||||
world based on applicable law or treaty, and any national
|
|
||||||
implementations thereof.
|
|
||||||
|
|
||||||
2. Waiver. To the greatest extent permitted by, but not in contravention
|
|
||||||
of, applicable law, Affirmer hereby overtly, fully, permanently,
|
|
||||||
irrevocably and unconditionally waives, abandons, and surrenders all of
|
|
||||||
Affirmer's Copyright and Related Rights and associated claims and causes
|
|
||||||
of action, whether now known or unknown (including existing as well as
|
|
||||||
future claims and causes of action), in the Work (i) in all territories
|
|
||||||
worldwide, (ii) for the maximum duration provided by applicable law or
|
|
||||||
treaty (including future time extensions), (iii) in any current or future
|
|
||||||
medium and for any number of copies, and (iv) for any purpose whatsoever,
|
|
||||||
including without limitation commercial, advertising or promotional
|
|
||||||
purposes (the "Waiver"). Affirmer makes the Waiver for the benefit of each
|
|
||||||
member of the public at large and to the detriment of Affirmer's heirs and
|
|
||||||
successors, fully intending that such Waiver shall not be subject to
|
|
||||||
revocation, rescission, cancellation, termination, or any other legal or
|
|
||||||
equitable action to disrupt the quiet enjoyment of the Work by the public
|
|
||||||
as contemplated by Affirmer's express Statement of Purpose.
|
|
||||||
|
|
||||||
3. Public License Fallback. Should any part of the Waiver for any reason
|
|
||||||
be judged legally invalid or ineffective under applicable law, then the
|
|
||||||
Waiver shall be preserved to the maximum extent permitted taking into
|
|
||||||
account Affirmer's express Statement of Purpose. In addition, to the
|
|
||||||
extent the Waiver is so judged Affirmer hereby grants to each affected
|
|
||||||
person a royalty-free, non transferable, non sublicensable, non exclusive,
|
|
||||||
irrevocable and unconditional license to exercise Affirmer's Copyright and
|
|
||||||
Related Rights in the Work (i) in all territories worldwide, (ii) for the
|
|
||||||
maximum duration provided by applicable law or treaty (including future
|
|
||||||
time extensions), (iii) in any current or future medium and for any number
|
|
||||||
of copies, and (iv) for any purpose whatsoever, including without
|
|
||||||
limitation commercial, advertising or promotional purposes (the
|
|
||||||
"License"). The License shall be deemed effective as of the date CC0 was
|
|
||||||
applied by Affirmer to the Work. Should any part of the License for any
|
|
||||||
reason be judged legally invalid or ineffective under applicable law, such
|
|
||||||
partial invalidity or ineffectiveness shall not invalidate the remainder
|
|
||||||
of the License, and in such case Affirmer hereby affirms that he or she
|
|
||||||
will not (i) exercise any of his or her remaining Copyright and Related
|
|
||||||
Rights in the Work or (ii) assert any associated claims and causes of
|
|
||||||
action with respect to the Work, in either case contrary to Affirmer's
|
|
||||||
express Statement of Purpose.
|
|
||||||
|
|
||||||
4. Limitations and Disclaimers.
|
|
||||||
|
|
||||||
a. No trademark or patent rights held by Affirmer are waived, abandoned,
|
|
||||||
surrendered, licensed or otherwise affected by this document.
|
|
||||||
b. Affirmer offers the Work as-is and makes no representations or
|
|
||||||
warranties of any kind concerning the Work, express, implied,
|
|
||||||
statutory or otherwise, including without limitation warranties of
|
|
||||||
title, merchantability, fitness for a particular purpose, non
|
|
||||||
infringement, or the absence of latent or other defects, accuracy, or
|
|
||||||
the present or absence of errors, whether or not discoverable, all to
|
|
||||||
the greatest extent permissible under applicable law.
|
|
||||||
c. Affirmer disclaims responsibility for clearing rights of other persons
|
|
||||||
that may apply to the Work or any use thereof, including without
|
|
||||||
limitation any person's Copyright and Related Rights in the Work.
|
|
||||||
Further, Affirmer disclaims responsibility for obtaining any necessary
|
|
||||||
consents, permissions or other rights required for any use of the
|
|
||||||
Work.
|
|
||||||
d. Affirmer understands and acknowledges that Creative Commons is not a
|
|
||||||
party to this document and has no duty or obligation with respect to
|
|
||||||
this CC0 or use of the Work.
|
|
||||||
@ -1,46 +0,0 @@
|
|||||||
# tree-sitter-clojure
|
|
||||||
|
|
||||||
A tree-sitter grammar for Clojure and ClojureScript
|
|
||||||
|
|
||||||
## What the Repository Provides
|
|
||||||
|
|
||||||
This repository provides some files used to create various artifacts
|
|
||||||
(e.g. dynamic libraries) used for handling Clojure and ClojureScript
|
|
||||||
source code via tree-sitter.
|
|
||||||
|
|
||||||
Please see the [what and why document](doc/what-and-why.md) for
|
|
||||||
detailed information.
|
|
||||||
|
|
||||||
## Potential Changes Announcements
|
|
||||||
|
|
||||||
Changes may occur because:
|
|
||||||
|
|
||||||
1. There may be unanticipated important use cases we may want to
|
|
||||||
account for
|
|
||||||
2. The grammar depends on tree-sitter which remains in flux (and is
|
|
||||||
still pre 1.0)
|
|
||||||
3. It's possible we missed something or got something wrong about
|
|
||||||
Clojure and we might want to remedy that
|
|
||||||
|
|
||||||
To get a heads-up before such changes occur, please consider
|
|
||||||
subscribing to the [Potential Changes Announcements
|
|
||||||
issue](https://github.com/sogaiu/tree-sitter-clojure/issues/33) to be
|
|
||||||
notified beforehand.
|
|
||||||
|
|
||||||
Note that previously tagged versions may work fine depending on the
|
|
||||||
use case. See the [changelog](CHANGELOG.md) for details.
|
|
||||||
|
|
||||||
## Other Documents
|
|
||||||
|
|
||||||
There are some documents in the [`doc` directory](doc/) covering
|
|
||||||
topics such as:
|
|
||||||
|
|
||||||
* [Scope](doc/scope.md)
|
|
||||||
* [Limits](doc/limits.md)
|
|
||||||
* [Testing](doc/testing.md)
|
|
||||||
* [Uses](doc/use.md)
|
|
||||||
|
|
||||||
## Acknowledgments
|
|
||||||
|
|
||||||
Please see the [credits](doc/credits.md).
|
|
||||||
|
|
||||||
@ -1,59 +0,0 @@
|
|||||||
## Credits
|
|
||||||
|
|
||||||
Many people were directly and indirectly involved in bringing about tree-sitter-clojure. I may have missed some people below, please let me know if I have. Thanks to all!
|
|
||||||
|
|
||||||
* Aerijo - Guide to your first Tree-sitter grammar
|
|
||||||
* ahlinc - tree-sitter work
|
|
||||||
* alehatsman - nvim-treesitter and related discussion
|
|
||||||
* alexmiller - clojure-related inquiries and docs
|
|
||||||
* andrewchambers - discussion
|
|
||||||
* bbatsov - discussions and clojure-ts-mode
|
|
||||||
* bfredl - neovim and tree-sitter work
|
|
||||||
* borkdude - analyze-reify, babashka, clj-kondo, edamame, and more
|
|
||||||
* carocad - parcera and discussions
|
|
||||||
* cgrand - ClojureDart and related reader explanation
|
|
||||||
* clojars - including everyone who has uploaded there
|
|
||||||
* CoenraadS - Bracket-Pair-Colorizer-2
|
|
||||||
* dannyfreeman - grammar.js enhancements and fixes, clojure-ts-mode and discussions
|
|
||||||
* dmiller - ClojureCLR consultation
|
|
||||||
* EvegeniyPeshkov - syntax-highlighter
|
|
||||||
* georgewfraser - vscode-tree-sitter
|
|
||||||
* gfredericks - test.check, generators, and discussions
|
|
||||||
* GrayJack - discussions and tree-sitter-janet
|
|
||||||
* hitode909 - vscode-perl-outline
|
|
||||||
* iarenaza - discussions
|
|
||||||
* IGJoshua - ClojureCLR investigations
|
|
||||||
* jafingerhut - clojure-related inquiries and haironfire research
|
|
||||||
* jeff-hykin - tree-sitter and VSCode related
|
|
||||||
* kolja - nrepl-alliance and tree-sitter question concerning Clojure on StackOverflow
|
|
||||||
* lread - rewrite-cljc and discussions
|
|
||||||
* mauricioszabo - clover and repl-tooling
|
|
||||||
* maxbrunsfeld - tree-sitter and related
|
|
||||||
* monnier - emacs-tree-sitter related
|
|
||||||
* NoahTheDuke - discussion and suggestions
|
|
||||||
* nwjsmith - tree-sitter upgrade
|
|
||||||
* oakmac - tree-sitter-clojure.oakmac, conj 2018 unsession, advice, etc.
|
|
||||||
* p00f - nvim-ts-rainbow
|
|
||||||
* pedrorgirardi - discussions, vscode and tree-sitter-clojure bits
|
|
||||||
* PEZ - calva, vscode tips, and general discussion
|
|
||||||
* phronmophobic - dewey, discussion, and repository data
|
|
||||||
* pyrmont - review, error-spotting, fix, and discussions
|
|
||||||
* rewinfrey - helpful bits from tree-sitter-haskell
|
|
||||||
* richhickey - clojure, etc.
|
|
||||||
* rrudakov - discussions and clojure-ts-mode
|
|
||||||
* Saikyun - discussions
|
|
||||||
* seancorfield - clojure-related inquiries
|
|
||||||
* SergeevPavel - tree-sitter-clojure.SergeevPavel (fork of tree-sitter-clojure.Tavistock with further work)
|
|
||||||
* SevereOverfl0w - tree-sitter and vim info
|
|
||||||
* shackra - tree-sitter-query.el
|
|
||||||
* SignSpice - discussion
|
|
||||||
* snoe - discussions
|
|
||||||
* Tavistock - tree-sitter-clojure.Tavistock
|
|
||||||
* th0rex - emacs-tree-sitter related
|
|
||||||
* theHamsta - neovim, nvim-treesitter, tree-sitter-commonlisp
|
|
||||||
* tobias - clojars work
|
|
||||||
* tonsky - sublime-clojure work with test data, clojure north talk, alabaster theme
|
|
||||||
* ubolonton - emacs-tree-sitter
|
|
||||||
* vigoux - nvim-treesitter and related
|
|
||||||
* Wilfred - difftastic, bug reporting, and discussion
|
|
||||||
|
|
||||||
@ -1,28 +0,0 @@
|
|||||||
# Limits
|
|
||||||
|
|
||||||
The following items are known to not necessarily work:
|
|
||||||
|
|
||||||
* [Some template
|
|
||||||
files](https://github.com/sogaiu/tree-sitter-clojure/issues/42#issuecomment-1426727973) -
|
|
||||||
these are often not strictly speaking Clojure, though they look pretty close
|
|
||||||
* Other code that is not standard Clojure
|
|
||||||
[1](https://github.com/fjarri/clojure-scribble#basic-usage)
|
|
||||||
[2](https://github.com/dgrnbrg/piplin/blob/4c39386413d62ec9c2d679fa4c742313d97f75ef/src/piplin/mips.clj#L12)
|
|
||||||
because it uses functionality that modifies Clojure's reader behavior
|
|
||||||
in certain ways [1](https://github.com/jwymanm/chiara#the-syntax)
|
|
||||||
[2](https://github.com/dgrnbrg/piplin/blob/4c39386413d62ec9c2d679fa4c742313d97f75ef/src/piplin/types/bits.clj#L231-L251)
|
|
||||||
* Some older Clojure code - for example, `^` used to mean "wrap the
|
|
||||||
following thing in `(meta ...)`"
|
|
||||||
[1](https://github.com/clojure/clojure/blob/1.0.x/src/jvm/clojure/lang/LispReader.java#L71)
|
|
||||||
[2](https://github.com/clojure/clojure/blob/1.0.x/src/clj/clojure/zip.clj#L58)
|
|
||||||
* [ClojureCLR's pipe syntax for
|
|
||||||
symbols](https://github.com/sogaiu/tree-sitter-clojure/issues/35#issuecomment-1407320526)
|
|
||||||
([comment at #42](https://github.com/sogaiu/tree-sitter-clojure/issues/42#issuecomment-1450290140))
|
|
||||||
* [Files that contain one or more
|
|
||||||
zero-bytes](https://github.com/sogaiu/tree-sitter-clojure/issues/42#issuecomment-1430546851)
|
|
||||||
[1](https://github.com/santifa/clj-dbase/blob/a269ca62d529cf82cec7bffce2e38b71458c6087/src/clj_dbase/core.clj#L121)
|
|
||||||
[2](https://github.com/ont-app/vocabulary/blob/5929b9b1a16b07dc60f1012070da684e8f073326/resources/uri-escapes.edn) -
|
|
||||||
this might be a tree-sitter limitation
|
|
||||||
|
|
||||||
See [#42](https://github.com/sogaiu/tree-sitter-clojure/issues/42) for
|
|
||||||
more details.
|
|
||||||
@ -1,17 +0,0 @@
|
|||||||
# Resources
|
|
||||||
|
|
||||||
Below is a list of resources related to tree-sitter and/or Clojure.
|
|
||||||
|
|
||||||
Some may be a bit dated at this point.
|
|
||||||
|
|
||||||
* [Guide to your first Tree-sitter
|
|
||||||
grammar](https://gist.github.com/Aerijo/df27228d70c633e088b0591b8857eeef)
|
|
||||||
* [sublime-clojure](https://github.com/tonsky/sublime-clojure)
|
|
||||||
* [syntax-highlighter](https://github.com/EvgeniyPeshkov/syntax-highlighter)
|
|
||||||
* [tree-sitter](http://tree-sitter.github.io/tree-sitter/)
|
|
||||||
* [tree-sitter-clojure.oakmac](https://github.com/oakmac/tree-sitter-clojure)
|
|
||||||
* [tree-sitter-clojure.SergeevPavel](https://github.com/SergeevPavel/tree-sitter-clojure)
|
|
||||||
* [tree-sitter-clojure.Tavistock](https://github.com/Tavistock/tree-sitter-clojure)
|
|
||||||
* [vscode-tree-sitter](https://github.com/georgewfraser/vscode-tree-sitter)
|
|
||||||
* [web-tree-sitter
|
|
||||||
API](https://github.com/tree-sitter/tree-sitter/blob/master/lib/binding_web/tree-sitter-web.d.ts)
|
|
||||||
@ -1,103 +0,0 @@
|
|||||||
# Scope of tree-sitter-clojure
|
|
||||||
|
|
||||||
## TLDR
|
|
||||||
|
|
||||||
Only "primitives"
|
|
||||||
(e.g. [symbols](https://github.com/sogaiu/tree-sitter-clojure/blob/c00293fb0cd5ce3a7005c0601e9b546c1ea73094/grammar.js#L280-L282),
|
|
||||||
[lists](https://github.com/sogaiu/tree-sitter-clojure/blob/c00293fb0cd5ce3a7005c0601e9b546c1ea73094/grammar.js#L307-L309),
|
|
||||||
etc.) are supported, i.e. no higher level constructs like `defn`.
|
|
||||||
|
|
||||||
## The Details
|
|
||||||
|
|
||||||
### Why
|
|
||||||
|
|
||||||
For some background, Clojure (and other Lisps) have runtime extensible
|
|
||||||
"syntax" via macros, but AFAIU tree-sitter's current design assumes a
|
|
||||||
fixed syntax.
|
|
||||||
|
|
||||||
Keeping the above in mind, below are some of the factors that
|
|
||||||
influenced the current stance on scope:
|
|
||||||
|
|
||||||
* Clojure has no language specification. This means it's unclear what
|
|
||||||
to try to support in the grammar. For example, `defn` is defined in
|
|
||||||
the `clojure.core` namespace, but then so are a lot of other things
|
|
||||||
and `clojure.core` is not a small namespace.
|
|
||||||
|
|
||||||
* Each additional item added to the grammar tends to increase the
|
|
||||||
difficulty of getting the grammar to function correctly (or well
|
|
||||||
enough). In the event that an issue is discovered or a much desired
|
|
||||||
feature surfaces, the more items there already are in the grammar,
|
|
||||||
generally, the harder it may be to accomodate / adjust.
|
|
||||||
|
|
||||||
* Handling more things might lead to degraded performance. Apart from
|
|
||||||
possibly that being a negative for end-user use, that might also
|
|
||||||
lead to more waiting time while testing across large samples of code
|
|
||||||
(which has been essential because of the lack of a specification).
|
|
||||||
|
|
||||||
### Alternatives
|
|
||||||
|
|
||||||
It is possible to [use tree-sitter-clojure as a
|
|
||||||
base](https://github.com/tree-sitter/tree-sitter/issues/645) to add
|
|
||||||
additional constructs to a "derived" grammar. For example, such a
|
|
||||||
grammar might be specialized to look for "definitions". At least in
|
|
||||||
[emacs-tree-sitter](https://github.com/ubolonton/emacs-tree-sitter),
|
|
||||||
[it is technically possibly to have multiple grammars be used on
|
|
||||||
single
|
|
||||||
buffer](https://github.com/ubolonton/emacs-tree-sitter/discussions/129#discussioncomment-502836):
|
|
||||||
|
|
||||||
> If you want 2 parse trees in the same buffer instead, you would need
|
|
||||||
> to define an advice for tree-sitter--do-parse, as well as additional
|
|
||||||
> buffer-local variables for the secondary grammar.
|
|
||||||
|
|
||||||
Apparently it became possible in September of 2020 for [queries to
|
|
||||||
match on any of a node's
|
|
||||||
supertypes](https://github.com/tree-sitter/tree-sitter/pull/738). It
|
|
||||||
may be possible to make a list supertype that is "composed of" `defn`
|
|
||||||
and things that are not `defn`.
|
|
||||||
[tree-sitter-clojure-def](https://github.com/sogaiu/tree-sitter-clojure-def)
|
|
||||||
is an attempt at realizing this apoproach.
|
|
||||||
|
|
||||||
However, depending on one's goals, it might make more sense to
|
|
||||||
consider leveraging [clj-kondo's analysis
|
|
||||||
capabilities](https://github.com/clj-kondo/clj-kondo/tree/master/analysis)
|
|
||||||
as clj-kondo already understands Clojure pretty well. IIUC,
|
|
||||||
[clojure-lsp does
|
|
||||||
this](https://github.com/clojure-lsp/clojure-lsp/blob/14724457f0d553795dfe16317d3ee6c5fc97d4ba/deps.edn#L21).
|
|
||||||
|
|
||||||
### Miscellaneous Points
|
|
||||||
|
|
||||||
* Earlier attempts at adding `def` and friends resulted in
|
|
||||||
unacceptably high error rates [1]. The tests were conducted against
|
|
||||||
code from [Clojars](https://clojars.org/) (uncontrived code) [2].
|
|
||||||
|
|
||||||
* For use cases like structural editing, it seems important to be able
|
|
||||||
to distinguish between the following sorts of cases:
|
|
||||||
* `defn` used for defining a function, and
|
|
||||||
* [Using the symbol `defn` within a macro to construct code to
|
|
||||||
define a
|
|
||||||
function](https://github.com/Raynes/conch/blob/685f2c73138f376f2aa0623053dfdaba350a04f4/src/me/raynes/conch.clj#L251-L252)
|
|
||||||
|
|
||||||
AFAICT, the approach taken in tree-sitter-clojure-def does not
|
|
||||||
make telling these sorts of things apart possible.
|
|
||||||
|
|
||||||
* It doesn't seem possible to support all "defining" macros like
|
|
||||||
`defsomething`
|
|
||||||
(e.g. https://github.com/redplanetlabs/specter/blob/efaf35558a2c0068f5b6a8ef1dbbd0912702bdbd/src/clj/com/rpl/specter.cljc#L57-L60)
|
|
||||||
since a user's Clojure code can define these.
|
|
||||||
|
|
||||||
## Footnotes
|
|
||||||
|
|
||||||
* [1] Author's opinion :)
|
|
||||||
* [2] Two of the previous tree-sitter-clojure attempts (by
|
|
||||||
[oakmac](https://github.com/oakmac/tree-sitter-clojure) and
|
|
||||||
[Tavistock](https://github.com/Tavistock/tree-sitter-clojure)) also
|
|
||||||
had unacceptably high error rates. The former of those two grammars
|
|
||||||
tried to handle higher level constructs and it had a notably higher
|
|
||||||
error rate. After trying to modify that grammar to address the error
|
|
||||||
rate unsuccessfully, it seemed like the two points were related. Note
|
|
||||||
though that this is just a suspicion.
|
|
||||||
|
|
||||||
## References
|
|
||||||
|
|
||||||
* https://www.reddit.com/r/Clojure/comments/fkc6uv/is_anyone_working_on_a_treesitter_parser_for/fksmf67/
|
|
||||||
* https://github.com/sogaiu/tree-sitter-clojure/issues/15#issuecomment-880729889
|
|
||||||
@ -1,226 +0,0 @@
|
|||||||
# Testing tree-sitter-clojure
|
|
||||||
|
|
||||||
## TLDR
|
|
||||||
|
|
||||||
[tree-sitter-clojure](https://github.com/sogaiu/tree-sitter-clojure)
|
|
||||||
has been tested using a variety of methods.
|
|
||||||
|
|
||||||
_Note_: Current serious testing is done via the code and instructions
|
|
||||||
in the [ts-clojure](https://github.com/sogaiu/ts-clojure) repository.
|
|
||||||
The description below is left for historical purposes.
|
|
||||||
|
|
||||||
## The Details
|
|
||||||
|
|
||||||
This document will touch on some of those methods and why they were
|
|
||||||
attempted:
|
|
||||||
|
|
||||||
1. Using corpus data from other tree-sitter-clojure attempts
|
|
||||||
2. Using Clojure source from [Clojars](https://clojars.org/)
|
|
||||||
3. Generative testing via
|
|
||||||
[Hypothesis](https://github.com/HypothesisWorks/hypothesis)
|
|
||||||
|
|
||||||
Other employed methods that won't be covered (in much, if any, detail)
|
|
||||||
here:
|
|
||||||
|
|
||||||
1. Sporadic manual invocations
|
|
||||||
2. Using [tonsky's
|
|
||||||
sublime-clojure](https://github.com/tonsky/sublime-clojure) test
|
|
||||||
data
|
|
||||||
3. Generative testing via
|
|
||||||
[test.check](https://github.com/clojure/test.check/)
|
|
||||||
4. [Manual inspection of the
|
|
||||||
grammar](https://github.com/sogaiu/tree-sitter-clojure/issues/3)
|
|
||||||
|
|
||||||
## Using corpus data from other tree-sitter-clojure attempts
|
|
||||||
|
|
||||||
There were at least two previous attempts at implementing
|
|
||||||
tree-sitter-clojure, [one by
|
|
||||||
oakmac](https://github.com/oakmac/tree-sitter-clojure) and [another by
|
|
||||||
Tavistock](https://github.com/Tavistock/tree-sitter-clojure).
|
|
||||||
Important things were learned by trying to make these attempts work,
|
|
||||||
but for reasons not covered here, a separate attempt was started.
|
|
||||||
|
|
||||||
Both earlier attempts had
|
|
||||||
[corpus](https://github.com/oakmac/tree-sitter-clojure/tree/master/corpus)
|
|
||||||
[data](https://github.com/Tavistock/tree-sitter-clojure/tree/master/corpus)
|
|
||||||
that could be adapted for testing. Consequently,
|
|
||||||
[tsclj-tests-parser](https://github.com/sogaiu/tsclj-tests-parser) was
|
|
||||||
created to extract [the relevant data as plain
|
|
||||||
files](https://github.com/sogaiu/tsclj-tests-parser/-/tree/master/test-files).
|
|
||||||
These were in turn fed to tree-sitter's `parse` command using the
|
|
||||||
tree-sitter-clojure grammar to check for parsing errors.
|
|
||||||
|
|
||||||
If changes are made to tree-sitter-clojure's grammar, this method can
|
|
||||||
be used to quickly check for some forms of undesirable breakage.
|
|
||||||
(This could be taken a bit further by adapting the content as corpus
|
|
||||||
data for tree-sitter-clojure.)
|
|
||||||
|
|
||||||
### But...
|
|
||||||
|
|
||||||
One issue with this approach is that it relies on manually identifying
|
|
||||||
and spelling out appropriate test cases, which in the case of Clojure,
|
|
||||||
is complicated by the lack of a language specification.
|
|
||||||
|
|
||||||
Apart from detailed research, this was partially addressed by testing
|
|
||||||
against a large sample of Clojure source code written by the
|
|
||||||
community.
|
|
||||||
|
|
||||||
## Using Clojure source from Clojars
|
|
||||||
|
|
||||||
The most fruitful method of testing was working with Clojure source
|
|
||||||
written by humans for purposes other than for testing
|
|
||||||
tree-sitter-clojure.
|
|
||||||
|
|
||||||
### Where to get samples of Clojure source
|
|
||||||
|
|
||||||
Initially, repositories were cloned from a variety of locations, but
|
|
||||||
before long a decision was made to switch to using "release" jars from
|
|
||||||
Clojars.
|
|
||||||
|
|
||||||
The latter decision was motivated by wanting source that was less
|
|
||||||
likely to be "broken" in various ways. Compared to "release" jar
|
|
||||||
content from Clojars, the default branch of a repository seemed to
|
|
||||||
have a higher probability of "not quite working". Although the
|
|
||||||
Clojars "release" idea was an improvement, weeding out inappropriate
|
|
||||||
Clojure source was still necessary.
|
|
||||||
|
|
||||||
A variety of approaches were used to come up with a specific list of
|
|
||||||
jars from Clojars, but the most recent attempt is
|
|
||||||
[gen-clru-list](https://github.com/sogaiu/gen-clru-list). This is
|
|
||||||
basically a [babashka](https://github.com/babashka/babashka) script
|
|
||||||
that fetches [Clojars'
|
|
||||||
feed.clj](https://github.com/clojars/clojars-web/wiki/Data#useful-extracts-from-the-poms),
|
|
||||||
does some processing, and writes out a list of urls. For reference,
|
|
||||||
this approach currently yields a number of urls in the neighborhood of
|
|
||||||
19,000.
|
|
||||||
|
|
||||||
### How to check retrieved Clojure samples
|
|
||||||
|
|
||||||
The retrieved content was initially checked using
|
|
||||||
[a-tsclj-checker](https://github.com/sogaiu/a-tsclj-checker) (an
|
|
||||||
adaptation of
|
|
||||||
[analyze-reify](https://github.com/borkdude/analyze-reify)) which uses
|
|
||||||
[Rust bindings for
|
|
||||||
tree-sitter](https://github.com/tree-sitter/tree-sitter/tree/master/lib/binding_rust)
|
|
||||||
and tree-sitter-clojure to parse Clojure source code. Notably, it can
|
|
||||||
traverse directories and also operate on `.jar` files.
|
|
||||||
|
|
||||||
Once an error is detected, it is easier to investigate if one has
|
|
||||||
direct access to the Clojure source file in question (as compared with
|
|
||||||
rummaging around `.jar` files). Thus, it was decided to create a
|
|
||||||
single directory tree containing extracted data from all retrieved
|
|
||||||
jars. On a side note, the single directory tree took less than 2 GB
|
|
||||||
of disk space.
|
|
||||||
|
|
||||||
A less fancy, but easier to maintain (i.e. not written in Rust) tool --
|
|
||||||
[ts-grammar-checker](https://github.com/sogaiu/ts-grammar-checker) -- was
|
|
||||||
developed as an alternative to `a-tsclj-checker`. Strictly speaking,
|
|
||||||
`ts-grammar-checker` may not be necessary as one can probably employ
|
|
||||||
tree-sitter's `parse` command in combination with `find`, `xargs` and the like
|
|
||||||
if on some kind of \*nix. An example of a comparable invocation is:
|
|
||||||
|
|
||||||
```
|
|
||||||
find ~/src/clojars-cljish -type f -regex '.*\.clj[cs]?$' -print0 | xargs -0 tree-sitter parse --quiet > my-results.txt
|
|
||||||
```
|
|
||||||
|
|
||||||
`a-tsclj-checker` is the fastest tool but it has not been updated to
|
|
||||||
the most recent version of tree-sitter-clojure. `ts-grammar-checker`
|
|
||||||
is not quite as fast, but it can be easily adapted to work with other
|
|
||||||
tree-sitter grammars (e.g. it's
|
|
||||||
[used](https://github.com/sogaiu/ts-grammar-checker/-/blob/master/janet-checker.janet)
|
|
||||||
for
|
|
||||||
[tree-sitter-janet-simple](https://github.com/sogaiu/tree-sitter-janet-simple)
|
|
||||||
as well). However, it does not support accessing content within
|
|
||||||
`.jar` files.
|
|
||||||
|
|
||||||
Across somewhat less than 150,000 files (.clj, .cljc, .cljs),
|
|
||||||
`a-tsclj-checker` typically takes a little less than 30 seconds, while
|
|
||||||
`ts-grammar-checker` typically takes a bit more than 100 seconds (at
|
|
||||||
least on the author's machine). In subjective terms, it hasn't felt
|
|
||||||
terribly different because knowing there is at least a 30 second wait,
|
|
||||||
[one typically doesn't sit waiting at a prompt for execution
|
|
||||||
completion](https://xkcd.com/303/).
|
|
||||||
|
|
||||||
For any files that parse with errors, it can be handy to apply
|
|
||||||
[clj-kondo](https://github.com/clj-kondo/clj-kondo). The specific
|
|
||||||
details that `clj-kondo` reported were often helpful when examining
|
|
||||||
individual files, but that diagnostic information also provided a way
|
|
||||||
to partition the files into groups. Subjectively it can feel more
|
|
||||||
manageable to deal with 5 groups of files compared with 100 separate
|
|
||||||
files (though it's true that the grouping does not always turn out to
|
|
||||||
be that meaningful).
|
|
||||||
|
|
||||||
An individual "suspect" file is typically viewed manually in an editor
|
|
||||||
(usually one that has `clj-kondo` support enabled) and examined for
|
|
||||||
"issues".
|
|
||||||
|
|
||||||
In practice, testing the grammar against appropriate Clojure source
|
|
||||||
from Clojars has been the most useful in finding issues with the
|
|
||||||
grammar. The lack of a specification for Clojure increased the
|
|
||||||
difficulty of creating an appropriate grammar, but having a large
|
|
||||||
sample of code to test against helped to mitigate this a bit. On more
|
|
||||||
than one occasion some version of the grammar failed to parse some
|
|
||||||
legitimate Clojure source and subsequent investigation revealed that
|
|
||||||
the grammar had not accounted for an uncommom and/or unanticipated
|
|
||||||
usage.
|
|
||||||
|
|
||||||
### But...
|
|
||||||
|
|
||||||
This method has a significant weakness as there could be cases where
|
|
||||||
tree-sitter would parse successfully but the result could be
|
|
||||||
inappropriate. For example, if the grammar definition was faulty,
|
|
||||||
something which should be parsed as a symbol might end up parsed as a
|
|
||||||
number with no error reported.
|
|
||||||
|
|
||||||
To partially address this issue, generative / property-based testing
|
|
||||||
was attempted.
|
|
||||||
|
|
||||||
## Generative testing via Hypothesis
|
|
||||||
|
|
||||||
Initially, [some effort was made to use
|
|
||||||
test.check](https://gist.github.com/sogaiu/c0d668d050b63e298ef63549e357f9d2).
|
|
||||||
However, [an outstanding issue with
|
|
||||||
test.check](https://github.com/clojure/test.check/blob/master/doc/growth-and-shrinking.md#unnecessary-bind)
|
|
||||||
(aka TCHECK-112) seemed very likely to be relevant for the types of
|
|
||||||
tests being considered. Also, the approach used
|
|
||||||
[libpython-clj](https://github.com/clj-python/libpython-clj) to call
|
|
||||||
tree-sitter via [Python bindings for
|
|
||||||
tree-sitter](https://github.com/tree-sitter/py-tree-sitter). Although
|
|
||||||
invoking tree-sitter via Python worked, it was awkward to connect this
|
|
||||||
with `test.check`. For the above reasons, the `test.check` +
|
|
||||||
`libpython-clj` approach (neat as it was) was abandoned.
|
|
||||||
|
|
||||||
Interestingly, Python's Hypothesis doesn't suffer from test.check's
|
|
||||||
["long-standing Hard
|
|
||||||
Problem"](https://clojure.atlassian.net/browse/TCHECK-112) so that was
|
|
||||||
given a try.
|
|
||||||
[prop-test-ts-clj](https://github.com/sogaiu/prop-test-ts-clj) and
|
|
||||||
[hypothesis-grammar-clojure](https://github.com/sogaiu/hypothesis-grammar-clojure)
|
|
||||||
are the resulting bits.
|
|
||||||
|
|
||||||
At least [one
|
|
||||||
issue](https://github.com/sogaiu/tree-sitter-clojure/issues/7) was
|
|
||||||
discovered and it also turned out that
|
|
||||||
[parcera](https://github.com/carocad/parcera) was
|
|
||||||
[affected](https://github.com/carocad/parcera/issues/86).
|
|
||||||
|
|
||||||
The code was also adapted a bit to test
|
|
||||||
[Calva](https://github.com/BetterThanTomorrow/calva). Some issues
|
|
||||||
were discovered and [reported
|
|
||||||
upstream](https://github.com/BetterThanTomorrow/calva/issues/802).
|
|
||||||
|
|
||||||
### But...
|
|
||||||
|
|
||||||
A drawback of this approach is that details of the tree-sitter-clojure
|
|
||||||
grammar became embedded in the tests. One consequence is that if
|
|
||||||
tree-sitter-clojure's grammar changes, then the tests may need to be
|
|
||||||
updated to reflect changes in the grammar (if there is an intent to
|
|
||||||
continue to use them).
|
|
||||||
|
|
||||||
## Summary
|
|
||||||
|
|
||||||
tree-sitter-clojure has been tested in a variety ways attempting to
|
|
||||||
address various real-world constraints (e.g. lack of a language
|
|
||||||
specification, limitations of tree-sitter's approach for a language
|
|
||||||
with extensible syntax, etc.). AFAICT, for what it sets out to do, it
|
|
||||||
seems to work pretty well so far.
|
|
||||||
@ -1,25 +0,0 @@
|
|||||||
## Use Information
|
|
||||||
|
|
||||||
tree-sitter-clojure has been used in or by the following:
|
|
||||||
|
|
||||||
* [clojure-ts-mode](https://github.com/clojure-emacs/clojure-ts-mode)
|
|
||||||
|
|
||||||
* [Cursorless](https://github.com/cursorless-dev/cursorless)
|
|
||||||
|
|
||||||
* [difftastic](https://github.com/Wilfred/difftastic)
|
|
||||||
|
|
||||||
* [Helix Editor](https://github.com/helix-editor/helix)
|
|
||||||
|
|
||||||
* [nvim-treesitter](https://github.com/nvim-treesitter/nvim-treesitter)
|
|
||||||
|
|
||||||
* [Semgrep](https://github.com/returntocorp/semgrep)
|
|
||||||
|
|
||||||
* [tree-sitter-langs](https://github.com/emacs-tree-sitter/tree-sitter-langs)
|
|
||||||
|
|
||||||
* Exploring [alternative highlighting
|
|
||||||
ideas](https://github.com/ubolonton/emacs-tree-sitter/issues/68) and
|
|
||||||
[an early emacs user
|
|
||||||
foray](https://ag91.github.io/blog/2021/06/22/how-(simple-is)-to-install-a-clojure-tree-sitter-grammar-and-use-it-from-emacs/),
|
|
||||||
both via
|
|
||||||
[emacs-tree-sitter](https://github.com/ubolonton/emacs-tree-sitter).
|
|
||||||
|
|
||||||
@ -1,101 +0,0 @@
|
|||||||
# What the Repository Provides and Why
|
|
||||||
|
|
||||||
This document describes what files and directories the repository
|
|
||||||
provides and associated reasoning. First it covers things which are
|
|
||||||
likely to remain in place for some time (except perhaps the `src`
|
|
||||||
directory). This is followed by a description of things that are more
|
|
||||||
likely to change or be removed.
|
|
||||||
|
|
||||||
One might be interested in this content out of academic curiosity but
|
|
||||||
more likely it might be because one is thinking of depending on the
|
|
||||||
repository in some way.
|
|
||||||
|
|
||||||
## What and Why
|
|
||||||
|
|
||||||
The order of the following files and directories is alphabetical and
|
|
||||||
not meant to reflect relative importance.
|
|
||||||
|
|
||||||
* `CHANGELOG.md` - this file contains a changelog.
|
|
||||||
|
|
||||||
* `COPYING.txt` - this file contains license information for the
|
|
||||||
repository.
|
|
||||||
|
|
||||||
* `grammar.js` - this file contains a grammar description and is used
|
|
||||||
in the process of generating parser source code that lives in `src`.
|
|
||||||
It's likely that this (or something comparable) will continue to be
|
|
||||||
provided assuming tree-sitter doesn't change the way it works.
|
|
||||||
|
|
||||||
* `package.json` - this file is needed by a
|
|
||||||
[component](https://github.com/cursorless-dev/vscode-parse-tree/) of
|
|
||||||
[Cursorless](https://www.cursorless.org/). It uses our grammar via
|
|
||||||
yarn and `package.json` seems to be essential.
|
|
||||||
|
|
||||||
* `queries` - this directory and the simple file it contains are
|
|
||||||
provided on request from
|
|
||||||
[`difftastic`](https://github.com/Wilfred/difftastic) folks. The
|
|
||||||
file it contains doesn't contain much and is not likely to be the
|
|
||||||
sort of thing one expects to be used in an editor.
|
|
||||||
|
|
||||||
* `README.md` - this file contains the repository's README content.
|
|
||||||
|
|
||||||
* `src` - this directory contains source files that are generated [1]
|
|
||||||
from `grammar.js`. The files are typically used to generate a
|
|
||||||
dynamic library / shared object that can be used by the tree-sitter
|
|
||||||
library to handle Clojure / ClojureScript source code. Although the
|
|
||||||
content of this directory is generated, the files are provided
|
|
||||||
because in practice, multiple parties have already become dependant
|
|
||||||
on them. There have been opinions voiced that this should not
|
|
||||||
remain so, but change in that direction has not been widespread. We
|
|
||||||
would prefer not to be hosting this directory and its content, but
|
|
||||||
are leaving it in place for the time being. See
|
|
||||||
[here](https://github.com/sogaiu/ts-questions/blob/master/questions/should-parser-source-be-committed/README.md)
|
|
||||||
for more on the topic if interested.
|
|
||||||
|
|
||||||
* `test/corpus` - this directory contains tree-sitter's corpus
|
|
||||||
test-related files.
|
|
||||||
|
|
||||||
## Other Content
|
|
||||||
|
|
||||||
The rest of the content of the repository is currently documentation
|
|
||||||
that lives in the `doc` directory.
|
|
||||||
|
|
||||||
## About Bindings
|
|
||||||
|
|
||||||
The repository does not host any bindings (e.g. for Rust, Node, or
|
|
||||||
other programming language).
|
|
||||||
|
|
||||||
They should be straight-forward to generate as long as one has a
|
|
||||||
suitable `tree-sitter` cli and the `grammar.js` file mentioned above.
|
|
||||||
|
|
||||||
Binding code used to be created by the `generate` subcommand, but this
|
|
||||||
appears to have [changed from version 0.24.0 of the `tree-sitter`
|
|
||||||
cli](https://github.com/tree-sitter/tree-sitter/releases/tag/v0.24.0):
|
|
||||||
|
|
||||||
> Move generation of grammar files to an init command ([#3694](https://github.com/tree-sitter/tree-sitter/pull/3694))
|
|
||||||
|
|
||||||
Note that "grammar files" here seems to refer to "bindings" files.
|
|
||||||
|
|
||||||
Further evidence in support of this change is [this
|
|
||||||
documentation](https://tree-sitter.github.io/tree-sitter/cli/init.html#binding-files):
|
|
||||||
|
|
||||||
> When you run tree-sitter init, the CLI will also generate a number
|
|
||||||
> of files in your repository that allow for your parser to be used
|
|
||||||
> from different language.
|
|
||||||
|
|
||||||
Which languages bindings files are generated for is affected by [the
|
|
||||||
`bindings` field in
|
|
||||||
`tree-sitter.json`](https://tree-sitter.github.io/tree-sitter/cli/init.html#the-bindings-field).
|
|
||||||
(It appears that omitting the field means "don't generate any
|
|
||||||
bindings".)
|
|
||||||
|
|
||||||
Probably it's better to consult the official documentation and/or ask
|
|
||||||
around about what the latest procedure is rather than rely on these
|
|
||||||
brief notes though.
|
|
||||||
|
|
||||||
## Footnotes
|
|
||||||
|
|
||||||
[1] If the grammar uses an external scanner, `src` may contain
|
|
||||||
non-generated files such as `scanner.c`, `scanner.cc`, etc. In the
|
|
||||||
current case, no external scanner is used and the `src` directory
|
|
||||||
content is entirely generated.
|
|
||||||
|
|
||||||
@ -1,528 +0,0 @@
|
|||||||
// one aim is to try to parse what is correct (in the sense of
|
|
||||||
// officially supported), but also be looser in parsing additional
|
|
||||||
// things. this is more or less in line with advice from tree-sitter
|
|
||||||
// folks.
|
|
||||||
|
|
||||||
function regex(...patts) {
|
|
||||||
return RegExp(patts.join(""));
|
|
||||||
}
|
|
||||||
|
|
||||||
// java.lang.Character.isWhitespace AND comma
|
|
||||||
//
|
|
||||||
// Space Separator (Zs) but NOT including (U+00A0, U+2007, U+202F)
|
|
||||||
// U+0020, U+1680, U+2000, U+2001, U+2002, U+2003, U+2004, U+2005,
|
|
||||||
// U+2006, U+2008, U+2009, U+200A, U+205F, U+3000
|
|
||||||
// Line Separator (Zl)
|
|
||||||
// U+2028
|
|
||||||
// Paragraph Separator (Zp)
|
|
||||||
// U+2029
|
|
||||||
// Horizontal Tabulation
|
|
||||||
// \t
|
|
||||||
// Line Feed
|
|
||||||
// \n
|
|
||||||
// Vertical Tabulation
|
|
||||||
// U+000B
|
|
||||||
// Form Feed
|
|
||||||
// \f
|
|
||||||
// Carriage Return
|
|
||||||
// \r
|
|
||||||
// File Separator
|
|
||||||
// U+001C
|
|
||||||
// Group Separator
|
|
||||||
// U+001D
|
|
||||||
// Record Separator
|
|
||||||
// U+001E
|
|
||||||
// Unit Separator
|
|
||||||
// U+001F
|
|
||||||
const WHITESPACE_CHAR =
|
|
||||||
regex("[",
|
|
||||||
"\\f\\n\\r\\t, ",
|
|
||||||
"\\u000B\\u001C\\u001D\\u001E\\u001F",
|
|
||||||
"\\u2028\\u2029\\u1680",
|
|
||||||
"\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008",
|
|
||||||
"\\u2009\\u200a\\u205f\\u3000",
|
|
||||||
"]");
|
|
||||||
|
|
||||||
const WHITESPACE =
|
|
||||||
token(repeat1(WHITESPACE_CHAR));
|
|
||||||
|
|
||||||
const COMMENT =
|
|
||||||
token(regex('(;|#!).*\n?'));
|
|
||||||
|
|
||||||
const DIGIT =
|
|
||||||
regex('[0-9]');
|
|
||||||
|
|
||||||
const ALPHANUMERIC =
|
|
||||||
regex('[0-9a-zA-Z]');
|
|
||||||
|
|
||||||
const HEX_DIGIT =
|
|
||||||
regex('[0-9a-fA-F]');
|
|
||||||
|
|
||||||
const OCTAL_DIGIT =
|
|
||||||
regex('[0-7]');
|
|
||||||
|
|
||||||
const HEX_NUMBER =
|
|
||||||
seq("0",
|
|
||||||
regex('[xX]'),
|
|
||||||
repeat1(HEX_DIGIT),
|
|
||||||
optional("N"));
|
|
||||||
|
|
||||||
const OCTAL_NUMBER =
|
|
||||||
seq("0",
|
|
||||||
repeat1(OCTAL_DIGIT),
|
|
||||||
optional("N"));
|
|
||||||
|
|
||||||
// XXX: not constraining number before r/R
|
|
||||||
// XXX: not constraining portion after r/R
|
|
||||||
const RADIX_NUMBER =
|
|
||||||
seq(repeat1(DIGIT),
|
|
||||||
regex('[rR]'),
|
|
||||||
repeat1(ALPHANUMERIC));
|
|
||||||
|
|
||||||
const RATIO =
|
|
||||||
seq(repeat1(DIGIT),
|
|
||||||
"/",
|
|
||||||
repeat1(DIGIT));
|
|
||||||
|
|
||||||
const DOUBLE =
|
|
||||||
seq(repeat1(DIGIT),
|
|
||||||
optional(seq(".",
|
|
||||||
repeat(DIGIT))),
|
|
||||||
optional(seq(regex('[eE]'),
|
|
||||||
optional(regex('[+-]')),
|
|
||||||
repeat1(DIGIT))),
|
|
||||||
optional("M"));
|
|
||||||
|
|
||||||
const INTEGER =
|
|
||||||
seq(repeat1(DIGIT),
|
|
||||||
optional(regex('[MN]')));
|
|
||||||
|
|
||||||
const NUMBER =
|
|
||||||
token(prec(10, seq(optional(regex('[+-]')),
|
|
||||||
choice(HEX_NUMBER,
|
|
||||||
OCTAL_NUMBER,
|
|
||||||
RADIX_NUMBER,
|
|
||||||
RATIO,
|
|
||||||
DOUBLE,
|
|
||||||
INTEGER))));
|
|
||||||
|
|
||||||
const NIL =
|
|
||||||
token('nil');
|
|
||||||
|
|
||||||
const BOOLEAN =
|
|
||||||
token(choice('false',
|
|
||||||
'true'));
|
|
||||||
|
|
||||||
const KEYWORD_HEAD =
|
|
||||||
regex("[^",
|
|
||||||
"\\f\\n\\r\\t ",
|
|
||||||
"()",
|
|
||||||
"\\[\\]",
|
|
||||||
"{}",
|
|
||||||
'"',
|
|
||||||
"@~^;`",
|
|
||||||
"\\\\",
|
|
||||||
",:/",
|
|
||||||
"\\u000B\\u001C\\u001D\\u001E\\u001F",
|
|
||||||
"\\u2028\\u2029\\u1680",
|
|
||||||
"\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008",
|
|
||||||
"\\u2009\\u200a\\u205f\\u3000",
|
|
||||||
"]");
|
|
||||||
|
|
||||||
const KEYWORD_BODY =
|
|
||||||
choice(regex("[:']"), KEYWORD_HEAD);
|
|
||||||
|
|
||||||
const KEYWORD_NAMESPACED_BODY =
|
|
||||||
token(repeat1(choice(regex("[:'/]"), KEYWORD_HEAD)));
|
|
||||||
|
|
||||||
const KEYWORD_NO_SIGIL =
|
|
||||||
token(seq(KEYWORD_HEAD,
|
|
||||||
repeat(KEYWORD_BODY)));
|
|
||||||
|
|
||||||
const KEYWORD_MARK =
|
|
||||||
token(":");
|
|
||||||
|
|
||||||
const AUTO_RESOLVE_MARK =
|
|
||||||
token("::");
|
|
||||||
|
|
||||||
const STRING =
|
|
||||||
token(seq('"',
|
|
||||||
repeat(regex('[^"\\\\]')),
|
|
||||||
repeat(seq("\\",
|
|
||||||
regex("."),
|
|
||||||
repeat(regex('[^"\\\\]')))),
|
|
||||||
'"'));
|
|
||||||
|
|
||||||
// XXX: better to match \o378 as a single item
|
|
||||||
const OCTAL_CHAR =
|
|
||||||
seq("o",
|
|
||||||
choice(seq(DIGIT, DIGIT, DIGIT),
|
|
||||||
seq(DIGIT, DIGIT),
|
|
||||||
seq(DIGIT)));
|
|
||||||
|
|
||||||
const NAMED_CHAR =
|
|
||||||
choice("backspace",
|
|
||||||
"formfeed",
|
|
||||||
"newline",
|
|
||||||
"return",
|
|
||||||
"space",
|
|
||||||
"tab");
|
|
||||||
|
|
||||||
// XXX: outside of: (c >= '\uD800' && c <= '\uDFFF') - LispReader.java
|
|
||||||
// but not doing this
|
|
||||||
const UNICODE =
|
|
||||||
seq("u",
|
|
||||||
HEX_DIGIT,
|
|
||||||
HEX_DIGIT,
|
|
||||||
HEX_DIGIT,
|
|
||||||
HEX_DIGIT);
|
|
||||||
|
|
||||||
// XXX: not quite sure what this is supposed to be...
|
|
||||||
// return Character.valueOf(token.charAt(0)); -- LispReader.java
|
|
||||||
// java char is 16 bits...what can tree-sitter manage?
|
|
||||||
//
|
|
||||||
// XXX: null is supposed to be usable but putting \x00 below
|
|
||||||
// does not seem to work
|
|
||||||
const ANY_CHAR =
|
|
||||||
regex('.|\n');
|
|
||||||
|
|
||||||
const CHARACTER =
|
|
||||||
token(seq("\\",
|
|
||||||
choice(OCTAL_CHAR,
|
|
||||||
NAMED_CHAR,
|
|
||||||
UNICODE,
|
|
||||||
ANY_CHAR)));
|
|
||||||
|
|
||||||
const SYMBOL_HEAD =
|
|
||||||
regex("[^",
|
|
||||||
"\\f\\n\\r\\t ",
|
|
||||||
"/",
|
|
||||||
"()\\[\\]{}",
|
|
||||||
'"',
|
|
||||||
"@~^;`",
|
|
||||||
"\\\\",
|
|
||||||
",:#'0-9",
|
|
||||||
"\\u000B\\u001C\\u001D\\u001E\\u001F",
|
|
||||||
"\\u2028\\u2029\\u1680",
|
|
||||||
"\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008",
|
|
||||||
"\\u2009\\u200a\\u205f\\u3000",
|
|
||||||
"]");
|
|
||||||
|
|
||||||
const NS_DELIMITER =
|
|
||||||
token("/");
|
|
||||||
|
|
||||||
const SYMBOL_BODY =
|
|
||||||
choice(SYMBOL_HEAD,
|
|
||||||
regex("[:#'0-9]"));
|
|
||||||
|
|
||||||
const SYMBOL_NAMESPACED_NAME =
|
|
||||||
token(repeat1(choice(SYMBOL_HEAD,
|
|
||||||
regex("[/:#'0-9]"))));
|
|
||||||
|
|
||||||
// XXX: no attempt is made to enforce certain complex things, e.g.
|
|
||||||
//
|
|
||||||
// Symbols beginning or ending with ':' are reserved by Clojure.
|
|
||||||
// A symbol can contain one or more non-repeating ':'s
|
|
||||||
const SYMBOL =
|
|
||||||
token(seq(SYMBOL_HEAD,
|
|
||||||
repeat(SYMBOL_BODY)));
|
|
||||||
|
|
||||||
module.exports = grammar({
|
|
||||||
name: 'clojure',
|
|
||||||
|
|
||||||
extras: $ =>
|
|
||||||
[],
|
|
||||||
|
|
||||||
conflicts: $ =>
|
|
||||||
[],
|
|
||||||
|
|
||||||
inline: $ =>
|
|
||||||
[$._kwd_leading_slash,
|
|
||||||
$._kwd_just_slash,
|
|
||||||
$._kwd_qualified,
|
|
||||||
$._kwd_unqualified,
|
|
||||||
$._kwd_marker,
|
|
||||||
$._sym_qualified,
|
|
||||||
$._sym_unqualified],
|
|
||||||
|
|
||||||
rules: {
|
|
||||||
// THIS MUST BE FIRST -- even though this doesn't look like it matters
|
|
||||||
source: $ =>
|
|
||||||
repeat(choice($._form,
|
|
||||||
$._gap)),
|
|
||||||
|
|
||||||
_gap: $ =>
|
|
||||||
choice($._ws,
|
|
||||||
$.comment,
|
|
||||||
$.dis_expr),
|
|
||||||
|
|
||||||
_ws: $ =>
|
|
||||||
WHITESPACE,
|
|
||||||
|
|
||||||
comment: $ =>
|
|
||||||
COMMENT,
|
|
||||||
|
|
||||||
dis_expr: $ =>
|
|
||||||
seq(field('marker', "#_"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
_form: $ =>
|
|
||||||
choice($.num_lit, // atom-ish
|
|
||||||
$.kwd_lit,
|
|
||||||
$.str_lit,
|
|
||||||
$.char_lit,
|
|
||||||
$.nil_lit,
|
|
||||||
$.bool_lit,
|
|
||||||
$.sym_lit,
|
|
||||||
// basic collection-ish
|
|
||||||
$.list_lit,
|
|
||||||
$.map_lit,
|
|
||||||
$.vec_lit,
|
|
||||||
// dispatch reader macros
|
|
||||||
$.set_lit,
|
|
||||||
$.anon_fn_lit,
|
|
||||||
$.regex_lit,
|
|
||||||
$.read_cond_lit,
|
|
||||||
$.splicing_read_cond_lit,
|
|
||||||
$.ns_map_lit,
|
|
||||||
$.var_quoting_lit,
|
|
||||||
$.sym_val_lit,
|
|
||||||
$.evaling_lit,
|
|
||||||
$.tagged_or_ctor_lit,
|
|
||||||
// some other reader macros
|
|
||||||
$.derefing_lit,
|
|
||||||
$.quoting_lit,
|
|
||||||
$.syn_quoting_lit,
|
|
||||||
$.unquote_splicing_lit,
|
|
||||||
$.unquoting_lit),
|
|
||||||
|
|
||||||
num_lit: $ =>
|
|
||||||
NUMBER,
|
|
||||||
|
|
||||||
kwd_lit: $ =>
|
|
||||||
choice($._kwd_leading_slash,
|
|
||||||
$._kwd_just_slash,
|
|
||||||
$._kwd_qualified,
|
|
||||||
$._kwd_unqualified),
|
|
||||||
|
|
||||||
// (namespace :/usr/bin/env) ; => ""
|
|
||||||
// (name :/usr/bin/env) ; => "usr/bin/env"
|
|
||||||
_kwd_leading_slash: $ =>
|
|
||||||
seq(field('marker', $._kwd_marker),
|
|
||||||
field('delimiter', NS_DELIMITER),
|
|
||||||
field('name', alias(KEYWORD_NAMESPACED_BODY, $.kwd_name))),
|
|
||||||
|
|
||||||
// (namespace :/) ;=> nil
|
|
||||||
// (name :/) ;=> "/"
|
|
||||||
_kwd_just_slash: $ =>
|
|
||||||
seq(field('marker', $._kwd_marker),
|
|
||||||
field('name', alias(NS_DELIMITER, $.kwd_name))),
|
|
||||||
|
|
||||||
_kwd_qualified: $ =>
|
|
||||||
prec(2, seq(field('marker', $._kwd_marker),
|
|
||||||
field('namespace', alias(KEYWORD_NO_SIGIL, $.kwd_ns)),
|
|
||||||
field('delimiter', NS_DELIMITER),
|
|
||||||
field('name', alias(KEYWORD_NAMESPACED_BODY, $.kwd_name)))),
|
|
||||||
|
|
||||||
_kwd_unqualified: $ =>
|
|
||||||
prec(1, seq(field('marker', $._kwd_marker),
|
|
||||||
field('name', alias(KEYWORD_NO_SIGIL, $.kwd_name)))),
|
|
||||||
|
|
||||||
_kwd_marker: $ =>
|
|
||||||
choice(KEYWORD_MARK, AUTO_RESOLVE_MARK),
|
|
||||||
|
|
||||||
str_lit: $ =>
|
|
||||||
STRING,
|
|
||||||
|
|
||||||
char_lit: $ =>
|
|
||||||
CHARACTER,
|
|
||||||
|
|
||||||
nil_lit: $ =>
|
|
||||||
NIL,
|
|
||||||
|
|
||||||
bool_lit: $ =>
|
|
||||||
BOOLEAN,
|
|
||||||
|
|
||||||
sym_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
choice($._sym_qualified, $._sym_unqualified)),
|
|
||||||
|
|
||||||
_sym_qualified: $ =>
|
|
||||||
prec(1, seq(field("namespace", alias(SYMBOL, $.sym_ns)),
|
|
||||||
field("delimiter", NS_DELIMITER),
|
|
||||||
field("name", alias(SYMBOL_NAMESPACED_NAME, $.sym_name)))),
|
|
||||||
|
|
||||||
_sym_unqualified: $ =>
|
|
||||||
field('name', alias(choice(NS_DELIMITER, // division symbol
|
|
||||||
SYMBOL),
|
|
||||||
$.sym_name)),
|
|
||||||
|
|
||||||
_metadata_lit: $ =>
|
|
||||||
seq(choice(field("meta", $.meta_lit),
|
|
||||||
field("old_meta", $.old_meta_lit)),
|
|
||||||
optional(repeat($._gap))),
|
|
||||||
|
|
||||||
meta_lit: $ =>
|
|
||||||
seq(field('marker', "^"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
old_meta_lit: $ =>
|
|
||||||
seq(field('marker', "#^"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
list_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
$._bare_list_lit),
|
|
||||||
|
|
||||||
_bare_list_lit: $ =>
|
|
||||||
seq(field('open', "("),
|
|
||||||
repeat(choice(field('value', $._form),
|
|
||||||
$._gap)),
|
|
||||||
field('close', ")")),
|
|
||||||
|
|
||||||
map_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
$._bare_map_lit),
|
|
||||||
|
|
||||||
_bare_map_lit: $ =>
|
|
||||||
seq(field('open', "{"),
|
|
||||||
repeat(choice(field('value', $._form),
|
|
||||||
$._gap)),
|
|
||||||
field('close', "}")),
|
|
||||||
|
|
||||||
vec_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
$._bare_vec_lit),
|
|
||||||
|
|
||||||
_bare_vec_lit: $ =>
|
|
||||||
seq(field('open', "["),
|
|
||||||
repeat(choice(field('value', $._form),
|
|
||||||
$._gap)),
|
|
||||||
field('close', "]")),
|
|
||||||
|
|
||||||
set_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
$._bare_set_lit),
|
|
||||||
|
|
||||||
_bare_set_lit: $ =>
|
|
||||||
seq(field('marker', "#"),
|
|
||||||
field('open', "{"),
|
|
||||||
repeat(choice(field('value', $._form),
|
|
||||||
$._gap)),
|
|
||||||
field('close', "}")),
|
|
||||||
|
|
||||||
anon_fn_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#"),
|
|
||||||
$._bare_list_lit),
|
|
||||||
|
|
||||||
regex_lit: $ =>
|
|
||||||
seq(field('marker', "#"),
|
|
||||||
STRING),
|
|
||||||
|
|
||||||
read_cond_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#?"),
|
|
||||||
// whitespace possible, but neither comment nor discard
|
|
||||||
repeat($._ws),
|
|
||||||
$._bare_list_lit),
|
|
||||||
|
|
||||||
splicing_read_cond_lit: $ =>
|
|
||||||
// XXX: metadata here doesn't seem to make sense, but the repl
|
|
||||||
// will accept: [^:x #?@(:clj [[:a]] :cljr [[:b]])]
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#?@"),
|
|
||||||
// whitespace possible, but neither comment nor discard
|
|
||||||
repeat($._ws),
|
|
||||||
$._bare_list_lit),
|
|
||||||
|
|
||||||
auto_res_mark: $ =>
|
|
||||||
AUTO_RESOLVE_MARK,
|
|
||||||
|
|
||||||
ns_map_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#"),
|
|
||||||
field('prefix', choice($.auto_res_mark,
|
|
||||||
$.kwd_lit)),
|
|
||||||
repeat($._gap),
|
|
||||||
$._bare_map_lit),
|
|
||||||
|
|
||||||
var_quoting_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#'"),
|
|
||||||
repeat($._gap),
|
|
||||||
// XXX: symbol, reader conditional, and tagged literal can work
|
|
||||||
// any other things?
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
sym_val_lit: $ =>
|
|
||||||
seq(field('marker', "##"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
evaling_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit), // ^:x #=(vector 1)
|
|
||||||
field('marker', "#="),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', choice($.list_lit,
|
|
||||||
$.read_cond_lit,
|
|
||||||
// #= ^:a java.lang.String
|
|
||||||
$.sym_lit))),
|
|
||||||
|
|
||||||
// #uuid "00000000-0000-0000-0000-000000000000"
|
|
||||||
// #user.Fun[1 2]
|
|
||||||
// #user.Fun{:a 1 :b 2}
|
|
||||||
tagged_or_ctor_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "#"),
|
|
||||||
// # uuid "00000000-0000-0000-0000-000000000000"
|
|
||||||
// # #_ 1 uuid "00000000-0000-0000-0000-000000000000"
|
|
||||||
// etc.
|
|
||||||
repeat($._gap),
|
|
||||||
// # ^:a uuid "00000000-0000-0000-0000-000000000000"
|
|
||||||
field('tag', $.sym_lit),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
derefing_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "@"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
quoting_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "'"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
syn_quoting_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "`"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
unquote_splicing_lit: $ =>
|
|
||||||
// XXX: metadata here doesn't seem to make sense, but the repl
|
|
||||||
// will accept: `(^:x ~@[:a :b :c])
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "~@"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
|
|
||||||
unquoting_lit: $ =>
|
|
||||||
seq(repeat($._metadata_lit),
|
|
||||||
field('marker', "~"),
|
|
||||||
repeat($._gap),
|
|
||||||
field('value', $._form)),
|
|
||||||
}
|
|
||||||
});
|
|
||||||
|
|
||||||
// Local Variables:
|
|
||||||
// mode: js-mode
|
|
||||||
// js-indent-align-list-continuation: t
|
|
||||||
// js-indent-level: 2
|
|
||||||
// End:
|
|
||||||
@ -1,16 +0,0 @@
|
|||||||
{
|
|
||||||
"name": "tree-sitter-clojure",
|
|
||||||
"version": "0.0.13",
|
|
||||||
"description": "Clojure grammar for tree-sitter",
|
|
||||||
"tree-sitter": [
|
|
||||||
{
|
|
||||||
"scope": "source.clojure",
|
|
||||||
"file-types": [
|
|
||||||
"bb",
|
|
||||||
"clj",
|
|
||||||
"cljc",
|
|
||||||
"cljs"
|
|
||||||
]
|
|
||||||
}
|
|
||||||
]
|
|
||||||
}
|
|
||||||
@ -1,29 +0,0 @@
|
|||||||
;; Literals
|
|
||||||
|
|
||||||
(num_lit) @number
|
|
||||||
|
|
||||||
[
|
|
||||||
(char_lit)
|
|
||||||
(str_lit)
|
|
||||||
] @string
|
|
||||||
|
|
||||||
[
|
|
||||||
(bool_lit)
|
|
||||||
(nil_lit)
|
|
||||||
] @constant.builtin
|
|
||||||
|
|
||||||
(kwd_lit) @constant
|
|
||||||
|
|
||||||
;; Comments
|
|
||||||
|
|
||||||
(comment) @comment
|
|
||||||
|
|
||||||
;; Treat quasiquotation as operators for the purpose of highlighting.
|
|
||||||
|
|
||||||
[
|
|
||||||
"'"
|
|
||||||
"`"
|
|
||||||
"~"
|
|
||||||
"@"
|
|
||||||
"~@"
|
|
||||||
] @operator
|
|
||||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -1,230 +0,0 @@
|
|||||||
#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
|
|
||||||
|
|
||||||
#ifndef TREE_SITTER_API_H_
|
|
||||||
typedef uint16_t TSStateId;
|
|
||||||
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
|
|
||||||
*/
|
|
||||||
|
|
||||||
#ifdef _MSC_VER
|
|
||||||
#define UNUSED __pragma(warning(suppress : 4101))
|
|
||||||
#else
|
|
||||||
#define UNUSED __attribute__((unused))
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#define START_LEXER() \
|
|
||||||
bool result = false; \
|
|
||||||
bool skip = false; \
|
|
||||||
UNUSED \
|
|
||||||
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_
|
|
||||||
@ -1,24 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Empty Anonymous Function
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#()
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(anon_fn_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Anonymous Function
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#(+ % 8)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(anon_fn_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)))
|
|
||||||
@ -1,21 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
True
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
true
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(bool_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
False
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
false
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(bool_lit))
|
|
||||||
@ -1,43 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Char
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
\a
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(char_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Octal Char
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
\o377
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(char_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Named Char
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
\backspace
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(char_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Unicode Char
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
\u611B
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(char_lit))
|
|
||||||
@ -1,34 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Comment
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
; a comment
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(comment))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Two semicolons
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
;; another comment
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(comment))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Multiple lines
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
;; first line
|
|
||||||
;; second line
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(comment)
|
|
||||||
(comment))
|
|
||||||
@ -1,25 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Deref
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
@x
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(derefing_lit
|
|
||||||
(sym_lit (sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Deref of Call
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
@(ping y)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(derefing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name)))))
|
|
||||||
@ -1,68 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Discard Number
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#_ 1
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(dis_expr
|
|
||||||
(num_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Discard List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#_ (+ 1 1)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(dis_expr
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)
|
|
||||||
(num_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Discard Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#_ {:a 1
|
|
||||||
:b 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(dis_expr
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Discard Multiple
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(let [x 1
|
|
||||||
#_ #_ y 2]
|
|
||||||
(+ x 2))
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(vec_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)
|
|
||||||
(dis_expr
|
|
||||||
(dis_expr
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(num_lit)))
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,14 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Not Officially Supported
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#=(+ 1 1)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(evaling_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,102 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
:smile
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Keyword with Prefix
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
:fun/day
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_ns)
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Autoresolving Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
::run
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Autoresolving Aliased Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
::slow/dance
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_ns)
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Division Symbol Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
:/
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Namespaced Division Symbol Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
:clojure.core//
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_ns)
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Autoresolving Division Symbol Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
::/
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Autoresolving Aliased Division Symbol Keyword
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
::clojure//
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_ns)
|
|
||||||
(kwd_name)))
|
|
||||||
|
|
||||||
@ -1,101 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Empty List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
()
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
List with Keywords
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(:a :b :c)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Call with Anonymous Function
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(#(+ % 1) 1)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(anon_fn_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit))
|
|
||||||
(num_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Map Lookup
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
({:a 1} :a)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))
|
|
||||||
(kwd_lit (kwd_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Map Lookup Alternate
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(:b {:b 2})
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Set Lookup
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(#{:c :e} :e)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(set_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name)))
|
|
||||||
(kwd_lit (kwd_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Call with Symbol with Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(.get ^ByteBuffer b)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit
|
|
||||||
(meta_lit
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(sym_name))))
|
|
||||||
@ -1,66 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Empty Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Simple Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
{:a 1 :b 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Deeper Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
{:paths ["src"]
|
|
||||||
:deps {clj-kondo/clj-kondo {:mvn/version "2020.09.09"}}}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(vec_lit
|
|
||||||
(str_lit))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(map_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_ns)
|
|
||||||
(sym_name))
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_ns)
|
|
||||||
(kwd_name))
|
|
||||||
(str_lit)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Map with Comma
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
{:x 1,
|
|
||||||
:y 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))
|
|
||||||
@ -1,137 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Symbol Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^String []
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(meta_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Keyword Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^:private {}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(meta_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
String Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^"gnarly" {}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(meta_lit
|
|
||||||
(str_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Map Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^{:x 0 :y 1} #{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(meta_lit
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name))
|
|
||||||
(num_lit)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Reader Conditional Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^#?(:clj "vanilla" :cljr "strawberry" :cljs "chocolate") []
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(meta_lit
|
|
||||||
(read_cond_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name))
|
|
||||||
(str_lit)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Multiple Bits of Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^:wake ^:sit ^:sleep #{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(meta_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
(meta_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))
|
|
||||||
(meta_lit
|
|
||||||
(kwd_lit
|
|
||||||
(kwd_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Tagged Literal Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^#/(data) thing
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_lit
|
|
||||||
(meta_lit
|
|
||||||
(tagged_or_ctor_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))
|
|
||||||
(list_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name)))))
|
|
||||||
(sym_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Evaling Literal Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
^#=(keyword "a") []
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(meta_lit
|
|
||||||
(evaling_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))
|
|
||||||
(str_lit))))))
|
|
||||||
@ -1,10 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Nil
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
nil
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(nil_lit))
|
|
||||||
@ -1,66 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Namespace Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#:prefix{:a 1 :b 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(ns_map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Nested Namespace Maps
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#:outer{:first "Terence"
|
|
||||||
:last "Tao"
|
|
||||||
:area #:inner{:name "Mathematics"}}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(ns_map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(ns_map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Autoresolving Namespace Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#::{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(ns_map_lit
|
|
||||||
(auto_res_mark)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Namespace Map that Autoresolves with Alias
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#::s{:x 1 :y 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(ns_map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))
|
|
||||||
@ -1,241 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Integer
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
1
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Integer
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-2
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
BigInt Integer
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
11N
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
BigDecimal Integer
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
99M
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Hex
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
0xaB
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Hex
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-0xFF
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Shouting Hex
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
0XA
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
BigInt Hex
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
0XeN
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Octal
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
013
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Octal
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-027
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
BigInt Octal
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
0377N
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Radix
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
2r0101010001
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Radix
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-10r256
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Shouting Radix
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
36RBREATHESL0WLY
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Ratio
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
22/7
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Ratio
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-1/2
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Double
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
1.0
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Negative Double
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
-2.71828
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Double with Exponent
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
3e8
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Shouting Double with Exponent
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
1E9
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Double with Negative Exponent
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
2e-1
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
BigDecimal Double with Exponent
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
3e1415926535M
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(num_lit))
|
|
||||||
@ -1,91 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Symbol Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^String []
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(sym_lit (sym_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Keyword Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^:private {}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(kwd_lit (kwd_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
String Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^"gnarly" {}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(map_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(str_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Map Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^{:x 0 :y 1} #{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Reader Conditional Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^#?(:clj "vanilla" :cljr "strawberry" :cljs "chocolate") []
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(read_cond_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(str_lit)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Multiple Bits of Metadata
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#^:wake #^:sit #^:sleep #{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(old_meta_lit
|
|
||||||
(kwd_lit (kwd_name)))
|
|
||||||
(old_meta_lit
|
|
||||||
(kwd_lit (kwd_name)))
|
|
||||||
(old_meta_lit
|
|
||||||
(kwd_lit (kwd_name)))))
|
|
||||||
@ -1,26 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Quoted Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
'a-sym
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(quoting_lit
|
|
||||||
(sym_lit (sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Quoted List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
'(1 2 3)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(quoting_lit
|
|
||||||
(list_lit
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,18 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Platform Reader Conditional
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#?(:clj :clj
|
|
||||||
:cljr :cljr
|
|
||||||
:cljs :cljs)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(read_cond_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))))
|
|
||||||
@ -1,21 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Regular Expression
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#"."
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(regex_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Hex Digits Regular Expression
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#"[0-9a-fA-F]+"
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(regex_lit))
|
|
||||||
@ -1,41 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Empty Set
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#{}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Simple Set
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#{:i :j :k}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Nested Sets
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#{#{1} #{#{0} 2}}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(set_lit
|
|
||||||
(set_lit
|
|
||||||
(num_lit))
|
|
||||||
(set_lit
|
|
||||||
(set_lit
|
|
||||||
(num_lit))
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,27 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Splicing Reader Conditional
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(list '*
|
|
||||||
#?@(:clj [x y] :cljr [i j] :cljs [a b]))
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(quoting_lit
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(splicing_read_cond_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(vec_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(vec_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(vec_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))))))
|
|
||||||
@ -1,33 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple String
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
"hello there"
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(str_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
String with Escapes
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
"first line\nsecond\tline"
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(str_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Multiline String
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
"this is the first line
|
|
||||||
and what is this one?"
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(str_lit))
|
|
||||||
@ -1,63 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Simple Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
def
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Symbol with Prefix
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
clojure.string/blank?
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_lit
|
|
||||||
(sym_ns)
|
|
||||||
(sym_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Division Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
/
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_lit
|
|
||||||
(sym_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Namespaced Division Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
clojure.core//
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_lit
|
|
||||||
(sym_ns)
|
|
||||||
(sym_name)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Division Symbol followed by delimiter
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
(+ - * /)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(sym_lit (sym_name))))
|
|
||||||
@ -1,55 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Inf
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
##Inf
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_val_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
-Inf
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
##-Inf
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_val_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
NaN
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
##NaN
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_val_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Symbolic Value Literal with Evaling Literal
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
###=(identity NaN)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(sym_val_lit
|
|
||||||
(evaling_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))
|
|
||||||
(sym_lit
|
|
||||||
(sym_name))))))
|
|
||||||
@ -1,27 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Syntax Quoted Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`a-sym
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(sym_lit (sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Syntax Quoted List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`(+ ~a 1)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(unquoting_lit
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,44 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Tagged Literal
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#uuid "00000000-0000-0000-0000-000000000000"
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(tagged_or_ctor_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(str_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Constructor
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#user.Fun [1 2]
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(tagged_or_ctor_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(vec_lit
|
|
||||||
(num_lit)
|
|
||||||
(num_lit))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Constructor Alternate
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#user.Fun {:a 1 :b 2}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(tagged_or_ctor_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))))
|
|
||||||
@ -1,75 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Unquote Splicing into List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`(+ ~@(list 2 3))
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(unquote_splicing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)
|
|
||||||
(num_lit))))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Unquote Splicing into Vector
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`[:a ~@(list :b :c)]
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(vec_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(unquote_splicing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name)))))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Unquote Splicing into Set
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`#{:i ~@(list :j :k)}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(set_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(unquote_splicing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(kwd_lit (kwd_name)))))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Unquote Splicing into Map
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`{~@(list :a 1) ~@(list :b 2)}
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(map_lit
|
|
||||||
(unquote_splicing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)))
|
|
||||||
(unquote_splicing_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))))))
|
|
||||||
@ -1,30 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Unquoting Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`~a
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(unquoting_lit
|
|
||||||
(sym_lit (sym_name)))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Unquoting List
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
`(dec ~(+ 1 a))
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(syn_quoting_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(unquoting_lit
|
|
||||||
(list_lit
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(num_lit)
|
|
||||||
(sym_lit (sym_name)))))))
|
|
||||||
@ -1,29 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Var Quoting a Symbol
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#'my-sym
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(var_quoting_lit
|
|
||||||
(sym_lit (sym_name))))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Var Quoting with Reader Conditional
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
#'#?(:clj my-sym :cljr your-sym :cljs their-sym)
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(var_quoting_lit
|
|
||||||
(read_cond_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(sym_lit (sym_name))
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(sym_lit (sym_name)))))
|
|
||||||
@ -1,48 +0,0 @@
|
|||||||
================================================================================
|
|
||||||
Empty Vector
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
[]
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Vector with Numbers
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
[1 1 2 3 5 8]
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)
|
|
||||||
(num_lit)))
|
|
||||||
|
|
||||||
================================================================================
|
|
||||||
Vector with Different Types
|
|
||||||
================================================================================
|
|
||||||
|
|
||||||
[:a 1 'fun {:x 1 :y 2} #{}]
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
(source
|
|
||||||
(vec_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(quoting_lit
|
|
||||||
(sym_lit (sym_name)))
|
|
||||||
(map_lit
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit)
|
|
||||||
(kwd_lit (kwd_name))
|
|
||||||
(num_lit))
|
|
||||||
(set_lit)))
|
|
||||||
Loading…
Reference in New Issue