blob: ed33ca1d3a7b71159ae6a9ad24463658ea9aa353 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
|
'USING' Name.Builtin
' ' Text.Whitespace
'Progress' Name.Builtin
'.' Punctuation
'L' Name.Variable
'a' Name.Variable
'n' Name.Variable
'g' Name.Variable
'.' Punctuation
'*' Operator
'.' Punctuation
'\n\n' Text.Whitespace
'CLASS' Name.Builtin
' ' Text.Whitespace
'T' Name.Variable
'e' Name.Variable
's' Name.Variable
't' Name.Variable
' ' Text.Whitespace
'INHERITS' Name.Builtin
' ' Text.Whitespace
'Progress' Name.Builtin
'.' Punctuation
'S' Name.Variable
'u' Name.Variable
'c' Name.Variable
'k' Name.Variable
's' Name.Variable
':' Punctuation
'\n\n ' Text.Whitespace
'DEFINE' Keyword.Declaration
' ' Text.Whitespace
'PRIVATE' Name.Builtin
' ' Text.Whitespace
'VARIABLE' Name.Builtin
' ' Text.Whitespace
'c' Name.Variable
'T' Name.Variable
'e' Name.Variable
's' Name.Variable
't' Name.Variable
' ' Text.Whitespace
'AS' Name.Builtin
' ' Text.Whitespace
'CHAR' Keyword.Type
' ' Text.Whitespace
'NO-UNDO' Name.Builtin
'.' Punctuation
'\n\n ' Text.Whitespace
'CONSTRUCTOR' Name.Builtin
' ' Text.Whitespace
'PUBLIC' Name.Builtin
' ' Text.Whitespace
'T' Name.Variable
'e' Name.Variable
's' Name.Variable
't' Name.Variable
'(' Punctuation
')' Punctuation
':' Punctuation
'\n ' Text.Whitespace
'SUPER' Name.Builtin
'(' Punctuation
')' Punctuation
'.' Punctuation
'\n ' Text.Whitespace
'MESSAGE ' Name.Builtin
'"Why are you punishing yourself by coding in this language?"' Literal.String.Double
'.' Punctuation
'\n ' Text.Whitespace
'END' Name.Builtin
' ' Text.Whitespace
'CONSTRUCTOR' Name.Builtin
'.' Punctuation
'\n\n ' Text.Whitespace
'METHOD' Name.Builtin
' ' Text.Whitespace
'PUBLIC' Name.Builtin
' ' Text.Whitespace
'LOGICAL' Keyword.Type
' ' Text.Whitespace
'B' Name.Variable
'l' Name.Variable
'o' Name.Variable
'w' Name.Variable
'u' Name.Variable
'p' Name.Variable
'(' Punctuation
'INPUT' Name.Builtin
' ' Text.Whitespace
'i' Name.Variable
'T' Name.Variable
'i' Name.Variable
'm' Name.Variable
'e' Name.Variable
' ' Text.Whitespace
'AS' Name.Builtin
' ' Text.Whitespace
'INT' Keyword.Type
')' Punctuation
':' Punctuation
'\n ' Text.Whitespace
'END' Name.Builtin
'.' Punctuation
'\n\n' Text.Whitespace
'END' Name.Builtin
' ' Text.Whitespace
'CLASS' Name.Builtin
'.' Punctuation
'\n' Text.Whitespace
|
