Import Upstream version 20180207

[hcoop/debian/mlton.git] / mlyacc / examples / pascal / test / t2.p

program p(input,output);
begin
  if x := 0 then x := 1
end.