Source position: pastree.pp line 1642
public function TPasImplBlock.AddBeginBlock: TPasImplBeginBlock;