Source

Caml / OcamlMiniProj / ex02.bl

Full commit
main()
{
  vars a,b;

  a = 1;

  b = 0;

  if (a)
  {
    b = 10;
    write(b);
  }

  if ( b > a )
  {
    b = 5;
    write(b);
  }
  else
  {
    write(b);
  }
  while (b > 0)
  {
    write(b);
    b = b - 1;
  }
}