anchor.diff:      begin
         if TCustomConstraintAttribute(LAttr).RawConstraint <> ARawConstraint then
           Continue;
  +
         LIntf := TCustomConstraintAttribute(LAttr).GetValidator;
  +
         if not Supports(LIntf as TObject, IConstraintValidator<TCustomConstraintAttribute>, LValidator) then
           raise EWiRLException.Create('Validator interface is not valid');
  +
         if not LValidator.IsValid(AValue, FContext) then
           raise EWiRLValidationError.Create(GetConstraintErrorMessage(TCustomConstraintAttribute(LAttr)));
       end;
  
positive.code: begin
    // Search a default value
    LDefaultValue := '';
    TRttiHelper.HasAttribute<DefaultValueAttribute>(AParam, procedure (LAttr: DefaultValueAttribute)
    begin
      LDefaultValue := LAttr.Value;
    end);
  
    LParamName := '';
    for LAttr in AAttrArray do
  
negative.code:   LValue: TValue;
  begin
    case AValue.Kind of
      tkClass:
      begin
        // If the request content stream is used as a param to a resource
        // it will be freed at the end process
        if AValue.AsObject <> FContext.Request.ContentStream then
  