RosettaCodeData/Task/Host-introspection/Modula-3/host-introspection.mod3
2023-07-01 13:44:08 -04:00

12 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.