Source position: pastree.pp line 1468
public procedure TCaseExprBranch.AddLabel(
const Expr: TPasExpr
);