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