COBOL demo conf | COBOL 示例配置更新

This commit is contained in:
林万程
2022-07-11 08:19:45 +08:00
parent 988a5cc31b
commit f763a78f0c
23 changed files with 58 additions and 424 deletions

View File

@@ -1,3 +1,3 @@
-1 上 1 层文件夹测试
cobol 上 1 层文件夹测试
ext 上 1 层文件夹测试(不应显示)
java 上 1 层文件夹测试(不应显示)
1 -1 上 1 层文件夹测试
2 cobol 上 1 层文件夹测试
3 ext java 上 1 层文件夹测试(不应显示)

View File

@@ -1,3 +1,3 @@
-2 上 2 层文件夹测试
cobol 上 2 层文件夹测试
java 上 2 层文件夹测试
ext 上 2 层文件夹测试
1 -2 上 2 层文件夹测试
2 cobol 上 2 层文件夹测试
3 java ext 上 2 层文件夹测试

View File

@@ -1,410 +0,0 @@
SET
TO
VARYING
ACCEPT
ACCESS
ADD
ADDRESS
ADVANCING
AFTER
ALL
ALPHABET
ALPHABETIC
ALPHABETIC-LOWER
ALPHABETIC-UPPER
ALPHANUMERIC
ALPHANUMERIC-EDITED
ALSO
ALTER
ALTERNATE
AND
ANY
APPLY
ARE
AREA
AREAS
ASCENDING
ASSIGN
AT
AUTHOR
BASIS
BEFORE
BEGINNING
BINARY
BLANK
BLOCK
BOTTOM
BY
CALL
CANCEL
CBL
CD
CF
CH
CHARACTER
CHARACTERS
CLASS
CLASS-ID
CLOCK-UNITS
CLOSE
COBOL
CODE
CODE-SET
COLLATING
COLUMN
COM-REG
COMMA
COMMON
COMMUNICATION
COMP
COMP-1
COMP-2
COMP-3
COMP-4
COMP-5
COMPUTATIONAL
COMPUTATIONAL-1
COMPUTATIONAL-2
COMPUTATIONAL-3
COMPUTATIONAL-4
COMPUTATIONAL-5
COMPUTE
CONFIGURATION
CONTAINS
CONTENT
CONTINUE
CONTROL
CONTROLS
CONVERTING
COPY
CORR
CORRESPONDING
COUNT
CURRENCY
DATA
DATE-COMPILED
DATE-WRITTEN
DAY
DAY-OF-WEEK
DBCS
DE
DEBUG-CONTENTS
DEBUG-ITEM
DEBUG-LINE
DEBUG-NAME
DEBUG-SUB-1
DEBUG-SUB-2
DEBUG-SUB-3
DEBUGGING
DECIMAL-POINT
DECLARATIVES
DELETE
DELIMITED
DELIMITER
DEPENDING
DESCENDING
DESTINATION
DETAIL
DISPLAY
DISPLAY-1
DIVIDE
DIVISION
DOWN
DUPLICATES
DYNAMIC
EGCS
EGI
EJECT
ELSE
EMI
ENABLE
END
END-ADD
END-CALL
END-COMPUTE
END-DELETE
END-DIVIDE
END-EVALUATE
END-INVOKE
END-MULTIPLY
END-OF-PAGE
END-PERFORM
END-READ
END-RECEIVE
END-RETURN
END-REWRITE
END-SEARCH
END-START
END-STRING
END-SUBTRACT
END-UNSTRING
END-WRITE
ENDING
ENTER
ENTRY
ENVIRONMENT
EOP
EQUAL
ERROR
ESI
EVALUATE
EVERY
EXCEPTION
EXIT
EXTEND
EXTERNAL
FALSE
FD
FILE
FILE-CONTROL
FILLER
FINAL
FIRST
FOOTING
FOR
FROM
FUNCTION
GENERATE
GIVING
GLOBAL
GO
GOBACK
GREATER
GROUP
HEADINHIGH-VALUHIGH-VALUES
I-O
I-O-CONTROL
ID
IDENTIFICATION
IN
INDEX
INDEXED
INDICATE
INHERITS
INITIAL
INITIATE
INPUT
INPUT-OUTPUT
INSERT
INSPECT
INSTALLATION
INTO
INVALID
INVOKE
IS
JUSJUSTIFIE
KANJKE
LABEL
LAST
LEADING
LEFT
LENGTH
LESS
LIMIT
LIMITS
LINAGE
LINAGE-COUNTER
LINE
LINE-COUNTER
LINES
LINKAGE
LOCAL-STORAGE
LOCK
LOW-VALUE
LOW-VALUES
MEMORY
MERGE
MESSAGE
METACLASS
METHOD
METHOD-ID
MODE
MODULES
MORE-LABELS
MOVE
MULTIPLE
MULTIPLY
NATIVE
NATIVE_BINARY
NEGATIVE
NEXT
NO
NOT
NULL
NULLS
NUMBER
NUMERIC
NUMERIC-EDITED
OBJECT
OBJECT-COMPUTER
OCCURS
OF
OFF
OMITTED
ON
OPEN
OPTIONAL
OR
ORDER
ORGANIZATION
OTHER
OUTPUT
OVERFLOW
OVERRIDE
PACKED-DECIMAL
PADDING
PAGE
PAGE-COUNTER
PASSWORD
PF
PH
PIC
PICTURE
PLUS
POINTER
POSITION
POSITIVE
PRINTING
PROCEDURE
PROCEDURE-POINTER
PROCEDURES
PROCEED
PROCESSING
PROGRAM
PROGRAM-ID
PURGE
QUEUQUOTQUOTES
RANDOM
RD
READ
READY
RECEIVE
RECORD
RECORDING
RECORDS
RECURSIVE
REDEFINES
REEL
REFERENCE
REFERENCES
RELATIVE
RELEASE
RELOAD
REMAINDER
REMOVAL
RENAMES
REPLACE
REPLACING
REPORT
REPORTING
REPORTS
REPOSITORY
RERUN
RESERVE
RESET
RETURN
RETURN-CODE
RETURNING
REVERSED
REWIND
REWRITE
RF
RH
RIGHT
ROUNDED
RUN
SAME
SD
SEARCH
SECTION
SECURITY
SEGMENT
SEGMENT-LIMIT
SELECT
SELF
SEND
SENTENCE
SEPARATE
SEQUENCE
SEQUENTIAL
SERVICE
SET
SHIFT-IN
SHIFT-OUT
SIGN
SIZE
SKIP1
SKIP2
SKIP3
SORT
SORT-CONTROL
SORT-CORE-SIZE
SORT-FILE-SIZE
SORT-MERGE
SORT-MESSAGE
SORT-MODE-SIZE
SORT-RETURN
SOURCE
SOURCE-COMPUTER
SPACE
SPACES
SPECIAL-NAMES
STANDARD
STANDARD-1
STANDARD-2
START
STATUS
STOP
STRING
SUB-QUEUE-1
SUB-QUEUE-2
SUB-QUEUE-3
SUBTRACT
SUM
SUPER
SUPPRESS
SYMBOLIC
SYNC
SYNCHRONIZED
TABLE
TALLY
TALLYING
TAPE
TERMINAL
TERMINATE
TEST
TEXT
THAN
THROUGH
THRU
TIME
TIMES
TITLE
TO
TOP
TRACE
TRAILING
TRUE
TYPE
UNIT
UNSTRING
UNTIL
UP
UPON
USAGE
USE
USING
VALUVALUEVARYING
WHEN
WHEN-COMPILED
WITH
WORDS
WORKING-STORAGE
WRITE
WRITE-ONLY
ZERZEROEZEROS

View File

@@ -1,20 +1,22 @@
COBOL-file.tsv.tree.tsv 📝 COBOL 相关文件注释
base 基本
COBOL.cbl.key.tsv COBOL 必要【关键字】
COBOL-struct.cbl.doc.tsv COBOL 文件结构
compute 算数
COBOL-compute.cbl.key.tsv COBOL 算数符号【关键字】
COBOL-compute-word.cbl.key.tsv COBOL 算数词汇【关键字】
data 数据部
COBOL-data.cbl.key.tsv COBOL 数据部必要【关键字】
COBOL-data-layout.cbl.key.tsv COBOL 数据布局【关键字】
COBOL-data-type.cbl.key.tsv COBOL 数据类型【关键字】
COBOL-compute.cbl.key.tsv COBOL 算数符号【关键字】
COBOL-compute-word.cbl.key.tsv COBOL 算数词汇【关键字】
other 非必要
COBOL-accept.cbl.doc.tsv COBOL 获取词汇(非必要)
COBOL-accept.cbl.key.tsv COBOL 获取【关键字】(非必要)
COBOL-loop.cbl.key.tsv COBOL 循环【关键字】(非必要)
COBOL-string.cbl.key.tsv COBOL 字符串【关键字】(非必要)
COBOL-file.tsv.tree.tsv 📝 COBOL 相关文件注释
COBOL_IDEA.md COBOL IDEA 高亮设置
COBOL_keyword1.md COBOL IDEA 高亮 普通关键字
1 COBOL-file.tsv.tree.tsv base 📝 COBOL 相关文件注释 基本
COBOL.cbl.key.tsv COBOL 必要【关键字】
2 COBOL-struct.cbl.doc.tsv COBOL.cbl.key.tsv COBOL 文件结构 COBOL 必要【关键字】
COBOL-data.cbl.key.tsv COBOL 数据部必要【关键字】
3 COBOL-data-layout.cbl.key.tsv COBOL-struct.cbl.doc.tsv COBOL 数据布局【关键字】 COBOL 文件结构
4 COBOL-data-type.cbl.key.tsv compute COBOL 数据类型【关键字】 算数
5 COBOL-compute.cbl.key.tsv COBOL 算数符号【关键字】
6 COBOL-compute-word.cbl.key.tsv COBOL 算数词汇【关键字】
7 data 数据部
8 COBOL-data.cbl.key.tsv COBOL 数据部必要【关键字】
9 COBOL-data-layout.cbl.key.tsv COBOL 数据布局【关键字】
10 COBOL-compute.cbl.key.tsv COBOL-data-type.cbl.key.tsv COBOL 算数符号【关键字】 COBOL 数据类型【关键字】
11 COBOL-compute-word.cbl.key.tsv other COBOL 算数词汇【关键字】 非必要
12 COBOL-accept.cbl.doc.tsv COBOL-accept.cbl.doc.tsv COBOL 获取词汇(非必要) COBOL 获取词汇(非必要)
13 COBOL-accept.cbl.key.tsv COBOL-accept.cbl.key.tsv COBOL 获取【关键字】(非必要) COBOL 获取【关键字】(非必要)
14 COBOL-loop.cbl.key.tsv COBOL-loop.cbl.key.tsv COBOL 循环【关键字】(非必要) COBOL 循环【关键字】(非必要)
COBOL-string.cbl.key.tsv COBOL 字符串【关键字】(非必要)
COBOL_IDEA.md COBOL IDEA 高亮设置
15 COBOL_keyword1.md COBOL-string.cbl.key.tsv COBOL IDEA 高亮 普通关键字 COBOL 字符串【关键字】(非必要)
16 COBOL-file.tsv.tree.tsv 📝 COBOL 相关文件注释
17 COBOL_IDEA.md COBOL IDEA 高亮设置
18 COBOL_keyword1.md COBOL IDEA 高亮 普通关键字
19
20
21
22

View File

@@ -0,0 +1,36 @@
SET TO VARYING ACCEPT ACCESS ADD ADDRESS ADVANCING AFTER ALL ALPHABET ALPHABETIC ALPHABETIC-LOWER ALPHABETIC-UPPER
ALPHANUMERIC ALPHANUMERIC-EDITED ALSO ALTER ALTERNATE AND ANY APPLY ARE AREA AREAS ASCENDING ASSIGN AT AUTHOR BASIS
BEFORE BEGINNING BINARY BLANK BLOCK BOTTOM BY CALL CANCEL CBL CD CF CH CHARACTER CHARACTERS CLASS CLASS-ID CLOCK-UNITS
CLOSE COBOL CODE CODE-SET COLLATING COLUMN COM-REG COMMA COMMON COMMUNICATION COMP COMP-1 COMP-2 COMP-3 COMP-4 COMP-5
COMPUTATIONAL COMPUTATIONAL-1 COMPUTATIONAL-2 COMPUTATIONAL-3 COMPUTATIONAL-4 COMPUTATIONAL-5 COMPUTE CONFIGURATION
CONTAINS CONTENT CONTINUE CONTROL CONTROLS CONVERTING COPY CORR CORRESPONDING COUNT CURRENCY DATA DATE-COMPILED
DATE-WRITTEN DAY DAY-OF-WEEK DBCS DE DEBUG-CONTENTS DEBUG-ITEM DEBUG-LINE DEBUG-NAME DEBUG-SUB-1 DEBUG-SUB-2 DEBUG-SUB-3
DEBUGGING DECIMAL-POINT DECLARATIVES DELETE DELIMITED DELIMITER DEPENDING DESCENDING DESTINATION DETAIL DISPLAY
DISPLAY-1 DIVIDE DIVISION DOWN DUPLICATES DYNAMIC EGCS EGI EJECT ELSE EMI ENABLE END END-ADD END-CALL END-COMPUTE
END-DELETE END-DIVIDE END-EVALUATE
END-INVOKE END-MULTIPLY END-OF-PAGE END-PERFORM END-READ END-RECEIVE END-RETURN END-REWRITE END-SEARCH END-START
END-STRING END-SUBTRACT END-UNSTRING END-WRITE ENDING ENTER ENTRY ENVIRONMENT EOP EQUAL ERROR ESI EVALUATE EVERY
EXCEPTION EXIT EXTEND EXTERNAL FALSE FD FILE FILE-CONTROL FILLER FINAL FIRST FOOTING FOR FROM FUNCTION GENERATE GIVING
GLOBAL GO GOBACK GREATER GROUP HEADINHIGH-VALUHIGH-VALUES I-O I-O-CONTROL ID IDENTIFICATION
IN INDEX INDEXED INDICATE INHERITS INITIAL
INITIATE INPUT INPUT-OUTPUT INSERT INSPECT INSTALLATION INTO INVALID INVOKE IS JUSJUSTIFIE KANJKE LABEL LAST LEADING
LEFT LENGTH LESS LIMIT LIMITS LINAGE LINAGE-COUNTER LINE LINE-COUNTER LINES LINKAGE LOCAL-STORAGE LOCK LOW-VALUE
LOW-VALUES MEMORY MERGE MESSAGE METACLASS METHOD METHOD-ID MODE MODULES MORE-LABELS MOVE MULTIPLE MULTIPLY NATIVE
NATIVE_BINARY NEGATIVE NEXT NO NOT NULL NULLS NUMBER NUMERIC NUMERIC-EDITED OBJECT OBJECT-COMPUTER OCCURS OF OFF OMITTED
ON OPEN OPTIONAL OR ORDER ORGANIZATION OTHER OUTPUT OVERFLOW OVERRIDE PACKED-DECIMAL PADDING PAGE PAGE-COUNTER PASSWORD
PF PH PIC PICTURE PLUS POINTER POSITION POSITIVE PRINTING PROCEDURE PROCEDURE-POINTER PROCEDURES PROCEED PROCESSING
PROGRAM PROGRAM-ID PURGE QUEUQUOTQUOTES RANDOM RD READ READY RECEIVE RECORD RECORDING RECORDS RECURSIVE REDEFINES REEL
REFERENCE REFERENCES RELATIVE RELEASE RELOAD REMAINDER REMOVAL RENAMES REPLACE REPLACING REPORT REPORTING REPORTS
REPOSITORY RERUN RESERVE RESET RETURN RETURN-CODE RETURNING REVERSED REWIND REWRITE RF RH RIGHT ROUNDED RUN SAME SD
SEARCH SECTION SECURITY SEGMENT SEGMENT-LIMIT SELECT SELF SEND SENTENCE SEPARATE SEQUENCE SEQUENTIAL SERVICE SET
SHIFT-IN SHIFT-OUT SIGN SIZE SKIP1 SKIP2 SKIP3 SORT SORT-CONTROL SORT-CORE-SIZE SORT-FILE-SIZE SORT-MERGE SORT-MESSAGE
SORT-MODE-SIZE SORT-RETURN SOURCE SOURCE-COMPUTER SPACE SPACES SPECIAL-NAMES STANDARD STANDARD-1 STANDARD-2 START STATUS
STOP STRING SUB-QUEUE-1 SUB-QUEUE-2 SUB-QUEUE-3 SUBTRACT SUM SUPER SUPPRESS SYMBOLIC SYNC SYNCHRONIZED TABLE TALLY
TALLYING TAPE TERMINAL TERMINATE TEST TEXT THAN
THROUGH THRU TIME TIMES TITLE TO TOP TRACE TRAILING TRUE TYPE UNIT UNSTRING UNTIL UP UPON USAGE USE USING
VALUVALUEVARYING WHEN WHEN-COMPILED WITH WORDS WORKING-STORAGE WRITE WRITE-ONLY ZERZEROEZEROS

View File

@@ -22,9 +22,15 @@
\=(?! ?'\d| '\w') =
> >
< <
>= >=
<= <=
PERFORM call
WS-
(?<!\w)\( (
\) )
\((?!=\w+\)) (
\) )
关键字后面的前缀去除
(?<=(?:MOVE|TO|IF|AND|OR|NOT|WHEN|SET|COMPUTE|=|<|>|\+|-|\*|/|ADD|SUBTRACT|FROM|MULTIPLY|BY|DIVIDE|INTO|GIVING|REMAINDER) |\()\w{2,}-(?![\w-]+\(\d+:)
(?<=-)O-
1 COBOL 必要【关键字】
22 WS- <= <=
23 (?<!\w)\( PERFORM ( call
24 \) (?<!\w)\( ) (
25 \((?!=\w+\)) (
26 \) )
27 关键字后面的前缀去除
28 (?<=(?:MOVE|TO|IF|AND|OR|NOT|WHEN|SET|COMPUTE|=|<|>|\+|-|\*|/|ADD|SUBTRACT|FROM|MULTIPLY|BY|DIVIDE|INTO|GIVING|REMAINDER) |\()\w{2,}-(?![\w-]+\(\d+:)
29 (?<=-)O-
30
31
32
33
34
35
36

View File

@@ -3,7 +3,7 @@
IF (KEY NOT = '1' AND '2') AND
KEY NOT = ('1' OR '2') AND
KEY NOT = '1' THEN
MOVE WS-HELLO-WORLD TO HELLO-WORLD
MOVE WS-HELLO-WORLD TO OUT-HELLO-WORLD
END IF
TABLE(STRUCT)
HELLO-WORLD(1:1)

View File

@@ -1,5 +1,5 @@
COMPUTE HELLO-WORLD = (A - B) * 100 / (C + D)
COMPUTE WS-HELLO-WORLD = (A - B) * 100 / (C + D)
END-COMPUTE
ADD A TO B
ADD A B TO C D

View File

@@ -20,12 +20,12 @@ public class Pojo {
private List<NestedClass> nestedClassList;
/** NestedClass */
public static class NestedClass{
public static class NestedClass {
/** nestedClass2 */
private NestedClass2 nestedClass2;
/** NestedClass2 */
public static class NestedClass2{
public static class NestedClass2 {
/** a */
private String a;
}