anchor.diff:  begin
     { TODO : Expand support for <=> evaluations (complicated to do). Expand support for NESTED expressions }
     LEvaluation := leeNone;
  -  if (Pos('DEFINED(', AParams) = 1) or (Pos('NOT DEFINED(', AParams) = 1) then
  +  LParams := TrimLeft(AParams);
  +  if (Pos('DEFINED(', LParams) = 1) or (Pos('NOT DEFINED(', LParams) = 1) then
     begin
  -    LParams := AParams;
       Result := True; // Optimistic
       while (Pos('DEFINED(', LParams) = 1) or (Pos('NOT DEFINED(', LParams) = 1) do
       begin
  
positive.code:       end;
      PtUndefDirect:
        begin
          if FUseDefines then
            RemoveDefine(DirectiveParam);
          if Assigned(FOnUnDefDirect) then
            FOnUnDefDirect(Self);
  
negative.code:       end;
      PtDefineDirect:
        begin
          if FUseDefines and (FDefineStack = 0) then
            AddDefine(DirectiveParam);
          if Assigned(FOnDefineDirect) then
            FOnDefineDirect(Self);
  