diff options
author | Abe Voelker <abe@abevoelker.com> | 2011-09-25 17:45:40 -0500 |
---|---|---|
committer | Abe Voelker <abe@abevoelker.com> | 2011-09-25 17:45:40 -0500 |
commit | fec892af4e369649b0f78bfea9d63802892dc0ad (patch) | |
tree | 486f59da4251e7c1f892023242823b656ca749c8 /tests/examplefiles/example.cls | |
parent | cea3a6803108bb6a0754fb11c76223a8cd0c4fdd (diff) | |
download | pygments-fec892af4e369649b0f78bfea9d63802892dc0ad.tar.gz |
Add basic lexer for OpenEdge ABL (formerly known as Progress) language
Diffstat (limited to 'tests/examplefiles/example.cls')
-rw-r--r-- | tests/examplefiles/example.cls | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/tests/examplefiles/example.cls b/tests/examplefiles/example.cls new file mode 100644 index 00000000..d36ad6f0 --- /dev/null +++ b/tests/examplefiles/example.cls @@ -0,0 +1,15 @@ +USING Progress.Lang.*. + +CLASS Test INHERITS Progress.Sucks: + + DEFINE PRIVATE VARIABLE cTest AS CHAR NO-UNDO. + + CONSTRUCTOR PUBLIC Test(): + SUPER(). + MESSAGE "Why are you punishing yourself by coding in this language?". + END CONSTRUCTOR. + + METHOD PUBLIC LOGICAL Blowup(INPUT iTime AS INT): + END. + +END CLASS. |