anchor.diff:      procedure ClassMethodHeading; virtual;
       procedure ClassMethodOrProperty; virtual;
       procedure ClassMethodResolution; virtual;
  +    procedure ClassOperatorHeading; virtual;
       procedure ClassProcedureHeading; virtual;
       procedure ClassClass; virtual;
       procedure ClassConstraint; virtual;
  
positive.code:   Expected(ptEqual);
    FunctionMethodName;
    Semicolon;
  end;
  
  procedure TmwSimplePasPar.ResolutionInterfaceName;
  
negative.code: 
  procedure TmwSimplePasPar.ClassFunctionHeading;
  begin
    Expected(ptFunction);
    FunctionProcedureName;
    if TokenID = ptRoundOpen then
  