procedure {:checksum "0"} P();

implementation {:id "P"} {:checksum "1"} P()
{
    var i: int;

    i := 0;

    while (*)
    {
        i := 0;
    }

    assert i == 0;
}