COBOL support = ('A' OR 'B')
This commit is contained in:
@@ -38,7 +38,7 @@ public class LineExt {
|
|||||||
return extDoc(keyMap, matcher, docMap, words, treeMap);
|
return extDoc(keyMap, matcher, docMap, words, treeMap);
|
||||||
}
|
}
|
||||||
|
|
||||||
private static final Pattern DICT_PATTERN = Pattern.compile("([\\w-]++) ?(NOT)? ?= ?'");
|
private static final Pattern DICT_PATTERN = Pattern.compile("([\\w-]++) ?(NOT)? ?= ?\\(? ?'");
|
||||||
private static final Pattern AND_OR_PATTERN = Pattern.compile("(AND|OR) ?'");
|
private static final Pattern AND_OR_PATTERN = Pattern.compile("(AND|OR) ?'");
|
||||||
|
|
||||||
@NotNull
|
@NotNull
|
||||||
|
|||||||
@@ -1,6 +1,7 @@
|
|||||||
|
|
||||||
123456 INITIALIZE HELLO-WORLD
|
123456 INITIALIZE HELLO-WORLD
|
||||||
IF (KEY NOT = '1' AND '2') AND
|
IF (KEY NOT = '1' AND '2') AND
|
||||||
|
KEY NOT = ('1' OR '2') AND
|
||||||
KEY NOT = '1' THEN
|
KEY NOT = '1' THEN
|
||||||
MOVE WS-HELLO-WORLD TO HELLO-WORLD
|
MOVE WS-HELLO-WORLD TO HELLO-WORLD
|
||||||
END IF
|
END IF
|
||||||
|
|||||||
Reference in New Issue
Block a user