anchor.diff:  
   type
     MyDelegate = method(params args: Array of object): Object;  
  -  
  +
     Scripts = public class
     assembly
       fResult: String;
       method ExecuteJS(s: String): Object;
  -  protected
     public
       [Fact]
       method Error;
  
positive.code: Assert.Equal(fResult, 'LDA.CALL CALLED'#13#10);
  end;
  
  constructor LDA(aScripts: Scripts);
  begin
    fScripts := aScripts;
  end;
  
  method LDA.Call;
  begin
    fScripts.fResult := fScripts.fResult + 'LDA.CALL CALLED'#13#10;
  end;
  
  end.
  
negative.code:     constructor(aScripts: Scripts);
      method Call;
    end;
  
    SimpleCLRType = class
    public
      constructor();
  
      property A: Int32 read write;
      property B: String read write;
  
      class method Foo(): String;
    end;
  
  
  implementation
  
  method Scripts.EvalTest;
  