anchor.diff:    else if AName = 'ADDALL' then
       AddAll(Args[0])
     else if AName = 'ASSIGN' then begin
  -    Result := VarToIntf(Args[0], IImmutableList, LList);
  +    Result := VarToIntf(Args[0], IList, LList);
       if Result then Assign(LList);
     end
     else if AName = 'CLEAR' then
  
positive.code:     Result := nil
    else if VType = varUnknown then
      Supports(IInterface(P^.VUnknown), IList, Result)
    else if VarIsObj(Value, TAbstractList) then
      VarToObj(Value, TAbstractList, Result)
    else
  
negative.code:     Result := nil
    else if VType = varUnknown then
      Supports(IInterface(P^.VUnknown), IMap, Result)
    else if VType = (varUnknown or varByRef) then
      Supports(IInterface(P^.VPointer^), IMap, Result)
    else if VarIsObj(Value, TAbstractMap) then
      VarToObj(Value, TAbstractMap, Result)
    else
  