Bart wrote:
On 9/17/13, Mark Morgan Lloyd <markmll.laza...@telemetry.co.uk> wrote:
Hans-Peter Diettrich wrote:

I've missed part of this thread due to messages dropped at our gateway,
but am currently trying to check on SPARC Linux.

Here's the comple code for you:

Code as posted plus your earlier event handler gives output as below:

Testing: 2-byte codepoint: $C2 $A2
Expected Length = 8
Found Length    = 8
Expected: $C2 $A2 $C2 $A2 $C2 $A2 $C2 $A2
Found   : $C2 $A2 $C2 $A2 $C2 $A2 $C2 $A2
Success!

Testing: 3-byte codepoint: $E2 $82 $AC
Expected Length = 12
Found Length    = 12
Expected: $E2 $82 $AC $E2 $82 $AC $E2 $82 $AC $E2 $82 $AC
Found   : $E2 $82 $AC $E2 $82 $AC $E2 $82 $AC $E2 $82 $AC
Success!

Testing: 4-byte codepoint: $F0 $A4 $AD $A2
Expected Length = 16
Found Length    = 16
Expected: $F0 $A4 $AD $A2 $F0 $A4 $AD $A2 $F0 $A4 $AD $A2 $F0 $A4 $AD $A2
Found   : $F0 $A4 $AD $A2 $F0 $A4 $AD $A2 $F0 $A4 $AD $A2 $F0 $A4 $AD $A2
Success!

--
Mark Morgan Lloyd
markMLl .AT. telemetry.co .DOT. uk

[Opinions above are the author's, not those of his employers or colleagues]

--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus.freepascal.org
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus

Reply via email to