Import Upstream version 20180207

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

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