summaryrefslogtreecommitdiff
path: root/tests/examplefiles/delphi/example.pas.output
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/delphi/example.pas.output
parent2f78a7bf950cfbf84a47156cb7dfd5da962d4784 (diff)
downloadpygments-git-6abce335cc0dde84567f848f55a1f1e5b69ed98e.tar.gz
Improve whitespace handling in the PascalLexer.
Diffstat (limited to 'tests/examplefiles/delphi/example.pas.output')
-rw-r--r--tests/examplefiles/delphi/example.pas.output14912
1 files changed, 7456 insertions, 7456 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
View Lorry Controller Status