program SingleColon;
  var a;
begin
  a : 1
end