path: root/fpcsrc/tests/webtbs/tw3968.pp

{ %recompile }

uses uw3968;
begin
  WriteLn(Ord(High(Tabc)));
end.