From c4edb8d299b4e9e2054d909bc89333808a795e32 Mon Sep 17 00:00:00 2001 From: sebthom Date: Thu, 26 Sep 2024 18:27:14 +0200 Subject: [PATCH] feat: add COBOL syntax highlighting --- README.md | 2 + plugin/plugin.xml | 32 ++ plugin/syntaxes/cobol/LICENSE.txt | 277 ++++++++++++++++++ plugin/syntaxes/cobol/cobol.example.cob | 94 ++++++ .../cobol/cobol.language-configuration.json | 27 ++ plugin/syntaxes/cobol/cobol.tmLanguage.json | 175 +++++++++++ plugin/syntaxes/cobol/icon.png | Bin 0 -> 360 bytes plugin/syntaxes/cobol/icon@2x.png | Bin 0 -> 823 bytes .../meta.embedded.block.cics.tmLanguage.json | 66 +++++ .../meta.embedded.block.sql.tmLanguage.json | 43 +++ plugin/updater/updater-config.yaml | 9 + plugin/updater/updater-state.yaml | 21 ++ 12 files changed, 746 insertions(+) create mode 100644 plugin/syntaxes/cobol/LICENSE.txt create mode 100644 plugin/syntaxes/cobol/cobol.example.cob create mode 100644 plugin/syntaxes/cobol/cobol.language-configuration.json create mode 100644 plugin/syntaxes/cobol/cobol.tmLanguage.json create mode 100644 plugin/syntaxes/cobol/icon.png create mode 100644 plugin/syntaxes/cobol/icon@2x.png create mode 100644 plugin/syntaxes/cobol/meta.embedded.block.cics.tmLanguage.json create mode 100644 plugin/syntaxes/cobol/meta.embedded.block.sql.tmLanguage.json diff --git a/README.md b/README.md index ada1951..1b8c9ab 100644 --- a/README.md +++ b/README.md @@ -22,6 +22,7 @@ This [EclipseⓇ](https://eclipse.org) plug-in adds syntax highlighting support - Astro - https://astro.build/ - Bazel - https://bazel.build/ - BF - https://en.wikipedia.org/wiki/Brainfuck +- COBOL - https://en.wikipedia.org/wiki/COBOL - Crystal (`*.cr` - https://crystal-lang.org/ - Eclipse External null Annotations (`*.eea`) - https://wiki.eclipse.org/JDT_Core/Null_Analysis/External_Annotations#File_format - Entity-Relationship Diagram (`*.er`) - https://github.com/BurntSushi/erd @@ -96,6 +97,7 @@ To install the plugin into an existing Eclipse installation do: | Astro | file-extensions="astro" | [main@withastro/language-tools](https://github.com/withastro/language-tools/tree/0c3f30e7aeaf3374f3d88e275e0e0b5e60d7f6fb/packages/vscode) | bazelrc | file-extensions="bazelrc"
file-names=".bazelrc, bazel.rc" | [master@bazelbuild/vscode-bazel](https://github.com/bazelbuild/vscode-bazel/tree/b4a8b0cc23d280a774cd1272e2979385818bbef0/) | Branflakes | file-extensions="bf, bfsck, brainfuck" | [main@chrisvrose/bf-server](https://github.com/chrisvrose/bf-server/tree/e8ce9b73ae31ada02a4127891b4ba1c0bad8ee50/) +| COBOL | file-extensions="cbl, cob, cobol, copy, cpy"
file-patterns="\*\*/broadcommfd.cobol-language-support/\*/copybooks/\*\*" | [development@eclipse-che4z/che-che4z-lsp-for-cobol](https://github.com/eclipse-che4z/che-che4z-lsp-for-cobol/tree/348b036186373411b58131b390eb7b53ceab9adf/clients/cobol-lsp-vscode-extension) | Crystal | file-extensions="cr" | [master@crystal-lang-tools/vscode-crystal-lang](https://github.com/crystal-lang-tools/vscode-crystal-lang/tree/34b86beaffa85c5639e86519f7b16db58b04a923/) [[upstream]](https://github.com/Microsoft/vscode/blob/3f1f36333d3453f67a36b6bfb1206e9159e9c4f0/extensions/ruby/syntaxes/ruby.tmLanguage.json) | Crystal Slang | file-extensions="slang" | [master@crystal-lang-tools/vscode-crystal-lang](https://github.com/crystal-lang-tools/vscode-crystal-lang/tree/34b86beaffa85c5639e86519f7b16db58b04a923/) | Embedded Crystal | file-extensions="ecr" | [master@crystal-lang-tools/vscode-crystal-lang](https://github.com/crystal-lang-tools/vscode-crystal-lang/tree/34b86beaffa85c5639e86519f7b16db58b04a923/) diff --git a/plugin/plugin.xml b/plugin/plugin.xml index 84b1f7f..535b936 100644 --- a/plugin/plugin.xml +++ b/plugin/plugin.xml @@ -162,6 +162,38 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/plugin/syntaxes/cobol/LICENSE.txt b/plugin/syntaxes/cobol/LICENSE.txt new file mode 100644 index 0000000..e23ece2 --- /dev/null +++ b/plugin/syntaxes/cobol/LICENSE.txt @@ -0,0 +1,277 @@ +Eclipse Public License - v 2.0 + + THE ACCOMPANYING PROGRAM IS PROVIDED UNDER THE TERMS OF THIS ECLIPSE + PUBLIC LICENSE ("AGREEMENT"). ANY USE, REPRODUCTION OR DISTRIBUTION + OF THE PROGRAM CONSTITUTES RECIPIENT'S ACCEPTANCE OF THIS AGREEMENT. + +1. DEFINITIONS + +"Contribution" means: + + a) in the case of the initial Contributor, the initial content + Distributed under this Agreement, and + + b) in the case of each subsequent Contributor: + i) changes to the Program, and + ii) additions to the Program; + where such changes and/or additions to the Program originate from + and are Distributed by that particular Contributor. A Contribution + "originates" from a Contributor if it was added to the Program by + such Contributor itself or anyone acting on such Contributor's behalf. + Contributions do not include changes or additions to the Program that + are not Modified Works. + +"Contributor" means any person or entity that Distributes the Program. + +"Licensed Patents" mean patent claims licensable by a Contributor which +are necessarily infringed by the use or sale of its Contribution alone +or when combined with the Program. + +"Program" means the Contributions Distributed in accordance with this +Agreement. + +"Recipient" means anyone who receives the Program under this Agreement +or any Secondary License (as applicable), including Contributors. + +"Derivative Works" shall mean any work, whether in Source Code or other +form, that is based on (or derived from) the Program and for which the +editorial revisions, annotations, elaborations, or other modifications +represent, as a whole, an original work of authorship. + +"Modified Works" shall mean any work in Source Code or other form that +results from an addition to, deletion from, or modification of the +contents of the Program, including, for purposes of clarity any new file +in Source Code form that contains any contents of the Program. Modified +Works shall not include works that contain only declarations, +interfaces, types, classes, structures, or files of the Program solely +in each case in order to link to, bind by name, or subclass the Program +or Modified Works thereof. + +"Distribute" means the acts of a) distributing or b) making available +in any manner that enables the transfer of a copy. + +"Source Code" means the form of a Program preferred for making +modifications, including but not limited to software source code, +documentation source, and configuration files. + +"Secondary License" means either the GNU General Public License, +Version 2.0, or any later versions of that license, including any +exceptions or additional permissions as identified by the initial +Contributor. + +2. GRANT OF RIGHTS + + a) Subject to the terms of this Agreement, each Contributor hereby + grants Recipient a non-exclusive, worldwide, royalty-free copyright + license to reproduce, prepare Derivative Works of, publicly display, + publicly perform, Distribute and sublicense the Contribution of such + Contributor, if any, and such Derivative Works. + + b) Subject to the terms of this Agreement, each Contributor hereby + grants Recipient a non-exclusive, worldwide, royalty-free patent + license under Licensed Patents to make, use, sell, offer to sell, + import and otherwise transfer the Contribution of such Contributor, + if any, in Source Code or other form. This patent license shall + apply to the combination of the Contribution and the Program if, at + the time the Contribution is added by the Contributor, such addition + of the Contribution causes such combination to be covered by the + Licensed Patents. The patent license shall not apply to any other + combinations which include the Contribution. No hardware per se is + licensed hereunder. + + c) Recipient understands that although each Contributor grants the + licenses to its Contributions set forth herein, no assurances are + provided by any Contributor that the Program does not infringe the + patent or other intellectual property rights of any other entity. + Each Contributor disclaims any liability to Recipient for claims + brought by any other entity based on infringement of intellectual + property rights or otherwise. As a condition to exercising the + rights and licenses granted hereunder, each Recipient hereby + assumes sole responsibility to secure any other intellectual + property rights needed, if any. For example, if a third party + patent license is required to allow Recipient to Distribute the + Program, it is Recipient's responsibility to acquire that license + before distributing the Program. + + d) Each Contributor represents that to its knowledge it has + sufficient copyright rights in its Contribution, if any, to grant + the copyright license set forth in this Agreement. + + e) Notwithstanding the terms of any Secondary License, no + Contributor makes additional grants to any Recipient (other than + those set forth in this Agreement) as a result of such Recipient's + receipt of the Program under the terms of a Secondary License + (if permitted under the terms of Section 3). + +3. REQUIREMENTS + +3.1 If a Contributor Distributes the Program in any form, then: + + a) the Program must also be made available as Source Code, in + accordance with section 3.2, and the Contributor must accompany + the Program with a statement that the Source Code for the Program + is available under this Agreement, and informs Recipients how to + obtain it in a reasonable manner on or through a medium customarily + used for software exchange; and + + b) the Contributor may Distribute the Program under a license + different than this Agreement, provided that such license: + i) effectively disclaims on behalf of all other Contributors all + warranties and conditions, express and implied, including + warranties or conditions of title and non-infringement, and + implied warranties or conditions of merchantability and fitness + for a particular purpose; + + ii) effectively excludes on behalf of all other Contributors all + liability for damages, including direct, indirect, special, + incidental and consequential damages, such as lost profits; + + iii) does not attempt to limit or alter the recipients' rights + in the Source Code under section 3.2; and + + iv) requires any subsequent distribution of the Program by any + party to be under a license that satisfies the requirements + of this section 3. + +3.2 When the Program is Distributed as Source Code: + + a) it must be made available under this Agreement, or if the + Program (i) is combined with other material in a separate file or + files made available under a Secondary License, and (ii) the initial + Contributor attached to the Source Code the notice described in + Exhibit A of this Agreement, then the Program may be made available + under the terms of such Secondary Licenses, and + + b) a copy of this Agreement must be included with each copy of + the Program. + +3.3 Contributors may not remove or alter any copyright, patent, +trademark, attribution notices, disclaimers of warranty, or limitations +of liability ("notices") contained within the Program from any copy of +the Program which they Distribute, provided that Contributors may add +their own appropriate notices. + +4. COMMERCIAL DISTRIBUTION + +Commercial distributors of software may accept certain responsibilities +with respect to end users, business partners and the like. While this +license is intended to facilitate the commercial use of the Program, +the Contributor who includes the Program in a commercial product +offering should do so in a manner which does not create potential +liability for other Contributors. Therefore, if a Contributor includes +the Program in a commercial product offering, such Contributor +("Commercial Contributor") hereby agrees to defend and indemnify every +other Contributor ("Indemnified Contributor") against any losses, +damages and costs (collectively "Losses") arising from claims, lawsuits +and other legal actions brought by a third party against the Indemnified +Contributor to the extent caused by the acts or omissions of such +Commercial Contributor in connection with its distribution of the Program +in a commercial product offering. The obligations in this section do not +apply to any claims or Losses relating to any actual or alleged +intellectual property infringement. In order to qualify, an Indemnified +Contributor must: a) promptly notify the Commercial Contributor in +writing of such claim, and b) allow the Commercial Contributor to control, +and cooperate with the Commercial Contributor in, the defense and any +related settlement negotiations. The Indemnified Contributor may +participate in any such claim at its own expense. + +For example, a Contributor might include the Program in a commercial +product offering, Product X. That Contributor is then a Commercial +Contributor. If that Commercial Contributor then makes performance +claims, or offers warranties related to Product X, those performance +claims and warranties are such Commercial Contributor's responsibility +alone. Under this section, the Commercial Contributor would have to +defend claims against the other Contributors related to those performance +claims and warranties, and if a court requires any other Contributor to +pay any damages as a result, the Commercial Contributor must pay +those damages. + +5. NO WARRANTY + +EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, AND TO THE EXTENT +PERMITTED BY APPLICABLE LAW, THE PROGRAM IS PROVIDED ON AN "AS IS" +BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS OR +IMPLIED INCLUDING, WITHOUT LIMITATION, ANY WARRANTIES OR CONDITIONS OF +TITLE, NON-INFRINGEMENT, MERCHANTABILITY OR FITNESS FOR A PARTICULAR +PURPOSE. Each Recipient is solely responsible for determining the +appropriateness of using and distributing the Program and assumes all +risks associated with its exercise of rights under this Agreement, +including but not limited to the risks and costs of program errors, +compliance with applicable laws, damage to or loss of data, programs +or equipment, and unavailability or interruption of operations. + +6. DISCLAIMER OF LIABILITY + +EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, AND TO THE EXTENT +PERMITTED BY APPLICABLE LAW, NEITHER RECIPIENT NOR ANY CONTRIBUTORS +SHALL HAVE ANY LIABILITY FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, +EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING WITHOUT LIMITATION LOST +PROFITS), HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN +CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) +ARISING IN ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE +EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE +POSSIBILITY OF SUCH DAMAGES. + +7. GENERAL + +If any provision of this Agreement is invalid or unenforceable under +applicable law, it shall not affect the validity or enforceability of +the remainder of the terms of this Agreement, and without further +action by the parties hereto, such provision shall be reformed to the +minimum extent necessary to make such provision valid and enforceable. + +If Recipient institutes patent litigation against any entity +(including a cross-claim or counterclaim in a lawsuit) alleging that the +Program itself (excluding combinations of the Program with other software +or hardware) infringes such Recipient's patent(s), then such Recipient's +rights granted under Section 2(b) shall terminate as of the date such +litigation is filed. + +All Recipient's rights under this Agreement shall terminate if it +fails to comply with any of the material terms or conditions of this +Agreement and does not cure such failure in a reasonable period of +time after becoming aware of such noncompliance. If all Recipient's +rights under this Agreement terminate, Recipient agrees to cease use +and distribution of the Program as soon as reasonably practicable. +However, Recipient's obligations under this Agreement and any licenses +granted by Recipient relating to the Program shall continue and survive. + +Everyone is permitted to copy and distribute copies of this Agreement, +but in order to avoid inconsistency the Agreement is copyrighted and +may only be modified in the following manner. The Agreement Steward +reserves the right to publish new versions (including revisions) of +this Agreement from time to time. No one other than the Agreement +Steward has the right to modify this Agreement. The Eclipse Foundation +is the initial Agreement Steward. The Eclipse Foundation may assign the +responsibility to serve as the Agreement Steward to a suitable separate +entity. Each new version of the Agreement will be given a distinguishing +version number. The Program (including Contributions) may always be +Distributed subject to the version of the Agreement under which it was +received. In addition, after a new version of the Agreement is published, +Contributor may elect to Distribute the Program (including its +Contributions) under the new version. + +Except as expressly stated in Sections 2(a) and 2(b) above, Recipient +receives no rights or licenses to the intellectual property of any +Contributor under this Agreement, whether expressly, by implication, +estoppel or otherwise. All rights in the Program not expressly granted +under this Agreement are reserved. Nothing in this Agreement is intended +to be enforceable by any entity that is not a Contributor or Recipient. +No third-party beneficiary rights are created under this Agreement. + +Exhibit A - Form of Secondary Licenses Notice + +"This Source Code may also be made available under the following +Secondary Licenses when the conditions for such availability set forth +in the Eclipse Public License, v. 2.0 are satisfied: {name license(s), +version(s), and exceptions or additional permissions here}." + + Simply including a copy of this Agreement, including this Exhibit A + is not sufficient to license the Source Code under Secondary Licenses. + + If it is not possible or desirable to put the notice in a particular + file, then You may include the notice in a location (such as a LICENSE + file in a relevant directory) where a recipient would be likely to + look for such a notice. + + You may add additional accurate notices of copyright ownership. \ No newline at end of file diff --git a/plugin/syntaxes/cobol/cobol.example.cob b/plugin/syntaxes/cobol/cobol.example.cob new file mode 100644 index 0000000..93727f8 --- /dev/null +++ b/plugin/syntaxes/cobol/cobol.example.cob @@ -0,0 +1,94 @@ +000100 IDENTIFICATION DIVISION. +000200 PROGRAM-ID. ExampleCOBOLProgram. +000300* This is the identification division where we name the program. + +000400 ENVIRONMENT DIVISION. +000500 INPUT-OUTPUT SECTION. +000600 FILE-CONTROL. +000700 SELECT EmployeeFile ASSIGN TO 'employee.txt' +000800 ORGANIZATION IS LINE SEQUENTIAL. +000900* The environment division describes the file handling. +001000* The SELECT statement defines the file we are going to read, +001100* and LINE SEQUENTIAL specifies it's a text file. + +001200 DATA DIVISION. +001300 FILE SECTION. +001400 FD EmployeeFile. +001500 01 EmployeeRecord. +001600 05 EmployeeID PIC 9(5). +001700 05 EmployeeName PIC A(20). +001800 05 EmployeeSalary PIC 9(6)V99. +001900* In the file section, we define the structure of the input file +002000* records. +002100* EmployeeID is a 5-digit number. +002200* EmployeeName is an alphanumeric string of 20 characters. +002300* EmployeeSalary is a numeric value with 6 digits before and 2 +002400* digits after the decimal point. + +002500 WORKING-STORAGE SECTION. +002600 01 WS-Totals. +002700 05 WS-EmployeeCount PIC 9(5) VALUE 0. +002800 05 WS-TotalSalary PIC 9(8)V99 VALUE 0. +002900* The working-storage section contains variables for counting +003000* employees and accumulating the total salary. +003100* WS-EmployeeCount starts at 0, and WS-TotalSalary starts at 0.00. + +003200 01 WS-EndOfFile PIC X VALUE 'N'. +003300* A flag to indicate the end of the file, initially set to 'N' +003400* (No). + +003500 01 WS-DisplayData. +003600 05 WS-DisplayID PIC 9(5). +003700 05 WS-DisplayName PIC A(20). +003800 05 WS-DisplaySalary PIC 9(6)V99. +003900* These variables will hold the employee details temporarily for +004000* display purposes. + +004100 PROCEDURE DIVISION. +004200 Main-Processing. +004300 OPEN INPUT EmployeeFile +004400* Open the input file for reading. + +004500 PERFORM UNTIL WS-EndOfFile = 'Y' +004600 READ EmployeeFile +004700 AT END +004800 MOVE 'Y' TO WS-EndOfFile +004900* If the end of the file is reached, set WS-EndOfFile to 'Y'. +005000 NOT AT END +005100 PERFORM Process-Record +005200* If we have not reached the end, process the current record. +005300 END-READ +005400 END-PERFORM +005500* Keep reading and processing records until the end of the file. + +005600 CLOSE EmployeeFile +005700* Close the file after processing all records. + +005800 PERFORM Display-Results +005900* Display the final results after all records have been +006000* processed. + +006100 STOP RUN. +006200* End the program. + +006300 Process-Record. +006400 ADD 1 TO WS-EmployeeCount +006500* Increment the employee count by 1. + +006600 ADD EmployeeSalary TO WS-TotalSalary +006700* Add the current employee's salary to the total salary. + +006800 MOVE EmployeeID TO WS-DisplayID +006900 MOVE EmployeeName TO WS-DisplayName +007000 MOVE EmployeeSalary TO WS-DisplaySalary +007100* Move the current employee's details to display variables. + +007200 DISPLAY 'Processing: ' WS-DisplayID ' ' WS-DisplayName ' ' +007300 WS-DisplaySalary. +007400* Display the employee's details. + +007500 Display-Results. +007600 DISPLAY 'Total Employees Processed: ' WS-EmployeeCount +007700 DISPLAY 'Total Salary: ' WS-TotalSalary. +007800* Display the final results: the total number of employees and +007900* the total salary. diff --git a/plugin/syntaxes/cobol/cobol.language-configuration.json b/plugin/syntaxes/cobol/cobol.language-configuration.json new file mode 100644 index 0000000..90507a0 --- /dev/null +++ b/plugin/syntaxes/cobol/cobol.language-configuration.json @@ -0,0 +1,27 @@ +{ + "wordPattern": "[\\w-]+", + "brackets": [ + ["{", "}"], + ["[", "]"], + ["(", ")"] + ], + "autoClosingPairs": [ + { "open": "{", "close": "}" }, + { "open": "[", "close": "]" }, + { "open": "(", "close": ")" }, + { "open": "'", "close": "'", "notIn": ["string", "comment"] }, + { "open": "\"", "close": "\"", "notIn": ["string"] }, + { "open": "`", "close": "`", "notIn": ["string", "comment"] }, + { "open": "EXEC SQL", "close": "END-EXEC", "notIn": ["string", "comment"] }, + { "open": "EXEC CICS", "close": "END-EXEC", "notIn": ["string", "comment"] } + ], + "autoCloseBefore": ";:.,=}])>` \n\t", + "surroundingPairs": [ + ["{", "}"], + ["[", "]"], + ["(", ")"], + ["'", "'"], + ["\"", "\""], + ["`", "`"] + ] +} diff --git a/plugin/syntaxes/cobol/cobol.tmLanguage.json b/plugin/syntaxes/cobol/cobol.tmLanguage.json new file mode 100644 index 0000000..739e883 --- /dev/null +++ b/plugin/syntaxes/cobol/cobol.tmLanguage.json @@ -0,0 +1,175 @@ +{ + "scopeName": "source.cobol", + "patterns": [ + { + "include": "#cobol-source" + } + ], + "repository": { + "cobol-source": { + "patterns": [ + { + "include": "#comment-cobol-source" + }, + { + "include": "#sequence-number-area" + }, + { + "include": "#exec-sql-block" + }, + { + "include": "#exec-cics-block" + }, + { + "include": "#number-constant" + }, + { + "include": "#comment-floating" + }, + { + "include": "#string-quoted-constant" + }, + { + "include": "#string-double-quoted-constant" + }, + { + "include": "#picture" + }, + { + "include": "#db2-host-var-definition" + }, + { + "include": "#cobol-keywords" + }, + { + "include": "#cobol-preprocessor-keywords" + } + ] + }, + "comment-cobol-source": { + "match": "^(.{6})(\\/.*|\\*.*)$", + "captures": { + "1": { + "name": "constant.numeric.integer" + }, + "2": { + "name": "comment.line.cobol.fixed" + } + } + }, + "sequence-number-area": { + "match": "^.{6}", + "name": "constant.numeric.integer" + }, + "comment-floating": { + "match": "\\s\\*>.*", + "name": "comment.line.cobol.floating" + }, + "number-constant": { + "match": "(?Vf;2fU|LW2OK7#z`>>HUP8tHi*k-&_E|oY|Bs40QRG2^ z&2R=1+Hk=eP6_`XmvsHV7hm!JeoD>%Cp8oQKdJ8je@?&@NKZg902EUU&}f1SK5Ly0 zrq7F8gAKT-=<@$*<5a8$fb?P*a4)v(|AWlN|M!!sfVdj$>=zRk{XffZ^8ayp52gWU z(Yye{=R_=EAq}?qERPYKkKqMSKwt~Nt0uwV00iNy#=%$v8599nqw#i7?*HfAbN|1d zvl@&+Y>*h%XrwqHQ6(u;oSD$GGc_}( zsn}Xs`*Bbz3;6o8?3|%SXsFNuCLHF1jsz8}fW!y>lf~s^PAv-sG}ykB9<^5E!IC0{Nz= zf~zWAF;i_3Sne(nCYw;4MJ|?`CC}Dwrj|9O+_Q|YB(C-ss#rrr7RogC=N9{R7i*7{ zOnKTHL?)4~`{xUxJkyB0p1?Sj)a~fvH0z$V zyCE?-t@}OdX0U$iG4^fP2NMsU!qltx5WH|R%Yf0Ad(;!-51zo6^?OYjfPIBg8q0i4 zJj{3l5Iolm-pz+0-tB=v{pGX)Vdo3*Zfk(C`;TGr*&A~P5Z#R0$?`INt2<5N>6`P$ z#{JM&bx;!m(N+VAshCLv_z0u4)BH?(RHJ z5N+>*=({eEeuQA)=oKX##Mr;zM~sF*CkZo-Rx0-ClDfj7 z42vm5#S$$<2sX{&y`jciFnIC?od?f1Q^NV+iR*OF3~o$=SC_$NG~9FtbBEhOmlRFm-H#+dRsG!vhZj@+k z$wa=z4y;tE*AD{{bRc=F2KO(S!g1002ovPDHLkV1m6$ BhBg2I literal 0 HcmV?d00001 diff --git a/plugin/syntaxes/cobol/meta.embedded.block.cics.tmLanguage.json b/plugin/syntaxes/cobol/meta.embedded.block.cics.tmLanguage.json new file mode 100644 index 0000000..8a96389 --- /dev/null +++ b/plugin/syntaxes/cobol/meta.embedded.block.cics.tmLanguage.json @@ -0,0 +1,66 @@ +{ + "scopeName": "meta.embedded.block.cics", + "injectionSelector": ["R:cics.embedded.code", "L:string.quoted.cics.cobol"], + "patterns": [ + { + "include": "#cics-injection" + } + ], + "repository": { + "cics-injection": { + "patterns": [ + { + "include": "#cics-keywords" + }, + { + "include": "#number-constant" + }, + { + "include": "#string-quoted-constant" + }, + { + "include": "#string-double-quoted-constant" + }, + { + "include": "#comment-cics-source" + }, + { + "include": "#sequence-number-area" + } + ] + }, + "cics-keywords": { + "match": "(?