anchor.diff:  
   procedure TmwBasePasLex.SetOrigin(NewValue: PChar);
   begin
  -  FOrigin := NewValue;
  +  //FOrigin := NewValue;
  +  FreeMem(FOrigin);
  +  GetMem(FOrigin, INCLUDE_BUFFER_SIZE);
  +  StrPCopy(FOrigin, NewValue);
     Init;
     Next;
   end;
  
positive.code:   begin
      IndludeFileName := Trim(Copy(IncludeDirective, 5, Length(IncludeDirective) - 5));
      Content := FIncludeHandler.GetIncludeFileContent(IndludeFileName);
      Origin := FOrigin;
      Origin := PChar(Copy(Origin, 1, Run - Length(IncludeDirective)) + Content + Copy(Origin, Run + 1, Length(Origin)));
      FOrigin :=PChar(Origin);
      Run := Run - Length(IncludeDirective);
      IncludedLineCount := 1;
      for CurrentChar in Content do
        if CurrentChar = #10 then
          Inc(IncludedLineCount);
      FLineNumber := FLineNumber - IncludedLineCount;
  
      //RunAhead := Run;
      Next;
    end;
  end;
  
  
negative.code: 
  implementation
  
  uses
    StrUtils;
  
  type
    TmwPasLexExpressionEvaluation = (leeNone, leeAnd, leeOr);
  
  const
    INCLUDE_BUFFER_SIZE = 1024*1024;
  
  procedure MakeIdentTable;
  var
  