Changeset 50 for branches/ByteArray/Parser.pas

Timestamp:

Nov 2, 2023, 11:18:06 PM (2 years ago)

Author:

chronos

Message:

• Added: Storage form.
• Added: Dissasembler form.
• Added: Debug and release build modes.
• Added: Support for interface translation.

File:

• branches/ByteArray/Parser.pas (modified) (2 diffs)

branches/ByteArray/Parser.pas

@@ -55 +55 @@
 implementation
 
+resourcestring
+  SUnknownCharacter = 'Unknown character %s';
+
 { TParserPos }
 
@@ -153 +156 @@
         Break;
       end else
-        Error('Unknown character ' + C, Pos.Pos);
+        Error(Format(SUnknownCharacter, [C]), Pos.Pos);
     end else
     if State = psIdentifier then begin