littletest60.out

来自「格式化源码的最新板」· OUT 代码 · 共 12 行

unit littletest60;

interface

implementation

const
  boolconst: 5 = (2 + 2)..(1 = 1) = False;
  validcharset: set of 'A'..'z' = ['A'..'Z', 'a'..'z'];

end.