anchor.diff:      pRes, pSource : PWideChar;
       ParseState : TParseState;
     begin
  -    SourceLines := nil;
       if Length(Source) = 0 then Exit;
       pRes := PWideChar(Source);
       pSource := PWideChar(Source);
  
positive.code: { TODO 2 : Optimize out calls to Trim }
  Var
    UseModifiedSource : boolean;
    SourceLines : TStringList;
  
    function GetNthSourceLine(LineNo : integer) : string;
    begin
      if not Assigned(SourceLines) then begin
        SourceLines := TSmartPtr.Make(TStringList.Create)();
        SourceLines.Text := Module.Source;
      end;
  
  
negative.code:   GlobalList : TStringList;
    AsgnTargetCount : integer;
  begin
    SourceLines := nil;
  
    LineStarts := TSmartPtr.Make(TList.Create)();
    GlobalList := TSmartPtr.Make(TStringList.Create)();
    GlobalList.CaseSensitive := True;
  