10 lines
190 B
Text
10 lines
190 B
Text
|
MODULE ByteLength EXPORTS Main;
|
||
|
|
|
||
|
|
IMPORT IO, Fmt, Text;
|
||
|
|
|
||
|
|
VAR s: TEXT := "Foo bar baz";
|
||
|
|
|
||
|
|
BEGIN
|
||
|
|
IO.Put("Byte length of s: " & Fmt.Int((Text.Length(s) * BYTESIZE(s))) & "\n");
|
||
|
|
END ByteLength.
|