summaryrefslogtreecommitdiff
path: root/tests/examplefiles
diff options
context:
space:
mode:
authorMatthäus G. Chajdas <dev@anteru.net>2022-12-04 15:56:49 +0100
committerMatthäus G. Chajdas <dev@anteru.net>2022-12-04 15:56:49 +0100
commit6abce335cc0dde84567f848f55a1f1e5b69ed98e (patch)
tree3d0385efcaec98c56e996f98c7fa69a6a1e81da9 /tests/examplefiles
parent2f78a7bf950cfbf84a47156cb7dfd5da962d4784 (diff)
downloadpygments-git-6abce335cc0dde84567f848f55a1f1e5b69ed98e.tar.gz
Improve whitespace handling in the PascalLexer.
Diffstat (limited to 'tests/examplefiles')
-rw-r--r--tests/examplefiles/delphi/example.pas.output14912
-rw-r--r--tests/examplefiles/delphi/test.pas.output3278
2 files changed, 9095 insertions, 9095 deletions
diff --git a/tests/examplefiles/delphi/example.pas.output b/tests/examplefiles/delphi/example.pas.output
index 71956db5..2d9118bc 100644
--- a/tests/examplefiles/delphi/example.pas.output
+++ b/tests/examplefiles/delphi/example.pas.output
@@ -1,137 +1,137 @@
'// vim:ft=pascal' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'unit' Keyword
-' ' Text
+' ' Text.Whitespace
'YTools' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{===============================================================================\n\n cYcnus.YTools 1.0.3 Beta for Delphi 4+\n by licenser and Murphy\n\n ©2000-2003 by cYcnus\n visit www.cYcnus.de\n\n licenser@cYcnus.de (Heinz N. Gies)\n murphy@cYcnus.de (Kornelius Kalnbach)\n \n this unit is published under the terms of the GPL\n\n===============================================================================}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'interface' Keyword
-'\n\n' Text
+'\n\n' Text.Whitespace
'uses' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Windows' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SysUtils' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Classes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'YTypes' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'BackSpace' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#8' Literal.String.Char
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Tab' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#9' Literal.String.Char
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LF' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#10' Literal.String.Char
';' Operator
-' ' Text
+' ' Text.Whitespace
'//Line Feed' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'CR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#13' Literal.String.Char
';' Operator
-' ' Text
+' ' Text.Whitespace
'//Carriage Return' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Space' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#32' Literal.String.Char
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'EOLChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'CR' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LF' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$IFNDEF VER140}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'sLineBreak' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#13' Literal.String.Char
'#10' Literal.String.Char
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SwitchChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'/' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'-' Literal.String
"'" Literal.String
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'sLineBreak' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxCard' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Cardinal' Keyword.Type
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'AllChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'#0' Literal.String.Char
'.' Operator
@@ -139,11 +139,11 @@
'#255' Literal.String.Char
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Alphabetical' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'A' Literal.String
@@ -154,7 +154,7 @@
'Z' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'a' Literal.String
"'" Literal.String
@@ -165,11 +165,11 @@
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'DecimalChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'0' Literal.String
@@ -181,56 +181,56 @@
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'AlphaNumerical' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Alphabetical' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'DecimalChars' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'StrangeChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'#0' Literal.String.Char
'.' Operator
'.' Operator
'#31' Literal.String.Char
',' Operator
-' ' Text
+' ' Text.Whitespace
'#127' Literal.String.Char
',' Operator
-' ' Text
+' ' Text.Whitespace
'#129' Literal.String.Char
',' Operator
-' ' Text
+' ' Text.Whitespace
'#141' Literal.String.Char
'.' Operator
'.' Operator
'#144' Literal.String.Char
',' Operator
-' ' Text
+' ' Text.Whitespace
'#157' Literal.String.Char
',' Operator
-' ' Text
+' ' Text.Whitespace
'#158' Literal.String.Char
']' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'HexadecimalChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'DecimalChars' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'A' Literal.String
@@ -241,7 +241,7 @@
'F' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'a' Literal.String
"'" Literal.String
@@ -252,11 +252,11 @@
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OctalChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'0' Literal.String
@@ -268,111 +268,111 @@
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'BinaryChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'1' Literal.String
"'" Literal.String
']' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'QuoteChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
"''" Literal.String.Escape
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'"' Literal.String
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'WildCards' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'*' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'?' Literal.String
"'" Literal.String
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileNameEnemies' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'WildCards' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'/' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
':' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'<' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'>' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'|' Literal.String
"'" Literal.String
']' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'HexChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'THex' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
@@ -438,23 +438,23 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LowerHexChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'THex' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
@@ -520,23 +520,23 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'BaseNChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'TBaseN' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
@@ -609,7 +609,7 @@
'H' Literal.String
"'" Literal.String
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'I' Literal.String
"'" Literal.String
@@ -683,4177 +683,4177 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'cYcnusOverlayColor' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'$050001' Literal.Number.Hex
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'faFindEveryFile' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faReadOnly' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'faHidden' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'faSysFile' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'faArchive' Name
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'platWin9x' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'VER_PLATFORM_WIN32s' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'VER_PLATFORM_WIN32_WINDOWS' Name
']' Punctuation
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'{ Debugging }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ClearReport' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Report' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportFmt' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Fmt' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Args' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Params }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParams' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParams' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamNum' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamPrefixNum' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Param' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamPrefix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Switch' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Switch' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'PrefixChars' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SwitchChars' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreCase' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParam' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Dirs & UserName}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetMyDir' Name.Function
'(' Punctuation
'FullPath' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinDir' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SysDir' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UserName' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Strings & Chars}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FirstChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPos' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPos' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPosR' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosEx' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosExText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosExAnsiText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilLastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreNoBrake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromLastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreNoBrake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BetweenChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Start' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Finish' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inclusive' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StringWrap' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'LineEnd' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Splitting & Combining }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separators' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TileStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeStart' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeEnd' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'Left' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Right' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Join' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Join' Name.Function
'(' Punctuation
'StrA' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MulStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Strings ausrichten }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'AlignR' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Filler' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MaxStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'MaxLen' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Stringing }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TrimAll' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ControlChar' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyChar' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyStr' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Quote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'"' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UnQuote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeQuote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrNumerus' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Value' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Singular' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Plural' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Zero' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MakeStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Items' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ShowText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Items' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Delete }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Find }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharCount' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrAtPos' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Str' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrAtBegin' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Str' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIndex' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIndex' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextAtPos' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextAtBegin' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIndex' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIndex' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Replace }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ReplaceChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ReplaceChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Replace' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ TStrings }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SLOfFile' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ContainsEmptyLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteEmptyLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteCommentLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'CommentSign' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'//' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'WriteSL' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Suffix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindLine' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'QuickSortSL' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ TStrA }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IncStrA' Name.Function
'(' Punctuation
'StrA' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ TByteA }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfInt' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfByteA' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfHex' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameByteA' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Reverse' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SaveByteA' Name.Function
'(' Punctuation
'Data' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Overwrite' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LoadByteA' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Endian' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Files }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SizeOfFile' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FileEx' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'AllowFolders' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LWPSolve' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Dir' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LWPSlash' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Dir' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractDrive' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractPrefix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractSuffix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidFileName' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MakeValidFileName' Name.Function
'(' Punctuation
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'File' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Converting }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidInteger' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidCardinal' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfBool' Name.Function
'(' Punctuation
'flag' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'TrueStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'True' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FalseStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'False' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfInt' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CardOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOrd' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'THex' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteOfHex' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THexByteStr' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DecOfHex' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfByte' Name.Function
'(' Punctuation
'b' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'THexByteStr' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfCard' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfCard' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Digits' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PascalHexArray' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Name' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CardOfHex' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfBin' Name.Function
'(' Punctuation
'Bin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfIntFill' Name.Function
'(' Punctuation
'n' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfInt' Name.Function
'(' Punctuation
'n' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BaseNOfInt' Name.Function
'(' Punctuation
'I' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TBaseN' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfBaseN' Name.Function
'(' Punctuation
'V' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TBaseN' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Ranges }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'KeepIn' Name.Function
'(' Punctuation
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InRange' Name.Function
'(' Punctuation
'Value' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InStrictRange' Name.Function
'(' Punctuation
'Value' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Min' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Min' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TIntA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Max' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Max' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TIntA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'RangesSeparator' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
',' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'RangeInnerSeparator' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'-' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'RangeInfinite' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'RangeSpecialChars' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'RangesSeparator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'RangeInnerSeparator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'RangeInfinite' Name
']' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'RangesOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TRanges' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InRanges' Name.Function
'(' Punctuation
'Ranges' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TRanges' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'TestValue' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name.Function
'(' Punctuation
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ERROR_SUCCESS' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Failure' Name.Function
'(' Punctuation
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ERROR_SUCCESS' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExpandString' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Files }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteFiles' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'FileNew' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DateTimeOfFileTime' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileTime' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFileTime' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TDateTime' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ FileNames }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetFileNew' Name.Function
'(' Punctuation
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'NoFloppyDrives' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Finding Files }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAll' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileReturn' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFileNameFunc' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAllFirst' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FullOSInfo' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win32PlatformStr' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win9x' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinNT' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win2000' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinXP' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MyDir' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LastSuccessRes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n \n' Text
+'\n \n' Text.Whitespace
'{ Backward compatibility }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$IFNDEF VER130}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S1' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S2' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'implementation' Keyword
-'\n' Text
+'\n' Text.Whitespace
'{$IFNDEF VER140}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'uses' Keyword
-' ' Text
+' ' Text.Whitespace
'FileCtrl' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'{$IFNDEF VER130}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S1' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S2' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CompareText' Name.Builtin
'(' Punctuation
'S1' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S2' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Report' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TextFile' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MyDir' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.rep' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Assign' Name
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'FileExists' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Rewrite' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Append' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'WriteLn' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Close' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ClearReport' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MyDir' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.rep' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'DeleteFile' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportFmt' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'ReportName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Fmt' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Args' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Report' Name
'(' Punctuation
'ReportName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Format' Name.Builtin
'(' Punctuation
'Fmt' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Args' Name
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParams' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Param' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParamStr' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'Param' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Quoted' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Param' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'repeat' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'#0' Literal.String.Char
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'P' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Quoted' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'#0' Literal.String.Char
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'"' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Quoted' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Quoted' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'P' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Continue' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Quoted' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Param' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Param' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'P' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'until' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Param' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'P' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#0' Literal.String.Char
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Param' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'Clear' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetCommandLine' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetParamStr' Name
'(' Punctuation
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Param' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParamStr' Name
'(' Punctuation
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Param' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'Add' Name
@@ -4861,246 +4861,246 @@
'Param' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParams' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
'.' Operator
'Create' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetParams' Name
'(' Punctuation
'SL' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Join' Name
'(' Punctuation
'SL' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'.' Operator
'Free' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Switch' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Switch' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'PrefixChars' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SwitchChars' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreCase' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'//= SysUtils.FindCmdLineSwitch' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
's' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamCount' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
's' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ParamStr' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
's' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
's' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'PrefixChars' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
"//i know that always s <> '', but this is saver" Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
's' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
's' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxInt' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
's' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Switch' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'IgnoreCase' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'0' Literal.Number.Integer
'=' Operator
@@ -5108,70 +5108,70 @@
'(' Punctuation
's' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Switch' Name
')))' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamNum' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamCount' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'=' Operator
'AnsiCompareText' Name.Builtin
@@ -5181,84 +5181,84 @@
'Result' Name.Builtin.Pseudo
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamPrefixNum' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Prefix' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamCount' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'=' Operator
'AnsiCompareText' Name.Builtin
@@ -5270,223 +5270,223 @@
'Result' Name.Builtin.Pseudo
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Param' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ParamNum' Name
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ParamPrefix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ParamPrefixNum' Name
'(' Punctuation
'Prefix' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetParam' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ParamStr' Name.Builtin
'(' Punctuation
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ParamPrefixNum' Name
'(' Punctuation
'Prefix' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'ParamStr' Name.Builtin
@@ -5494,50 +5494,50 @@
'i' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Prefix' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxInt' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetMyDir' Name.Function
'(' Punctuation
'FullPath' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Buffer' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'0' Literal.Number.Integer
@@ -5545,413 +5545,413 @@
'.' Operator
'260' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetString' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'GetModuleFileName' Name.Builtin
'(' Punctuation
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SizeOf' Name.Builtin
'(' Punctuation
'Buffer' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FullPath' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetFileNew' Name
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinDir' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetWindowsDirectory' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SysDir' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetSystemDirectory' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UserName' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetUserName' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MAX_PATH' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FirstChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
's' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#0' Literal.String.Char
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
's' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
's' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'#0' Literal.String.Char
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
's' Name
'[' Punctuation
'Length' Name.Builtin
@@ -5959,814 +5959,814 @@
's' Name
')]' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPos' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPos' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharPosR' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosEx' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'SubStr' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosExText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameChar' Name.Function
'(' Punctuation
'a' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'b' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'UpCase' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'UpCase' Name.Builtin
'(' Punctuation
'b' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'SubStr' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SameChar' Name
'(' Punctuation
'S' Name
@@ -6774,181 +6774,181 @@
'Result' Name.Builtin.Pseudo
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'SameChar' Name
'(' Punctuation
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
']))' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PosExAnsiText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameChar' Name.Function
'(' Punctuation
'a' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'b' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharLower' Name
'(' Punctuation
'PChar' Keyword.Type
'(' Punctuation
'a' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharLower' Name
'(' Punctuation
'PChar' Keyword.Type
@@ -6956,112 +6956,112 @@
'b' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'SubStr' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxPosToSearch' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SameChar' Name
'(' Punctuation
'S' Name
@@ -7069,1767 +7069,1767 @@
'Result' Name.Builtin.Pseudo
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'SameChar' Name
'(' Punctuation
'S' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
'[' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
']))' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'LenSubStr' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilLastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreNoBrake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPosR' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IgnoreNoBrake' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromLastChar' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreNoBrake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPosR' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IgnoreNoBrake' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BetweenChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Start' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Finish' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inclusive' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Start' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Finish' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Inclusive' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'p' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'fin' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UntilStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Brake' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'UntilChar' Name
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FromStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Brake' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FromChar' Name
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Brake' Name
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Brake' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
's' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Brake' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StringWrap' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'LineEnd' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Width' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'True' Keyword
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'LineEnd' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SepLen' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Add' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IgnoreMultiSep' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'High' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SepLen' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Separator' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Separator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'SepLen' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Separator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
';' Operator
-' \n' Text
+' \n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SepLen' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Add' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IgnoreMultiSep' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'Add' Name
@@ -8837,914 +8837,914 @@
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Strings' Name
'.' Operator
'BeginUpdate' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SepLen' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Separator' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Separator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'SepLen' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Separator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'EndUpdate' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Split' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separators' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'IgnoreMultiSep' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Add' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IgnoreMultiSep' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'High' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Separators' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'fin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'Separators' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TileStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeStart' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeEnd' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'Left' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Right' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Left' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeStart' Name
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Right' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'BrakeEnd' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxInt' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Join' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'imax' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'imax' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'imax' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'imax' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Join' Name.Function
'(' Punctuation
'StrA' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'overload' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'StrA' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'StrA' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'StrA' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MulStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Count' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Count' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'Pointer' Keyword.Type
@@ -9753,462 +9753,462 @@
')' Punctuation
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'P' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'AlignR' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Filler' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MulStr' Name
'(' Punctuation
'Filler' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Width' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MaxStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'MaxLen' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MaxLen' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxLen' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'3' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'...' Literal.String
"'" Literal.String
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TrimAll' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'#32' Literal.String.Char
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ControlChar' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'StrangeChars' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyChar' Name.Function
'(' Punctuation
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'case' Keyword
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'#0' Literal.String.Char
':' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'#1' Literal.String.Char
'.' Operator
'.' Operator
'#31' Literal.String.Char
':' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'?' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'#255' Literal.String.Char
':' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'#' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FriendlyChar' Name
'(' Punctuation
'S' Name
@@ -10216,79 +10216,79 @@
'i' Name
'])' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FriendlyStr' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'a' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FriendlyChar' Name
'(' Punctuation
'Char' Keyword.Type
@@ -10298,688 +10298,688 @@
'i' Name
']))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Quote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'"' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FirstChar' Name
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'LastChar' Name
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Quoter' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeQuote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'UnQuote' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Start' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Start' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'([' Punctuation
'#0' Literal.String.Char
'.' Operator
'.' Operator
'#32' Literal.String.Char
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'QuoteChars' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'LastChar' Name
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'Len' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Start' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Start' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Start' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrNumerus' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Value' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Singular' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Plural' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Zero' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Abs' Name.Builtin
'(' Punctuation
'Value' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'Value' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Singular' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Value' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Zero' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Plural' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'Value' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Plural' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MakeStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Items' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'BoolStrings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'Boolean' Keyword.Type
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
"'" Literal.String
'False' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'True' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfP' Name.Function
'(' Punctuation
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'[nil]' Literal.String
"'" Literal.String
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'[' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'Cardinal' Keyword.Type
'(' Punctuation
'P' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
']' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Add' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
's' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Items' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'with' Keyword
-' ' Text
+' ' Text.Whitespace
'Items' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'case' Keyword
-' ' Text
+' ' Text.Whitespace
'VType' Name
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'vtString' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VString' Name
'^' Operator
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtInteger' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'IntToStr' Name.Builtin
@@ -10987,10 +10987,10 @@
'VInteger' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtBoolean' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'BoolStrings' Name
@@ -10998,28 +10998,28 @@
'VBoolean' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VChar' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtPChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VPChar' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtExtended' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'FloatToStr' Name.Builtin
@@ -11028,20 +11028,20 @@
'^' Operator
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtObject' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'VObject' Name
-' ' Text
+' ' Text.Whitespace
'is' Keyword
-' ' Text
+' ' Text.Whitespace
'TComponent' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'TComponent' Name
@@ -11051,9 +11051,9 @@
'.' Operator
'Name' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'VObject' Name
@@ -11061,10 +11061,10 @@
'ClassName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtClass' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VClass' Name
@@ -11072,10 +11072,10 @@
'ClassName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtAnsiString' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'string' Keyword
@@ -11083,10 +11083,10 @@
'VAnsiString' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtCurrency' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'CurrToStr' Name.Builtin
@@ -11095,10 +11095,10 @@
'^' Operator
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtInt64' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'IntToStr' Name.Builtin
@@ -11107,10 +11107,10 @@
'^' Operator
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtVariant' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'string' Keyword
@@ -11119,28 +11119,28 @@
'^' Operator
'))' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'vtWideChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VWideChar' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtPWideChar' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'VPWideChar' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtInterface' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'StrOfP' Name
@@ -11148,10 +11148,10 @@
'VInterface' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtPointer' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'StrOfP' Name
@@ -11159,10 +11159,10 @@
'VPointer' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'vtWideString' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Add' Name
'(' Punctuation
'WideString' Keyword.Type
@@ -11170,2108 +11170,2108 @@
'VWideString' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Separator' Name
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ShowText' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Items' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'const' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Text' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MakeStr' Name
'(' Punctuation
'Items' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Separator' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'MessageBox' Name
'(' Punctuation
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
'(' Punctuation
'Text' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'Info' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'MB_OK' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'MB_APPLMODAL' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'C' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharCount' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrAtPos' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Str' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Str' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Str' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Str' Name.Builtin
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextAtPos' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Text' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Builtin
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Pos' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Text' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrAtBegin' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Str' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'StrAtPos' Name
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Str' Name.Builtin
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextAtBegin' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TextAtPos' Name
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'C' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'C' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SubStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'SubStr' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIn' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosExText' Name
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Builtin
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIn' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Builtin
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIndex' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrIndex' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIndex' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Builtin
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TextIndex' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Text' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SameText' Name.Builtin
'(' Punctuation
'Text' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'Result' Name.Builtin.Pseudo
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ReplaceChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ReplaceChars' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCharSet' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'Old' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Replace' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Old' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'oldp' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ps' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'ps' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'True' Keyword
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'oldp' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ps' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ps' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PosEx' Name
'(' Punctuation
'Old' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'oldp' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'ps' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'oldp' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'oldp' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'oldp' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ps' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'oldp' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'New' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'ps' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Old' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SLOfFile' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
'.' Operator
'Create' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FileExists' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'.' Operator
'LoadFromFile' Name
@@ -13279,206 +13279,206 @@
'FileName' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ContainsEmptyLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'StrIn' Name
'(' Punctuation
'SL' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteEmptyLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'.' Operator
'Delete' Name
'(' Punctuation
'i' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteCommentLines' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'CommentSign' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'//' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'StrAtBegin' Name
'(' Punctuation
@@ -13489,81 +13489,81 @@
'i' Name
'])' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'CommentSign' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'.' Operator
'Delete' Name
'(' Punctuation
'i' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindLine' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'TextAtBegin' Name
'(' Punctuation
'SL' Name
@@ -13571,284 +13571,284 @@
'Result' Name.Builtin.Pseudo
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'S' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'QuickSortSL' Name.Function
'(' Punctuation
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Sort' Name.Function
'(' Punctuation
'l' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'r' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
',' Operator
'j' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'z' Name
',' Operator
'x' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'l' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'j' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'r' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'x' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[(' Punctuation
'j' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'repeat' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'x' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'j' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'x' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'j' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'j' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'z' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'j' Name
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'[' Punctuation
'j' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'z' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'j' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'until' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'j' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'j' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'l' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'Sort' Name
'(' Punctuation
'l' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'j' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'r' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'Sort' Name
'(' Punctuation
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'r' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Sort' Name
'(' Punctuation
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
@@ -13856,225 +13856,225 @@
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IncStrA' Name.Function
'(' Punctuation
'StrA' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'StrA' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'StrA' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'StrA' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'a' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'a' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
's' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfInt' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'SizeOf' Name.Builtin
'(' Punctuation
'Integer' Keyword.Type
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'SizeOf' Name.Builtin
'(' Punctuation
'Integer' Keyword.Type
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfByteA' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'Pointer' Keyword.Type
@@ -14083,10 +14083,10 @@
')' Punctuation
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Min' Name.Builtin
'(' Punctuation
'Length' Name.Builtin
@@ -14094,313 +14094,313 @@
'A' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'SizeOf' Name.Builtin
'(' Punctuation
'Integer' Keyword.Type
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteAOfHex' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'h' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'h' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractChars' Name
'(' Punctuation
'Hex' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'HexadecimalChars' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'h' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ByteOfHex' Name
'(' Punctuation
'Copy' Name.Builtin
'(' Punctuation
'h' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'shl' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SizeOfFile' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'file' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'AssignFile' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'{$I-}' Comment.Multiline
'Reset' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
'{$I+}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IOResult' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FileSize' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'CloseFile' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FileEx' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'AllowFolders' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FindData' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TWin32FindData' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'AllowFolders' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'DirectoryExists' Name.Builtin
'(' Punctuation
'FileName' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'(' Punctuation
'FindFirstFile' Name
'(' Punctuation
@@ -14409,105 +14409,105 @@
'FileName' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'FindData' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'INVALID_HANDLE_VALUE' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'WildCards' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'AllowFolders' Name
-'\n ' Text
+'\n ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'FindData' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LWPSolve' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Dir' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Dir' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Dir' Name
'[' Punctuation
@@ -14515,92 +14515,92 @@
'(' Punctuation
'Dir' Name
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'Dir' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Dir' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Dir' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LWPSlash' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Dir' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Dir' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Dir' Name
'[' Punctuation
@@ -14608,253 +14608,253 @@
'(' Punctuation
'Dir' Name
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'Dir' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Dir' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Dir' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractDrive' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Length' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FileName' Name
'[' Punctuation
'2' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
':' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'UpperCase' Name.Builtin
'(' Punctuation
'FileName' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
':\\' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPosR' Name
'(' Punctuation
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractPrefix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'UntilLastChar' Name
'(' Punctuation
'ExtractFileName' Name.Builtin
@@ -14862,42 +14862,42 @@
'FileName' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExtractSuffix' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FromLastChar' Name
'(' Punctuation
'ExtractFileName' Name.Builtin
@@ -14905,193 +14905,193 @@
'FileName' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SameByteA' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'A' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'Length' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'B' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'CompareMem' Name.Builtin
'(' Punctuation
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'A' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Reverse' Name.Function
'(' Punctuation
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'A' Name
'))' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'High' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Endian' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'type' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'EndianArray' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'packed' Keyword
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'0' Literal.Number.Integer
@@ -15099,450 +15099,450 @@
'.' Operator
'3' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'b' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'EndianArray' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'EndianArray' Name
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'b' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'a' Name
'[' Punctuation
'3' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'b' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'a' Name
'[' Punctuation
'2' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'b' Name
'[' Punctuation
'2' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'a' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'b' Name
'[' Punctuation
'3' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'a' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
'(' Punctuation
'b' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'SaveByteA' Name.Function
'(' Punctuation
'Data' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Overwrite' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'file' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FileExists' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Overwrite' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'AssignFile' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'{$I-}' Comment.Multiline
'Rewrite' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
'{$I+}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IOResult' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Data' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'BlockWrite' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Data' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Data' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'CloseFile' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'LoadByteA' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'file' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'AssignFile' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'{$I-}' Comment.Multiline
'Reset' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
';' Operator
'{$I+}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'IOResult' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileSize' Name.Builtin
'(' Punctuation
'F' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'BlockRead' Name.Builtin
'(' Punctuation
'F' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileSize' Name.Builtin
'(' Punctuation
'F' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'CloseFile' Name.Builtin
'(' Punctuation
'F' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidFileName' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FileName' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileNameEnemies' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name
'(' Punctuation
'Trim' Name.Builtin
@@ -15550,109 +15550,109 @@
'FileName' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'AllChars' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'.' Literal.String
"'" Literal.String
'])' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'MakeValidFileName' Name.Function
'(' Punctuation
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'File' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileNameEnemies' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ReplaceChars' Name
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileNameEnemies' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'_' Literal.String
"'" Literal.String
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'CharIn' Name
'(' Punctuation
'Trim' Name.Builtin
@@ -15660,436 +15660,436 @@
'FileName' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'AllChars' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'.' Literal.String
"'" Literal.String
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Default' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidInteger' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
"{const\n LowInt = '2147483648';\n HighInt = '2147483647';\nvar\n len, RealLen, i, o: Integer;\n c: Char;\nbegin\n Result := False;\n if S = '' then\n Exit;\n\n len := Length(S);\n o := 1;\n \n if S[1] = '-' then begin\n if len = 1 then\n Exit;\n Inc(o);\n while (o <= len) and (S[o] = '0') do\n Inc(o);\n if o > len then\n Exit;\n if o < len then begin\n RealLen := len - o + 1;\n if RealLen > Length(LowInt) then\n Exit\n else if RealLen = Length(LowInt) then begin\n for i := 1 to Length(LowInt) do begin\n c := S[i + o - 1];\n if (c < '0') or (c > LowInt[i]) then\n Exit;\n if c in ['0'..Char((Byte(LowInt[i])-1))] then\n Break;\n end;\n Inc(o, i);\n end;\n end;\n end else begin\n while (o <= len) and (S[o] = '0') do\n Inc(o);\n if o <= len then begin\n RealLen := len - o + 1;\n if RealLen > Length(HighInt) then\n Exit\n else if RealLen = Length(HighInt) then begin\n for i := 1 to Length(HighInt) do begin\n c := S[i + o - 1];\n if (c < '0') or (c > HighInt[i]) then\n Exit;\n if c in ['0'..Char((Byte(HighInt[i])-1))] then\n Break;\n end;\n Inc(o, i);\n end;\n end;\n end;\n\n for i := o to len do\n if not (S[i] in ['0'..'9']) then\n Exit;\n\n Result := True; }" Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Int64' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'StrToInt64Def' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Int64' Keyword.Type
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'Integer' Keyword.Type
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Integer' Keyword.Type
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidCardinal' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
"{const\n HighCard = '4294967295';\nvar\n len, RealLen, i, o: Integer;\nbegin\n Result := False;\n if S = '' then\n Exit;\n\n len := Length(S);\n o := 1;\n \n while (o <= len) and (S[o] = '0') do\n Inc(o);\n if o <= len then begin\n RealLen := len - o + 1;\n if RealLen > Length(HighCard) then\n Exit\n else if RealLen = Length(HighCard) then begin\n for i := 1 to Length(HighCard) do begin\n if S[i + o - 1] > HighCard[i] then\n Exit;\n if S[i + o - 1] in ['0'..Char((Byte(HighCard[i])-1))] then\n Break;\n end;\n Inc(o, i);\n end;\n end;\n\n for i := o to len do\n if not (S[i] in ['0'..'9']) then\n Exit;\n\n Result := True; }" Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Int64' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'StrToInt64Def' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Cardinal' Keyword.Type
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfBool' Name.Function
'(' Punctuation
'flag' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'TrueStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'True' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FalseStr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'False' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Flag' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TrueStr' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FalseStr' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'StrOfInt' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n' Text
+'\n' Text.Whitespace
"{ if i = 0 then begin\n Result := '0';\n Exit end;\n\n while i > 0 do begin\n Result := Char(Byte('0') + (i mod 10)) + Result;\n i := i div 10;\n end;}" Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'i' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CardOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Int64' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'StrToInt64Def' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Cardinal' Keyword.Type
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Cardinal' Keyword.Type
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
'(' Punctuation
'Res' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOrd' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'THex' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'case' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
@@ -16099,22 +16099,22 @@
'9' Literal.String
"'" Literal.String
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'Hex' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'48' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'A' Literal.String
"'" Literal.String
@@ -16124,22 +16124,22 @@
'F' Literal.String
"'" Literal.String
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'Hex' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'55' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'a' Literal.String
"'" Literal.String
@@ -16149,62 +16149,62 @@
'f' Literal.String
"'" Literal.String
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'Hex' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'87' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ByteOfHex' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THexByteStr' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'HexOrd' Name
'(' Punctuation
@@ -16212,14 +16212,14 @@
'[' Punctuation
'1' Literal.Number.Integer
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'shl' Keyword
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'HexOrd' Name
'(' Punctuation
'Hex' Name
@@ -16227,36 +16227,36 @@
'2' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DecOfHex' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'CardOfHex' Name
@@ -16264,455 +16264,455 @@
'Hex' Name
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfByte' Name.Function
'(' Punctuation
'b' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'THexByteStr' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'HexChar' Name
'[(' Punctuation
'b' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'$F0' Literal.Number.Hex
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'HexChar' Name
'[' Punctuation
-' ' Text
+' ' Text.Whitespace
'b' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'$0F' Literal.Number.Hex
-' ' Text
+' ' Text.Whitespace
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
"{function HexOfCard2(c: Cardinal): string;\nvar\n Data: array[0..(1 shl 4) - 1] of Char;\n i: Integer;\nbegin\n for i := 0 to (1 shl 4) - 1 do\n if i < 10 then\n Data[i] := Char(Ord('0') + i)\n else\n Data[i] := Char(Ord('A') + i - 10);\n\n Result := Data[(c and (((1 shl (1 shl 2)) - 1) shl (7 shl 2))) shr (7 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (6 shl 2))) shr (6 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (5 shl 2))) shr (5 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (4 shl 2))) shr (4 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (3 shl 2))) shr (3 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (2 shl 2))) shr (2 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (1 shl 2))) shr (1 shl 2)]\n + Data[(c and (((1 shl (1 shl 2)) - 1) shl (0 shl 2))) shr (0 shl 2)];\nend; }" Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfCard' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'$F' Literal.Number.Hex
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'HexChar' Name
'[' Punctuation
'a' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfCard' Name.Function
'(' Punctuation
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Digits' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'$F' Literal.Number.Hex
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'HexChar' Name
'[' Punctuation
'a' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MulStr' Name
'(' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'Digits' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'PascalHexArray' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Name' Keyword.Pseudo
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'const' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
': array[0..' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'IntToStr' Name.Builtin
'(' Punctuation
'High' Name.Builtin
'(' Punctuation
'a' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'] of Byte = (' Literal.String
"'" Literal.String
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'len' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'19' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'$' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'HexOfByte' Name
'(' Punctuation
'a' Name
@@ -16720,157 +16720,157 @@
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'len' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
',' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' );' Literal.String
"'" Literal.String
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'HexOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'HexOfByte' Name
'(' Punctuation
'a' Name
@@ -16878,82 +16878,82 @@
'i' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'i' Name
'+' Operator
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'HexOfByte' Name
'(' Punctuation
'a' Name
@@ -16961,167 +16961,167 @@
'i' Name
'])' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfByteA' Name.Function
'(' Punctuation
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TByteA' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
' ' Literal.String
"'" Literal.String
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'max' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Bit' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'max' Name.Builtin
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'High' Name.Builtin
'(' Punctuation
'a' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'7' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'max' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Bit' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'7' Literal.Number.Integer
'-' Operator
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'TBitSet' Name
'(' Punctuation
'a' Name
'[' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
'(' Punctuation
'Byte' Keyword.Type
@@ -17130,90 +17130,90 @@
'0' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'Bit' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'max' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'i' Name
'+' Operator
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'Blocks' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Splitter' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'a' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
'(' Punctuation
'Byte' Keyword.Type
@@ -17222,811 +17222,811 @@
'0' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'a' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CardOfHex' Name.Function
'(' Punctuation
'Hex' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Hex' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'ExtractChars' Name
'(' Punctuation
'Hex' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'HexadecimalChars' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Hex' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Hex' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'HexOrd' Name
'(' Punctuation
'Hex' Name
'[' Punctuation
'i' Name
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'shl' Keyword
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'Length' Name.Builtin
'(' Punctuation
'Hex' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'shl' Keyword
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfBin' Name.Function
'(' Punctuation
'Bin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Bin' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'ExtractChars' Name
'(' Punctuation
'Bin' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'BinaryChars' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'32' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Bin' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'downto' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Bin' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'1' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'shl' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Length' Name.Builtin
'(' Punctuation
'Bin' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
'))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfInt' Name.Function
'(' Punctuation
'n' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
'(' Punctuation
'a' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BinOfIntFill' Name.Function
'(' Punctuation
'n' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MulStr' Name
'(' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
'(' Punctuation
'a' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'n' Name
-' ' Text
+' ' Text.Whitespace
'shr' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'MulStr' Name
'(' Punctuation
"'" Literal.String
'0' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'MinCount' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'BaseNOfInt' Name.Function
'(' Punctuation
'I' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TBaseN' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'B' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'i' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'a' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'B' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'BaseNChar' Name
'[' Punctuation
'a' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'B' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'IntOfBaseN' Name.Function
'(' Punctuation
'V' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TBaseN' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'c' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'V' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TrimAll' Name
'(' Punctuation
'V' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'V' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'downto' Keyword
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'UpCase' Name.Builtin
@@ -18036,16 +18036,16 @@
'i' Name
']))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'case' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
'(' Punctuation
'c' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'0' Literal.String
"'" Literal.String
@@ -18055,19 +18055,19 @@
'9' Literal.String
"'" Literal.String
':' Operator
-' ' Text
+' ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'48' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'A' Literal.String
"'" Literal.String
@@ -18077,1632 +18077,1632 @@
'Z' Literal.String
"'" Literal.String
':' Operator
-' ' Text
+' ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'55' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'c' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
'(' Punctuation
'c' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'F' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'F' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'F' Name
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'KeepIn' Name.Function
'(' Punctuation
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'i' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InRange' Name.Function
'(' Punctuation
'Value' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Value' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Value' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InStrictRange' Name.Function
'(' Punctuation
'Value' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Variant' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Value' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Value' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Min' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Min' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TIntA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Max' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Max' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TIntA' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'0' Literal.Number.Integer
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'A' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'A' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'RangesOfStr' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TRanges' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'r' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'b' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
't' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TryStrToCard' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'Value' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'E' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Val' Name.Builtin
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Value' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'E' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'E' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TStringList' Name
'.' Operator
'Create' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Split' Name
'(' Punctuation
'S' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'RangesSeparator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SetLength' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'r' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'[' Punctuation
'i' Name
']' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'with' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
'RangeInnerSeparator' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'r' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Simple' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-' ' Text
+' ' Text.Whitespace
"// no '-' found" Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Simple' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'r' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'RangeInfinite' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-' ' Text
+' ' Text.Whitespace
'// * --> *-*' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Simple' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Bottom' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'Bottom' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Top' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Top' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'TryStrToCard' Name
'(' Punctuation
'r' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Value' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'TileStr' Name
'(' Punctuation
'r' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'b' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
't' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'b' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'RangeInfinite' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Bottom' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Low' Name.Builtin
'(' Punctuation
'Bottom' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'TryStrToCard' Name
'(' Punctuation
'b' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
't' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'RangeInfinite' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Top' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Top' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'TryStrToCard' Name
'(' Punctuation
't' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'p' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'p' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'SL' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SL' Name
'.' Operator
'Free' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'InRanges' Name.Function
'(' Punctuation
'Ranges' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TRanges' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'TestValue' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'High' Name.Builtin
'(' Punctuation
'Ranges' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'with' Keyword
-' ' Text
+' ' Text.Whitespace
'Ranges' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Simple' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'TestValue' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Value' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'InRange' Name.Builtin
'(' Punctuation
'TestValue' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Bottom' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Top' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'WriteSL' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Prefix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Suffix' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'i' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'i' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Strings' Name
'.' Operator
'Count' Name
'-' Operator
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'WriteLn' Name.Builtin
'(' Punctuation
'Prefix' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
'[' Punctuation
'i' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Suffix' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name.Function
'(' Punctuation
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ERROR_SUCCESS' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Res' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LastSuccessRes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Failure' Name.Function
'(' Punctuation
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ERROR_SUCCESS' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ResultOnSuccess' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ExpandString' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
'(' Punctuation
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExpandEnvironmentStrings' Name
'(' Punctuation
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ExpandEnvironmentStrings' Name
'(' Punctuation
'P' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Res' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAll' Name.Function
'(' Punctuation
'Strings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStrings' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileReturn' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFileNameFunc' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanDir' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PSR' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TSearchRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Add' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'S' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'Add' Name
@@ -19710,1641 +19710,1641 @@
'S' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Attributes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Assigned' Name.Builtin
'(' Punctuation
'FileReturn' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'FileReturn' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
'))' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Add' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindNext' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Attr' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'..' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindNext' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Strings' Name
'.' Operator
'Clear' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractFileName' Name.Builtin
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Strings' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAllFirst' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanDir' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PSR' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TSearchRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Attributes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FindAllFirst' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Attr' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'..' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindNext' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractFileName' Name.Builtin
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DeleteFiles' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Attributes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanDir' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PSR' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TSearchRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TryDeleteFile' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'DeleteFile' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'except' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Attributes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'TryDeleteFile' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindNext' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'ScanSubDirs' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirst' Name.Builtin
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'Success' Name
'(' Punctuation
'Res' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Attr' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'..' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'TryDeleteFile' Name
'(' Punctuation
'Path' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindNext' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Path' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractPath' Name
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractFileName' Name.Builtin
'(' Punctuation
'Mask' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ScanDir' Name
'(' Punctuation
'Path' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetFileNew' Name.Function
'(' Punctuation
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'NoFloppyDrives' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Drive' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'pf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pd' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PSR' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TSearchRec' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileName' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Trim' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Drive' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'ExtractDrive' Name
'(' Punctuation
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'DirectoryExists' Name.Builtin
'(' Punctuation
'Drive' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'NoFloppyDrives' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Drive' Name
'[' Punctuation
'1' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'in' Keyword
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
"'" Literal.String
'A' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'B' Literal.String
"'" Literal.String
'])' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Drive' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'pf' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Length' Name.Builtin
'(' Punctuation
'Drive' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'pf' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Len' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
'[' Punctuation
'pf' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'pf' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Continue' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'pd' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CharPos' Name
'(' Punctuation
"'" Literal.String
'\\' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pf' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'pd' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'=' Operator
'FindFirst' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxInt' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'faFindEveryFile' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'end' Keyword
-' ' Text
+' ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'=' Operator
'FindFirst' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'MaxInt' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'=' Operator
'FindFirst' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Copy' Name.Builtin
'(' Punctuation
'FileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'pd' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'pf' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'faDirectory' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'PSR' Name
'.' Operator
'Name' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FindClose' Name.Builtin
'(' Punctuation
'PSR' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Break' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'pf' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'pd' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'FileEx' Name
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
"'" Literal.String
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DateTimeOfFileTime' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileTime' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFileTime' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'TDateTime' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'LocalFileTime' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFileTime' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'FileTimeToLocalFileTime' Name
'(' Punctuation
'FileTime' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LocalFileTime' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'FileTimeToDosDateTime' Name
'(' Punctuation
'LocalFileTime' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'LongRec' Name
'(' Punctuation
'Res' Name
@@ -21352,7 +21352,7 @@
'.' Operator
'Hi' Name
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LongRec' Name
'(' Punctuation
'Res' Name
@@ -21360,128 +21360,128 @@
'.' Operator
'Lo' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Res' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Res' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Res' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FileDateToDateTime' Name.Builtin
'(' Punctuation
'Res' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'except' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'FileNew' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'FileName' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Handle' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Handle' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FileCreate' Name.Builtin
'(' Punctuation
'FileName' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FileClose' Name.Builtin
'(' Punctuation
'Handle' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win32PlatformStr' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PlatformStrings' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'VER_PLATFORM_WIN32s' Name
@@ -21489,560 +21489,560 @@
'.' Operator
'VER_PLATFORM_WIN32_NT' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'string' Keyword
-' ' Text
+' ' Text.Whitespace
'=' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'(' Punctuation
"'" Literal.String
'VER_PLATFORM_WIN32s' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'VER_PLATFORM_WIN32_WINDOWS' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'VER_PLATFORM_WIN32_NT' Literal.String
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PlatformStrings' Name
'[' Punctuation
'Win32Platform' Name
']' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'FullOSInfo' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Format' Name.Builtin
'(' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'Platform: %s' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'Version: %d.%d Build %d' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'EOL' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'CSD: %s' Literal.String
"'" Literal.String
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'[' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'Win32PlatformStr' Name
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Win32MajorVersion' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Win32MinorVersion' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Win32BuildNumber' Name
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Win32CSDVersion' Name
-'\n ' Text
+'\n ' Text.Whitespace
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win9x' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Win32Platform' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'VER_PLATFORM_WIN32_WINDOWS' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinNT' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Win32Platform' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'VER_PLATFORM_WIN32_NT' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Win2000' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Win32Platform' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'VER_PLATFORM_WIN32_NT' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Win32MajorVersion' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'WinXP' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Win32MajorVersion' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'5' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'initialization' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'MyDir' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetMyDir' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'end' Keyword
'.' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'unit' Keyword
-' ' Text
+' ' Text.Whitespace
'FifoStream' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'interface' Keyword
-'\n\n' Text
+'\n\n' Text.Whitespace
'uses' Keyword
-' ' Text
+' ' Text.Whitespace
'Classes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'windows' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Dialogs' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'DefaultChunksize' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'32768' Literal.Number.Integer
';' Operator
-' ' Text
+' ' Text.Whitespace
'// 32kb per chunk as default.' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'type' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PMemChunk' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'^' Operator
'TMemChunk' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'TMemChunk' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'record' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Filled' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longword' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Read' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longword' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Data' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'TFifo' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'private' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffers' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TList' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FChunksize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longword' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FCritSect' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TRTLCriticalSection' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FIsWinNT' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'boolean' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBytesInFifo' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'protected' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetBytesInFifo' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'public' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name.Function
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Destroy' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Write' Name.Function
'(' Punctuation
'Data' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Read' Name.Function
'(' Punctuation
'Buff' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'PeekData' Name.Function
'(' Punctuation
'Buff' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'published' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'BytesInFifo' Name.Property
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'read' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'FBytesInFifo' Name.Function
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'implementation' Keyword
-'\n\n' Text
+'\n\n' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'Create' Name.Function
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffers' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'TList' Name
'.' Operator
'Create' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// set default chunksize...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'DefaultChunksize' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'InitializeCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'Destroy' Name.Function
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'I' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'EnterCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'I' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'PMemChunk' Name
@@ -22055,7 +22055,7 @@
'Data' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dispose' Keyword
'(' Punctuation
'PMemChunk' Name
@@ -22065,122 +22065,122 @@
'I' Name
']))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Clear' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Free' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LeaveCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'DeleteCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'GetBytesInFifo' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FBuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'FChunkSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -22188,21 +22188,21 @@
'Fbuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'])' Punctuation
'.' Operator
'Filled' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -22213,129 +22213,129 @@
'Read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'Write' Name.Function
'(' Punctuation
'Data' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Privpointer' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PosInChunk' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
'(' Punctuation
'Data' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// null pointer? somebody is trying to fool us, get out...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'EnterCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PrivPointer' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Data' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// are already buffers there?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// is the last one of them not completely filled?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -22343,29 +22343,29 @@
'FBuffers' Name
'.' Operator
'count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'])' Punctuation
'.' Operator
'filled' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// not completely filled, so fill up the buffer.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -22373,27 +22373,27 @@
'FBuffers' Name
'.' Operator
'count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// fetch chunkdata.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'PosInChunk' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Data' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// move to current fill pos...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'LongWord' Keyword.Type
@@ -22401,70 +22401,70 @@
'PosInChunk' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// can we fill the chunk completely?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// yes we can.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'PrivPointer' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'PosInChunk' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'LongWord' Keyword.Type
@@ -22472,159 +22472,159 @@
'PrivPointer' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FChunkSize' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// we have to less data for filling the chunk completely,' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// just put everything in.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'PrivPointer' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'PosInChunk' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Chunk' Name
'.' Operator
'Filled' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// as long as we have remaining stuff put it into new chunks.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'new' Keyword
'(' Punctuation
'Chunk' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Chunk' Name
'.' Operator
'Data' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
'.' Operator
'Read' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// can we fill an entire chunk with the remaining data?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Privsize' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// yes we can, so put the stuff in.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'Privpointer' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Data' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'LongWord' Keyword.Type
@@ -22632,88 +22632,88 @@
'PrivPointer' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FChunksize' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'// we have to less data to fill the entire chunk, just put the remaining stuff in.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'Privpointer' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Data' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Privsize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Privsize' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Privsize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Fbuffers' Name
'.' Operator
'Add' Name
@@ -22721,21 +22721,21 @@
'Chunk' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Size' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Privsize' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Showmessage' Name
'(' Punctuation
"'" Literal.String
@@ -22743,141 +22743,141 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBytesInFifo' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetBytesInFifo' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LeaveCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'Read' Name.Function
'(' Punctuation
'Buff' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Privpos' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkPos' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
'(' Punctuation
'Buff' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// null pointer? somebody is trying to fool us, get out...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'EnterCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Privpos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Buff' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -22885,17 +22885,17 @@
'0' Literal.Number.Integer
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'data' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'LongWord' Keyword.Type
@@ -22903,82 +22903,82 @@
'ChunkPos' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// does the remaining part of the chunk fit into the buffer?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-' ' Text
+' ' Text.Whitespace
'// yep, it fits' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'ChunkPos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Privpos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Chunk' Name
@@ -22986,13 +22986,13 @@
'Data' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dispose' Keyword
'(' Punctuation
'Chunk' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Delete' Name
@@ -23000,233 +23000,233 @@
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
"// remaining part didn't fit, get as much as we can and increment the" Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// read attribute.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'ChunkPos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Privpos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'Chunk' Name
'.' Operator
'read' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"// as we filled the buffer, we'll have to break here." Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'break' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBytesInFifo' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetBytesInFifo' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LeaveCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'// read Data from Stream without removing it from the Stream...' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TFifo' Name.Class
'.' Operator
'PeekData' Name.Function
'(' Punctuation
'Buff' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Privpos' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkPos' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkNr' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'LongWord' Keyword.Type
'(' Punctuation
'Buff' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// null pointer? somebody is trying to fool us, get out...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'EnterCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Privpos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Buff' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkNr' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'FBuffers' Name
'.' Operator
'Count' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'ChunkNr' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Chunk' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PMemChunk' Name
'(' Punctuation
'FBuffers' Name
@@ -23234,17 +23234,17 @@
'ChunkNr' Name
'])' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ChunkPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'data' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'LongWord' Keyword.Type
@@ -23252,159 +23252,159 @@
'ChunkPos' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'// does the remaining part of the chunk fit into the buffer?' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-' ' Text
+' ' Text.Whitespace
'// yep, it fits' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'ChunkPos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Privpos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'Filled' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Chunk' Name
'.' Operator
'read' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'ChunkNr' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
"// remaining part didn't fit, get as much as we can and increment the" Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// read attribute.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'ChunkPos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'Privpos' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'PrivSize' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
"// as we filled the buffer, we'll have to break here." Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'break' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'LeaveCriticalSection' Name
'(' Punctuation
'FCritSect' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReqSize' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PrivSize' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'end' Keyword
'.' Operator
-'\n' Text
+'\n' Text.Whitespace
diff --git a/tests/examplefiles/delphi/test.pas.output b/tests/examplefiles/delphi/test.pas.output
index 3749066a..84101243 100644
--- a/tests/examplefiles/delphi/test.pas.output
+++ b/tests/examplefiles/delphi/test.pas.output
@@ -1,348 +1,348 @@
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'// Sourcecode from http://www.delphi-library.de/topic_47880.html' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'uses' Keyword
-' ' Text
+' ' Text.Whitespace
'Windows' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Messages' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FFM_INIT' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'WM_USER' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1976' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FFM_ONFILEFOUND' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'WM_USER' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1974' Literal.Number.Integer
';' Operator
-' ' Text
+' ' Text.Whitespace
'// wParam: not used, lParam: Filename' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'FFM_ONDIRFOUND' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'WM_USER' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'1975' Literal.Number.Integer
';' Operator
-' ' Text
+' ' Text.Whitespace
'// wParam: NumFolder, lParam: Directory' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'CntFolders' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'NumFolder' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'Cardinal' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'////////////////////////////////////////////////////////////////////////////////' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'// FindAllFilesInit' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAllFilesInit' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'label' Keyword
-' ' Text
+' ' Text.Whitespace
'foo' Name.Label
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'CntFolders' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'NumFolder' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'foo' Name.Label
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Blub' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'goto' Keyword
-' ' Text
+' ' Text.Whitespace
'foo' Name.Label
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'////////////////////////////////////////////////////////////////////////////////' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'// CountFolders' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'CountFolders' Name.Function
'(' Punctuation
'Handle' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'wfd' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'TWin32FindData' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SendMessage' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FFM_INIT' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
'[' Punctuation
'length' Name.Builtin
'(' Punctuation
'RootFolder' Name
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ZeroMemory' Name
'(' Punctuation
'@' Operator
'wfd' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'wfd' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'wfd' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_NORMAL' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirstFile' Name
'(' Punctuation
'pointer' Keyword.Type
'(' Punctuation
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*.*' Literal.String
"'" Literal.String
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'repeat' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'wfd' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'string' Keyword
'(' Punctuation
@@ -350,17 +350,17 @@
'.' Operator
'cFileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'string' Keyword
'(' Punctuation
@@ -368,66 +368,66 @@
'.' Operator
'cFileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'..' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'CountFolders' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
'.' Operator
'cFileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'until' Keyword
-' ' Text
+' ' Text.Whitespace
'FindNextFile' Name
'(' Punctuation
'hFindFile' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'CntFolders' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Windows' Name
'.' Operator
'FindClose' Name
@@ -435,203 +435,203 @@
'hFindFile' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'////////////////////////////////////////////////////////////////////////////////' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'// FindAllFiles' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'FindAllFiles' Name.Function
'(' Punctuation
'Handle' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Mask' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'string' Keyword
';' Operator
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'True' Keyword
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'wfd' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
-' ' Text
+' ' Text.Whitespace
'TWin32FindData' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
'[' Punctuation
'length' Name.Builtin
'(' Punctuation
'RootFolder' Name
')]' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'\\' Literal.String
"'" Literal.String
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ZeroMemory' Name
'(' Punctuation
'@' Operator
'wfd' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'wfd' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'wfd' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_NORMAL' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirstFile' Name
'(' Punctuation
'pointer' Keyword.Type
'(' Punctuation
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'*.*' Literal.String
"'" Literal.String
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'repeat' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'wfd' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'string' Keyword
'(' Punctuation
@@ -639,17 +639,17 @@
'.' Operator
'cFileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'.' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'string' Keyword
'(' Punctuation
@@ -657,78 +657,78 @@
'.' Operator
'cFileName' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'..' Literal.String
"'" Literal.String
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FindAllFiles' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
'.' Operator
'cFileName' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Mask' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Recurse' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'until' Keyword
-' ' Text
+' ' Text.Whitespace
'FindNextFile' Name
'(' Punctuation
'hFindFile' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'NumFolder' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'SendMessage' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FFM_ONDIRFOUND' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'NumFolder' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'lParam' Name
'(' Punctuation
'string' Keyword
@@ -736,9 +736,9 @@
'RootFolder' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Windows' Name
'.' Operator
'FindClose' Name
@@ -746,115 +746,115 @@
'hFindFile' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FindFirstFile' Name
'(' Punctuation
'pointer' Keyword.Type
'(' Punctuation
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'Mask' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'hFindFile' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'INVALID_HANDLE_VALUE' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'repeat' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'wfd' Name
'.' Operator
'dwFileAttributes' Name
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'FILE_ATTRIBUTE_DIRECTORY' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'SendMessage' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FFM_ONFILEFOUND' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'lParam' Name
'(' Punctuation
'string' Keyword
'(' Punctuation
'RootFolder' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
'.' Operator
'cFileName' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'until' Keyword
-' ' Text
+' ' Text.Whitespace
'FindNextFile' Name
'(' Punctuation
'hFindFile' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'wfd' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Windows' Name
'.' Operator
'FindClose' Name
@@ -862,1382 +862,1382 @@
'hFindFile' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'test' Name.Property
':' Operator
-' ' Text
+' ' Text.Whitespace
'boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'read' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'ftest' Name.Function
-' ' Text
+' ' Text.Whitespace
'write' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'ftest' Name.Function
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'test' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'boolean' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'read' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'ftest' Name
-' ' Text
+' ' Text.Whitespace
'write' Name.Builtin
-' ' Text
+' ' Text.Whitespace
'ftest' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'//' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'// This sourcecode is part of omorphia' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'//' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'Function' Keyword
-' ' Text
+' ' Text.Whitespace
'IsValidHandle' Name.Function
'(' Punctuation
'Const' Keyword
-' ' Text
+' ' Text.Whitespace
'Handle' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Boolean' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'{$IFDEF OMORPHIA_FEATURES_USEASM}' Comment.Multiline
-' ' Text
+' ' Text.Whitespace
'Assembler' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'Asm' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'TEST' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'JZ' Keyword
-' ' Text
+' ' Text.Whitespace
'@@Finish' Name.Label
-'\n ' Text
+'\n ' Text.Whitespace
'NOT' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'TEST' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'SETNZ' Keyword
-' ' Text
+' ' Text.Whitespace
'AL' Name.Builtin
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'{$IFDEF WINDOWS}' Comment.Multiline
-'\n ' Text
+'\n ' Text.Whitespace
'JZ' Keyword
-' ' Text
+' ' Text.Whitespace
'@@Finish' Name.Label
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'//Save the handle against modifications or loss' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'//reserve some space for a later duplicate' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'//Check if we are working on NT-Platform' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'IsWindowsNTSystem' Name
-'\n ' Text
+'\n ' Text.Whitespace
'TEST' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'JZ' Keyword
-' ' Text
+' ' Text.Whitespace
'@@NoNTSystem' Name.Label
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'DWORD' Name
-' ' Text
+' ' Text.Whitespace
'PTR' Name
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'ESP' Name.Builtin
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'LEA' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'DWORD' Name
-' ' Text
+' ' Text.Whitespace
'PTR' Name
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'ESP' Name.Builtin
'+' Operator
'$04' Literal.Number.Hex
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'GetHandleInformation' Name
-'\n ' Text
+'\n ' Text.Whitespace
'TEST' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'JNZ' Keyword
-' ' Text
+' ' Text.Whitespace
'@@Finish2' Name.Label
-'\n\n' Text
+'\n\n' Text.Whitespace
'@@NoNTSystem' Name.Label
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'//Result := DuplicateHandle(GetCurrentProcess, Handle, GetCurrentProcess,' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// @Duplicate, 0, False, DUPLICATE_SAME_ACCESS);' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'DUPLICATE_SAME_ACCESS' Name
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'$00000000' Literal.Number.Hex
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'$00000000' Literal.Number.Hex
-'\n ' Text
+'\n ' Text.Whitespace
'LEA' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'DWORD' Name
-' ' Text
+' ' Text.Whitespace
'PTR' Name
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'ESP' Name.Builtin
'+' Operator
'$0C' Literal.Number.Hex
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'GetCurrentProcess' Name
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'DWORD' Name
-' ' Text
+' ' Text.Whitespace
'PTR' Name
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'ESP' Name.Builtin
'+' Operator
'$18' Literal.Number.Hex
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'DuplicateHandle' Name
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'TEST' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
',' Operator
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'JZ' Keyword
-' ' Text
+' ' Text.Whitespace
'@@Finish2' Name.Label
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'// Result := CloseHandle(Duplicate);' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'DWORD' Name
-' ' Text
+' ' Text.Whitespace
'PTR' Name
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'ESP' Name.Builtin
']' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'CloseHandle' Name
-'\n\n' Text
+'\n\n' Text.Whitespace
'@@Finish2' Name.Label
':' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'POP' Keyword
-' ' Text
+' ' Text.Whitespace
'EDX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'POP' Keyword
-' ' Text
+' ' Text.Whitespace
'EDX' Name.Builtin
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'PUSH' Keyword
-' ' Text
+' ' Text.Whitespace
'$00000000' Literal.Number.Hex
-'\n ' Text
+'\n ' Text.Whitespace
'CALL' Keyword
-' ' Text
+' ' Text.Whitespace
'SetLastError' Name
-'\n ' Text
+'\n ' Text.Whitespace
'POP' Keyword
-' ' Text
+' ' Text.Whitespace
'EAX' Name.Builtin
-'\n ' Text
+'\n ' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'@@Finish' Name.Label
':' Operator
-'\n' Text
+'\n' Text.Whitespace
'End' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ELSE}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'Var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Duplicate' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'THandle' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Flags' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'DWORD' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'Begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'If' Keyword
-' ' Text
+' ' Text.Whitespace
'IsWinNT' Name
-' ' Text
+' ' Text.Whitespace
'Then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'GetHandleInformation' Name
'(' Punctuation
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Flags' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'Else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'If' Keyword
-' ' Text
+' ' Text.Whitespace
'Not' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'Then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'// DuplicateHandle is used as an additional check for those object types not' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// supported by GetHandleInformation (e.g. according to the documentation,' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"// GetHandleInformation doesn't support window stations and desktop although" Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// tests show that it does). GetHandleInformation is tried first because its' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'// much faster. Additionally GetHandleInformation is only supported on NT...' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'DuplicateHandle' Name
'(' Punctuation
'GetCurrentProcess' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Handle' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'GetCurrentProcess' Name
',' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'@' Operator
'Duplicate' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
',' Operator
-' ' Text
+' ' Text.Whitespace
'False' Keyword
',' Operator
-' ' Text
+' ' Text.Whitespace
'DUPLICATE_SAME_ACCESS' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'If' Keyword
-' ' Text
+' ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
'Then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'CloseHandle' Name
'(' Punctuation
'Duplicate' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'End' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'End' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'{$ENDIF}' Comment.Multiline
-'\n\n\n \t\n\n' Text
+'\n\n\n \t\n\n' Text.Whitespace
'{*******************************************************}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ Delphi Supplemental Components }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ ZLIB Data Compression Interface Unit }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ Copyright (c) 1997 Borland International }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{ }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{*******************************************************}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ Modified for zlib 1.1.3 by Davide Moretti <dave@rimini.com }' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'unit' Keyword
-' ' Text
+' ' Text.Whitespace
'zlib' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'interface' Keyword
-'\n\n' Text
+'\n\n' Text.Whitespace
'uses' Keyword
-' ' Text
+' ' Text.Whitespace
'Sysutils' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Classes' Name
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'type' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'TAlloc' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'AppData' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Items' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'TFree' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'AppData' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Block' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'// Internal structure. Ignore.' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'TZStreamRec' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'packed' Keyword
-' ' Text
+' ' Text.Whitespace
'record' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'next_in' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// next input byte' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'avail_in' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// number of bytes available at next_in' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'total_in' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// total nb of input bytes read so far' Comment.Single
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'next_out' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// next output byte should be put here' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'avail_out' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// remaining free space at next_out' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'total_out' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// total nb of bytes output so far' Comment.Single
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'msg' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// last error message, NULL if no error' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'internal' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// not visible by applications' Comment.Single
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'zalloc' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TAlloc' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'// used to allocate the internal state' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'zfree' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TFree' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'// used to free the internal state' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'AppData' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// private data object passed to zalloc and zfree' Comment.Single
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'data_type' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// best guess about the data type: ascii or binary' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'adler' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// adler32 value of the uncompressed data' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'reserved' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'// reserved for future use' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'// Abstract ancestor class' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
'TCustomZlibStream' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'TStream' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'private' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrmPos' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FOnProgress' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TNotifyEvent' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FBuffer' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'Word' Keyword.Type
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'protected' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'Progress' Name.Function
'(' Punctuation
'Sender' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TObject' Keyword.Type
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'dynamic' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'OnProgress' Name.Property
':' Operator
-' ' Text
+' ' Text.Whitespace
'TNotifyEvent' Name
-' ' Text
+' ' Text.Whitespace
'read' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'FOnProgress' Name.Function
-' ' Text
+' ' Text.Whitespace
'write' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'FOnProgress' Name.Function
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name.Function
'(' Punctuation
'Strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ TCompressionStream compresses data on the fly as data is written to it, and\n stores the compressed data to another stream.\n\n TCompressionStream is write-only and strictly sequential. Reading from the\n stream will raise an exception. Using Seek to move the stream pointer\n will raise an exception.\n\n Output data is cached internally, written to the output stream only when\n the internal output buffer is full. All pending output data is flushed\n when the stream is destroyed.\n\n The Position property returns the number of uncompressed bytes of\n data that have been written to the stream so far.\n\n CompressionRate returns the on-the-fly percentage by which the original\n data has been compressed: (1 - (CompressedBytes / UncompressedBytes)) * 100\n If raw data size = 100 and compressed data size = 25, the CompressionRate\n is 75%\n\n The OnProgress event is called each time the output buffer is filled and\n written to the output stream. This is useful for updating a progress\n indicator when you are writing a large chunk of data to the compression\n stream in a single call.}' Comment.Multiline
-'\n\n\n ' Text
+'\n\n\n ' Text.Whitespace
'TCompressionLevel' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'clNone' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'clFastest' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'clDefault' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'clMax' Name
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'TCompressionStream' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'TCustomZlibStream' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'private' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'GetCompressionRate' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Single' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'public' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name.Function
'(' Punctuation
'CompressionLevel' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCompressionLevel' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Dest' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Destroy' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Read' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Write' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Seek' Name.Function
'(' Punctuation
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Origin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Word' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'CompressionRate' Name.Property
':' Operator
-' ' Text
+' ' Text.Whitespace
'Single' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'read' Keyword.Pseudo
-' ' Text
+' ' Text.Whitespace
'GetCompressionRate' Name.Function
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'OnProgress' Name.Property
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{ TDecompressionStream decompresses data on the fly as data is read from it.\n\n Compressed data comes from a separate source stream. TDecompressionStream\n is read-only and unidirectional; you can seek forward in the stream, but not\n backwards. The special case of setting the stream position to zero is\n allowed. Seeking forward decompresses data until the requested position in\n the uncompressed data has been reached. Seeking backwards, seeking relative\n to the end of the stream, requesting the size of the stream, and writing to\n the stream will raise an exception.\n\n The Position property returns the number of bytes of uncompressed data that\n have been read from the stream so far.\n\n The OnProgress event is called each time the internal input buffer of\n compressed data is exhausted and the next block is read from the input stream.\n This is useful for updating a progress indicator when you are reading a\n large chunk of data from the decompression stream in a single call.}' Comment.Multiline
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'TDecompressionStream' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'TCustomZlibStream' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'public' Keyword.Pseudo
-'\n ' Text
+'\n ' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name.Function
'(' Punctuation
'Source' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'Destroy' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Read' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Write' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'Seek' Name.Function
'(' Punctuation
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Origin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Word' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'override' Keyword.Pseudo
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'property' Keyword
-' ' Text
+' ' Text.Whitespace
'OnProgress' Name.Property
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n\n' Text
+'\n\n\n\n' Text.Whitespace
'{ CompressBuf compresses data, buffer to buffer, in one call.\n In: InBuf = ptr to compressed data\n InBytes = number of bytes in InBuf\n Out: OutBuf = ptr to newly allocated buffer containing decompressed data\n OutBytes = number of bytes in OutBuf }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'CompressBuf' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'{ DecompressBuf decompresses data, buffer to buffer, in one call.\n In: InBuf = ptr to compressed data\n InBytes = number of bytes in InBuf\n OutEstimate = zero, or est. size of the decompressed data\n Out: OutBuf = ptr to newly allocated buffer containing decompressed data\n OutBytes = number of bytes in OutBuf }' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DecompressBuf' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OutEstimate' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'zlib_version' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
"'" Literal.String
'1.1.3' Literal.String
"'" Literal.String
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'type' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'EZlibError' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'Exception' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ECompressionError' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'EZlibError' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'EDecompressionError' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'class' Keyword
'(' Punctuation
'EZlibError' Name
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'adler32' Name.Function
'(' Punctuation
'adler' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'buf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'len' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'implementation' Keyword
-'\n\n' Text
+'\n\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Z_NO_FLUSH' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_PARTIAL_FLUSH' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_SYNC_FLUSH' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_FULL_FLUSH' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'3' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_FINISH' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'4' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Z_OK' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_STREAM_END' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_NEED_DICT' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_ERRNO' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_STREAM_ERROR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'2' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_DATA_ERROR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'3' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_MEM_ERROR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'4' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_BUF_ERROR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'5' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_VERSION_ERROR' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'6' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Z_NO_COMPRESSION' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_BEST_SPEED' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_BEST_COMPRESSION' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'9' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_DEFAULT_COMPRESSION' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'-' Operator
'1' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Z_FILTERED' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_HUFFMAN_ONLY' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_DEFAULT_STRATEGY' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Z_BINARY' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_ASCII' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Z_UNKNOWN' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'2' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'Z_DEFLATED' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'8' Literal.Number.Integer
';' Operator
-'\n\n ' Text
+'\n\n ' Text.Whitespace
'_z_errmsg' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
'[' Punctuation
'0' Literal.Number.Integer
@@ -2245,676 +2245,676 @@
'.' Operator
'9' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'need dictionary' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_NEED_DICT (2)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'stream end' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_STREAM_END (1)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_OK (0)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'file error' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_ERRNO (-1)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'stream error' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_STREAM_ERROR (-2)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'data error' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_DATA_ERROR (-3)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'insufficient memory' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_MEM_ERROR (-4)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'buffer error' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_BUF_ERROR (-5)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
'incompatible version' Literal.String
"'" Literal.String
',' Operator
-' ' Text
+' ' Text.Whitespace
'// Z_VERSION_ERROR (-6)' Comment.Single
-'\n ' Text
+'\n ' Text.Whitespace
"'" Literal.String
"'" Literal.String
-'\n ' Text
+'\n ' Text.Whitespace
')' Punctuation
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'{$L deflate.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L inflate.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L inftrees.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L trees.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L adler32.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L infblock.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L infcodes.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L infutil.obj}' Comment.Multiline
-'\n' Text
+'\n' Text.Whitespace
'{$L inffast.obj}' Comment.Multiline
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_tr_init' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_tr_tally' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_tr_flush_block' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_tr_align' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_tr_stored_block' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'adler32' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_blocks_new' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_blocks' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_blocks_reset' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_blocks_free' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_set_dictionary' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_trees_bits' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_trees_dynamic' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_trees_fixed' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_codes_new' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_codes' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_codes_free' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_inflate_mask' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_flush' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate_fast' Name.Function
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_memset' Name.Function
'(' Punctuation
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Byte' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
'cdecl' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FillChar' Name.Builtin
'(' Punctuation
'P' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'count' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'B' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'_memcpy' Name.Function
'(' Punctuation
'dest' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'source' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
'cdecl' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Move' Name.Builtin
'(' Punctuation
'source' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'dest' Name
'^' Operator
',' Operator
-' ' Text
+' ' Text.Whitespace
'count' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n\n' Text
+'\n\n\n\n' Text.Whitespace
'// deflate compresses data' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'deflateInit_' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'level' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'version' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'recsize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'deflate' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'flush' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'deflateEnd' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'// inflate decompresses data' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'inflateInit_' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'version' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'recsize' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'inflate' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'flush' Name.Builtin
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'inflateEnd' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'inflateReset' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'external' Keyword.Pseudo
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'zcalloc' Name.Function
'(' Punctuation
'AppData' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Items' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Size' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'Result' Name.Builtin.Pseudo
',' Operator
-' ' Text
+' ' Text.Whitespace
'Items' Name
'*' Operator
'Size' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'zcfree' Name.Function
'(' Punctuation
'AppData' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Block' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'Block' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'zlibCheck' Name.Function
'(' Punctuation
'code' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'code' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'code' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'EZlibError' Name
'.' Operator
'Create' Name
@@ -2924,51 +2924,51 @@
"'" Literal.String
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'//!!' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'CCheck' Name.Function
'(' Punctuation
'code' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'code' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'code' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'ECompressionError' Name
'.' Operator
'Create' Name
@@ -2978,51 +2978,51 @@
"'" Literal.String
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'//!!' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'DCheck' Name.Function
'(' Punctuation
'code' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'code' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'code' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'EDecompressionError' Name
'.' Operator
'Create' Name
@@ -3032,252 +3032,252 @@
"'" Literal.String
')' Punctuation
';' Operator
-' ' Text
+' ' Text.Whitespace
'//!!' Comment.Single
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'CompressBuf' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FillChar' Name.Builtin
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'strm' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OutBytes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'InBytes' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'InBytes' Name
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'10' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'12' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'255' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'255' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'CCheck' Name
'(' Punctuation
'deflateInit_' Name
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_BEST_COMPRESSION' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'zlib_version' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'strm' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'CCheck' Name
'(' Punctuation
'deflate' Name
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_FINISH' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Z_STREAM_END' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'OutBytes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'256' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReallocMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
'(' Punctuation
'Integer' Keyword.Type
'(' Punctuation
'OutBuf' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Integer' Keyword.Type
'(' Punctuation
@@ -3285,30 +3285,30 @@
'.' Operator
'next_out' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
'(' Punctuation
'P' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'256' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'CCheck' Name
'(' Punctuation
'deflateEnd' Name
@@ -3316,308 +3316,308 @@
'strm' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReallocMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'strm' Name
'.' Operator
'total_out' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OutBytes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'strm' Name
'.' Operator
'total_out' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'except' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'DecompressBuf' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OutEstimate' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'out' Name
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TZStreamRec' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Pointer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'BufInc' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FillChar' Name.Builtin
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'strm' Name
')' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'BufInc' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'InBytes' Name
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'255' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'not' Keyword
-' ' Text
+' ' Text.Whitespace
'255' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'OutEstimate' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'OutBytes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'BufInc' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'OutBytes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutEstimate' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'GetMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'InBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'InBytes' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflateInit_' Name
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'zlib_version' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'strm' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflate' Name
'(' Punctuation
'strm' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_FINISH' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Z_STREAM_END' Name
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'P' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'OutBuf' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Inc' Name.Builtin
'(' Punctuation
'OutBytes' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'BufInc' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReallocMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'OutBytes' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'PChar' Keyword.Type
'(' Punctuation
'Integer' Keyword.Type
'(' Punctuation
'OutBuf' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'+' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Integer' Keyword.Type
'(' Punctuation
@@ -3625,30 +3625,30 @@
'.' Operator
'next_out' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
'(' Punctuation
'P' Name
')))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'strm' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'BufInc' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflateEnd' Name
@@ -3656,304 +3656,304 @@
'strm' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReallocMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'strm' Name
'.' Operator
'total_out' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'OutBytes' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'strm' Name
'.' Operator
'total_out' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'except' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FreeMem' Name.Builtin
'(' Punctuation
'OutBuf' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'// TCustomZlibStream' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TCustomZLibStream' Name.Class
'.' Operator
'Create' Name.Function
'(' Punctuation
'Strm' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Strm' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Strm' Name
'.' Operator
'Position' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'procedure' Keyword
-' ' Text
+' ' Text.Whitespace
'TCustomZLibStream' Name.Class
'.' Operator
'Progress' Name.Function
'(' Punctuation
'Sender' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TObject' Keyword.Type
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Assigned' Name.Builtin
'(' Punctuation
'FOnProgress' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'FOnProgress' Name
'(' Punctuation
'Sender' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'// TCompressionStream' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'Create' Name.Function
'(' Punctuation
'CompressionLevel' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TCompressionLevel' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Dest' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'const' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Levels' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'TCompressionLevel' Name
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'ShortInt' Keyword.Type
-' ' Text
+' ' Text.Whitespace
'=' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'(' Punctuation
'Z_NO_COMPRESSION' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_BEST_SPEED' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_DEFAULT_COMPRESSION' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_BEST_COMPRESSION' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name
'(' Punctuation
'Dest' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'CCheck' Name
'(' Punctuation
'deflateInit_' Name
'(' Punctuation
'FZRec' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Levels' Name
'[' Punctuation
'CompressionLevel' Name
']' Punctuation
',' Operator
-' ' Text
+' ' Text.Whitespace
'zlib_version' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FZRec' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'Destroy' Name.Function
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'nil' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'try' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'CCheck' Name
'(' Punctuation
@@ -3961,153 +3961,153 @@
'(' Punctuation
'FZRec' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Z_FINISH' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'Z_STREAM_END' Name
')' Punctuation
-'\n ' Text
+'\n ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
'.' Operator
'WriteBuffer' Name
'(' Punctuation
'FBuffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
'.' Operator
'WriteBuffer' Name
'(' Punctuation
'FBuffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'finally' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'deflateEnd' Name
'(' Punctuation
'FZRec' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
-' ' Text
+' ' Text.Whitespace
'Destroy' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'Read' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'ECompressionError' Name
'.' Operator
'Create' Name
@@ -4117,252 +4117,252 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'Write' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'@' Operator
'Buffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'CCheck' Name
'(' Punctuation
'deflate' Name
'(' Punctuation
'FZRec' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
'.' Operator
'WriteBuffer' Name
'(' Punctuation
'FBuffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Progress' Name
'(' Punctuation
'Self' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'Seek' Name.Function
'(' Punctuation
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Origin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Word' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Origin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'soFromCurrent' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_in' Name
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'ECompressionError' Name
'.' Operator
'Create' Name
@@ -4372,407 +4372,407 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TCompressionStream' Name.Class
'.' Operator
'GetCompressionRate' Name.Function
':' Operator
-' ' Text
+' ' Text.Whitespace
'Single' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_in' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'1.0' Literal.Number.Float
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FZRec' Name
'.' Operator
'total_out' Name
-' ' Text
+' ' Text.Whitespace
'/' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_in' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'*' Operator
-' ' Text
+' ' Text.Whitespace
'10' Literal.Number.Integer
'0.0' Literal.Number.Float
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n\n' Text
+'\n\n\n' Text.Whitespace
'// TDecompressionStream' Comment.Single
-'\n\n' Text
+'\n\n' Text.Whitespace
'constructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TDecompressionStream' Name.Class
'.' Operator
'Create' Name.Function
'(' Punctuation
'Source' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'TStream' Name
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
-' ' Text
+' ' Text.Whitespace
'Create' Name
'(' Punctuation
'Source' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflateInit_' Name
'(' Punctuation
'FZRec' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'zlib_version' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FZRec' Name
')))' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'destructor' Keyword
-' ' Text
+' ' Text.Whitespace
'TDecompressionStream' Name.Class
'.' Operator
'Destroy' Name.Function
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'inflateEnd' Name
'(' Punctuation
'FZRec' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'inherited' Keyword
-' ' Text
+' ' Text.Whitespace
'Destroy' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TDecompressionStream' Name.Class
'.' Operator
'Read' Name.Function
'(' Punctuation
'var' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'@' Operator
'Buffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
'<' Operator
'>' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrmPos' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'while' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'FZRec' Name
'.' Operator
'avail_out' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Read' Name
'(' Punctuation
'FBuffer' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'FBuffer' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_out' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Exit' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Progress' Name
'(' Punctuation
'Self' Keyword
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflate' Name
'(' Punctuation
'FZRec' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TDecompressionStream' Name.Class
'.' Operator
'Write' Name.Function
'(' Punctuation
'const' Keyword
-' ' Text
+' ' Text.Whitespace
'Buffer' Name
';' Operator
-' ' Text
+' ' Text.Whitespace
'Count' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'EDecompressionError' Name
'.' Operator
'Create' Name
@@ -4782,87 +4782,87 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'function' Keyword
-' ' Text
+' ' Text.Whitespace
'TDecompressionStream' Name.Class
'.' Operator
'Seek' Name.Function
'(' Punctuation
'Offset' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-' ' Text
+' ' Text.Whitespace
'Origin' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Word' Keyword.Type
')' Punctuation
':' Operator
-' ' Text
+' ' Text.Whitespace
'Longint' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'var' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'I' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'Integer' Keyword.Type
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Buf' Name
':' Operator
-' ' Text
+' ' Text.Whitespace
'array' Keyword
-' ' Text
+' ' Text.Whitespace
'[' Punctuation
'0' Literal.Number.Integer
'.' Operator
'.' Operator
'4095' Literal.Number.Integer
']' Punctuation
-' ' Text
+' ' Text.Whitespace
'of' Keyword
-' ' Text
+' ' Text.Whitespace
'Char' Keyword.Type
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Origin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'soFromBeginning' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'DCheck' Name
'(' Punctuation
'inflateReset' Name
@@ -4870,195 +4870,195 @@
'FZRec' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'next_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FBuffer' Name
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FZRec' Name
'.' Operator
'avail_in' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrm' Name
'.' Operator
'Position' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'FStrmPos' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-' ' Text
+' ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Origin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'soFromCurrent' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'or' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'(' Punctuation
-' ' Text
+' ' Text.Whitespace
'((' Punctuation
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'-' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_out' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'and' Keyword
-' ' Text
+' ' Text.Whitespace
'(' Punctuation
'Origin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'soFromBeginning' Name
'))' Punctuation
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Origin' Name
-' ' Text
+' ' Text.Whitespace
'=' Operator
-' ' Text
+' ' Text.Whitespace
'soFromBeginning' Name
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-' ' Text
+' ' Text.Whitespace
'Dec' Name.Builtin
'(' Punctuation
'Offset' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_out' Name
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'if' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'>' Operator
-' ' Text
+' ' Text.Whitespace
'0' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'then' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'begin' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'for' Keyword
-' ' Text
+' ' Text.Whitespace
'I' Name
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'1' Literal.Number.Integer
-' ' Text
+' ' Text.Whitespace
'to' Keyword
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'div' Keyword
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'Buf' Name
')' Punctuation
-' ' Text
+' ' Text.Whitespace
'do' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'ReadBuffer' Name
'(' Punctuation
'Buf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'Buf' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'ReadBuffer' Name
'(' Punctuation
'Buf' Name
',' Operator
-' ' Text
+' ' Text.Whitespace
'Offset' Name
-' ' Text
+' ' Text.Whitespace
'mod' Keyword
-' ' Text
+' ' Text.Whitespace
'sizeof' Name.Builtin
'(' Punctuation
'Buf' Name
'))' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'end' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'else' Keyword
-'\n ' Text
+'\n ' Text.Whitespace
'raise' Keyword
-' ' Text
+' ' Text.Whitespace
'EDecompressionError' Name
'.' Operator
'Create' Name
@@ -5068,22 +5068,22 @@
"'" Literal.String
')' Punctuation
';' Operator
-'\n ' Text
+'\n ' Text.Whitespace
'Result' Name.Builtin.Pseudo
-' ' Text
+' ' Text.Whitespace
':' Operator
'=' Operator
-' ' Text
+' ' Text.Whitespace
'FZRec' Name
'.' Operator
'total_out' Name
';' Operator
-'\n' Text
+'\n' Text.Whitespace
'end' Keyword
';' Operator
-'\n\n' Text
+'\n\n' Text.Whitespace
'end' Keyword
'.' Operator
-'\n' Text
+'\n' Text.Whitespace
View Lorry Controller Status