Demonstrate how to get the size of a variable.

See also: Host introspection

MODULE Size EXPORTS Main;
 
FROM IO IMPORT Put;
FROM Fmt IMPORT Int;
 
BEGIN
  Put("Integer in bits: " & Int(BITSIZE(INTEGER)) & "\n");
  Put("Integer in bytes: " & Int(BYTESIZE(INTEGER)) & "\n");
END Size.