parser: add Main() procedure definition