13 lines
248 B
Text
13 lines
248 B
Text
|
MODULE Host EXPORTS Main;
|
||
|
|
|
||
|
|
IMPORT IO, Fmt, Word, Swap;
|
||
|
|
|
||
|
|
BEGIN
|
||
|
|
IO.Put("Word Size: " & Fmt.Int(Word.Size) & "\n");
|
||
|
|
IF Swap.endian = Swap.Endian.Big THEN
|
||
|
|
IO.Put("Endianness: Big\n");
|
||
|
|
ELSE
|
||
|
|
IO.Put("Endianness: Little\n");
|
||
|
|
END;
|
||
|
|
END Host.
|