with GNATCOM.IInterface;

package MSHTML.IElementNamespace_Interface is

   type IElementNamespace_Type is
     new GNATCOM.IInterface.Interface_Type with null record;

   procedure Initialize (This : in out IElementNamespace_Type);

   function Pointer (This : IElementNamespace_Type)
     return Pointer_To_IElementNamespace;

   procedure Attach (This    : in out IElementNamespace_Type;
                     Pointer : in     Pointer_To_IElementNamespace);

   procedure AddTag
     (This        : IElementNamespace_Type;
      bstrTagName : GNATCOM.Types.BSTR;
      lFlags      : Interfaces.C.long;
      Free        : Boolean := True);

end MSHTML.IElementNamespace_Interface;

