Update vendor'd Pygments to 2.1.3
This commit is contained in:
34
vendor/pygments/tests/examplefiles/openedge_example
vendored
Normal file
34
vendor/pygments/tests/examplefiles/openedge_example
vendored
Normal file
@@ -0,0 +1,34 @@
|
||||
{include.i}
|
||||
{nested.i {include.i}}
|
||||
|
||||
&SCOPED-DEFINE MY_NAME "Abe"
|
||||
|
||||
DEF VAR i AS INT NO-UNDO.
|
||||
i = 0xABE + 1337 / (1 * 1.00)
|
||||
|
||||
def var clowercasetest as char no-undo.
|
||||
DEF VAR vardashtest AS DATETIME-TZ NO-UNDO.
|
||||
|
||||
DEFINE TEMP-TABLE ttNames NO-UNDO
|
||||
FIELD cName AS CHAR
|
||||
INDEX IXPK_ttNames IS PRIMARY UNIQUE cName.
|
||||
|
||||
/* One-line comment */
|
||||
/* Two-line
|
||||
Comment */
|
||||
/*
|
||||
Nested
|
||||
/*
|
||||
Multiline
|
||||
/*
|
||||
Comment
|
||||
*/
|
||||
*/
|
||||
*/
|
||||
|
||||
CREATE ttNames.
|
||||
ASSIGN ttNames.cName = {&MY_NAME}.
|
||||
|
||||
FOR EACH ttNames:
|
||||
MESSAGE "Hello, " + ttNames.cName + '!' VIEW-AS ALERT-BOX.
|
||||
END.
|
||||
Reference in New Issue
Block a user