RosettaCodeData/Task/Host-introspection/Modula-3/host-introspection.mod3
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07: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.