@rescript/webapi 0.1.0-experimental-d3d4b5f → 0.1.0-experimental-fb395c3

package/src/DOMAPI/Element.res

@@ -1,634 +1,470 @@
 open DOMAPI
 open Prelude
-open EventAPI
 
-external asNode: element => node = "%identity"
-external asEventTarget: element => eventTarget = "%identity"
-/**
-Inserts nodes before the first child of node, while replacing strings in nodes with equivalent Text nodes.
+module Impl = (
+  T: {
+    type t
+  },
+) => {
+  include Node.Impl({
+    type t = T.t
+  })
 
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/prepend)
-*/
-@send
-external prepend: (element, node) => unit = "prepend"
+  external asElement: T.t => element = "%identity"
 
-/**
-Inserts nodes before the first child of node, while replacing strings in nodes with equivalent Text nodes.
+  /**
+Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/prepend)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/after)
 */
-@send
-external prepend2: (element, string) => unit = "prepend"
+  @send
+  external after: (T.t, node) => unit = "after"
 
-/**
-Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
+  /**
+Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/append)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/after)
 */
-@send
-external append: (element, node) => unit = "append"
+  @send
+  external after2: (T.t, string) => unit = "after"
 
-/**
-Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
+*/
+  @send
+  external animate: (T.t, ~keyframes: any, ~options: float=?) => animation = "animate"
 
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/append)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
 */
-@send
-external append2: (element, string) => unit = "append"
+  @send
+  external animate2: (T.t, ~keyframes: any, ~options: keyframeAnimationOptions=?) => animation =
+    "animate"
 
-/**
-Replace all children of node with nodes, while replacing strings in nodes with equivalent Text nodes.
+  /**
+Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/replaceChildren)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/append)
 */
-@send
-external replaceChildren: (element, node) => unit = "replaceChildren"
+  @send
+  external append: (T.t, node) => unit = "append"
 
-/**
-Replace all children of node with nodes, while replacing strings in nodes with equivalent Text nodes.
+  /**
+Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/replaceChildren)
-*/
-@send
-external replaceChildren2: (element, string) => unit = "replaceChildren"
-
-/**
-Returns the first element that is a descendant of node that matches selectors.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelector)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/append)
 */
-@send
-external querySelector: (element, string) => element = "querySelector"
+  @send
+  external append2: (T.t, string) => unit = "append"
 
-/**
-Returns all element descendants of node that match selectors.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelectorAll)
+  /**
+Creates a shadow root for element and returns it.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/attachShadow)
 */
-@send
-external querySelectorAll: (element, string) => nodeList = "querySelectorAll"
+  @send
+  external attachShadow: (T.t, shadowRootInit) => shadowRoot = "attachShadow"
 
-/**
+  /**
 Inserts nodes just before node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/before)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/before)
 */
-@send
-external before: (element, node) => unit = "before"
+  @send
+  external before: (T.t, node) => unit = "before"
 
-/**
+  /**
 Inserts nodes just before node, while replacing strings in nodes with equivalent Text nodes.
 
 Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/before)
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/before)
 */
-@send
-external before2: (element, string) => unit = "before"
+  @send
+  external before2: (T.t, string) => unit = "before"
 
-/**
-Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
-
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/after)
-*/
-@send
-external after: (element, node) => unit = "after"
-
-/**
-Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
-
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/after)
-*/
-@send
-external after2: (element, string) => unit = "after"
-
-/**
-Replaces node with nodes, while replacing strings in nodes with equivalent Text nodes.
-
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/replaceWith)
-*/
-@send
-external replaceWith: (element, node) => unit = "replaceWith"
-
-/**
-Replaces node with nodes, while replacing strings in nodes with equivalent Text nodes.
-
-Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/replaceWith)
-*/
-@send
-external replaceWith2: (element, string) => unit = "replaceWith"
-
-/**
-Removes node.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/remove)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/checkVisibility)
 */
-@send
-external remove: element => unit = "remove"
+  @send
+  external checkVisibility: (T.t, ~options: checkVisibilityOptions=?) => bool = "checkVisibility"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
+  /**
+Returns the first (starting at element) inclusive ancestor that matches selectors, and null otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/closest)
 */
-@send
-external animate: (element, ~keyframes: any, ~options: float=?) => animation = "animate"
+  @send
+  external closest: (T.t, string) => 'e = "closest"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/computedStyleMap)
 */
-@send
-external animate2: (element, ~keyframes: any, ~options: keyframeAnimationOptions=?) => animation =
-  "animate"
+  @send
+  external computedStyleMap: T.t => stylePropertyMapReadOnly = "computedStyleMap"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAnimations)
 */
-@send
-external getAnimations: (element, ~options: getAnimationsOptions=?) => array<animation> =
-  "getAnimations"
-
-/**
-Appends an event listener for events whose type attribute value is type. The callback argument sets the callback that will be invoked when the event is dispatched.
-
-The options argument sets listener-specific options. For compatibility this can be a boolean, in which case the method behaves exactly as if the value was specified as options's capture.
-
-When set to true, options's capture prevents callback from being invoked when the event's eventPhase attribute value is BUBBLING_PHASE. When false (or not present), callback will not be invoked when event's eventPhase attribute value is CAPTURING_PHASE. Either way, callback will be invoked if event's eventPhase attribute value is AT_TARGET.
-
-When set to true, options's passive indicates that the callback will not cancel the event by invoking preventDefault(). This is used to enable performance optimizations described in § 2.8 Observing event listeners.
-
-When set to true, options's once indicates that the callback will only be invoked once after which the event listener will be removed.
+  @send
+  external getAnimations: (T.t, ~options: getAnimationsOptions=?) => array<animation> =
+    "getAnimations"
 
-If an AbortSignal is passed for options's signal, then the event listener will be removed when signal is aborted.
-
-The event listener is appended to target's event listener list and is not appended if it has the same type, callback, and capture.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget/addEventListener)
+  /**
+Returns element's first attribute whose qualified name is qualifiedName, and null if there is no such attribute otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttribute)
 */
-@send
-external addEventListener: (
-  element,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: addEventListenerOptions=?,
-) => unit = "addEventListener"
-
-/**
-Appends an event listener for events whose type attribute value is type. The callback argument sets the callback that will be invoked when the event is dispatched.
-
-The options argument sets listener-specific options. For compatibility this can be a boolean, in which case the method behaves exactly as if the value was specified as options's capture.
-
-When set to true, options's capture prevents callback from being invoked when the event's eventPhase attribute value is BUBBLING_PHASE. When false (or not present), callback will not be invoked when event's eventPhase attribute value is CAPTURING_PHASE. Either way, callback will be invoked if event's eventPhase attribute value is AT_TARGET.
-
-When set to true, options's passive indicates that the callback will not cancel the event by invoking preventDefault(). This is used to enable performance optimizations described in § 2.8 Observing event listeners.
+  @send
+  external getAttribute: (T.t, string) => string = "getAttribute"
 
-When set to true, options's once indicates that the callback will only be invoked once after which the event listener will be removed.
-
-If an AbortSignal is passed for options's signal, then the event listener will be removed when signal is aborted.
-
-The event listener is appended to target's event listener list and is not appended if it has the same type, callback, and capture.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget/addEventListener)
+  /**
+Returns the qualified names of all element's attributes. Can contain duplicates.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNames)
 */
-@send
-external addEventListener2: (
-  element,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: bool=?,
-) => unit = "addEventListener"
+  @send
+  external getAttributeNames: T.t => array<string> = "getAttributeNames"
 
-/**
-Removes the event listener in target's event listener list with the same type, callback, and options.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget/removeEventListener)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNode)
 */
-@send
-external removeEventListener: (
-  element,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: eventListenerOptions=?,
-) => unit = "removeEventListener"
+  @send
+  external getAttributeNode: (T.t, string) => attr = "getAttributeNode"
 
-/**
-Removes the event listener in target's event listener list with the same type, callback, and options.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget/removeEventListener)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNodeNS)
 */
-@send
-external removeEventListener2: (
-  element,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: bool=?,
-) => unit = "removeEventListener"
+  @send
+  external getAttributeNodeNS: (T.t, ~namespace: string, ~localName: string) => attr =
+    "getAttributeNodeNS"
 
-/**
-Dispatches a synthetic event event to target and returns true if either event's cancelable attribute value is false or its preventDefault() method was not invoked, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget/dispatchEvent)
+  /**
+Returns element's attribute whose namespace is namespace and local name is localName, and null if there is no such attribute otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNS)
 */
-@send
-external dispatchEvent: (element, event) => bool = "dispatchEvent"
+  @send
+  external getAttributeNS: (T.t, ~namespace: string, ~localName: string) => string =
+    "getAttributeNS"
 
-/**
-Returns node's root.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/getRootNode)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getBoundingClientRect)
 */
-@send
-external getRootNode: (element, ~options: getRootNodeOptions=?) => node = "getRootNode"
+  @send
+  external getBoundingClientRect: T.t => domRect = "getBoundingClientRect"
 
-/**
-Returns whether node has children.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/hasChildNodes)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getClientRects)
 */
-@send
-external hasChildNodes: element => bool = "hasChildNodes"
+  @send
+  external getClientRects: T.t => domRectList = "getClientRects"
 
-/**
-Removes empty exclusive Text nodes and concatenates the data of remaining contiguous exclusive Text nodes into the first of their nodes.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/normalize)
+  /**
+Returns a HTMLCollection of the elements in the object on which the method was invoked (a document or an element) that have all the classes given by classNames. The classNames argument is interpreted as a space-separated list of classes.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByClassName)
 */
-@send
-external normalize: element => unit = "normalize"
+  @send
+  external getElementsByClassName: (T.t, string) => htmlCollectionOf<element> =
+    "getElementsByClassName"
 
-/**
-Returns a copy of node. If deep is true, the copy also includes the node's descendants.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/cloneNode)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagName)
 */
-@send
-external cloneNode: (element, ~deep: bool=?) => node = "cloneNode"
+  @send
+  external getElementsByTagName: (T.t, string) => htmlCollection = "getElementsByTagName"
 
-/**
-Returns whether node and otherNode have the same properties.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isEqualNode)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagNameNS)
 */
-@send
-external isEqualNode: (element, node) => bool = "isEqualNode"
+  @send
+  external getElementsByTagNameNS: (
+    element,
+    ~namespace: string,
+    ~localName: string,
+  ) => htmlCollectionOf<element> = "getElementsByTagNameNS"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isSameNode)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getHTML)
 */
-@send
-external isSameNode: (element, node) => bool = "isSameNode"
+  @send
+  external getHTML: (T.t, ~options: getHTMLOptions=?) => string = "getHTML"
 
-/**
-Returns a bitmask indicating the position of other relative to node.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/compareDocumentPosition)
+  /**
+Returns true if element has an attribute whose qualified name is qualifiedName, and false otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttribute)
 */
-@send
-external compareDocumentPosition: (element, node) => int = "compareDocumentPosition"
+  @send
+  external hasAttribute: (T.t, string) => bool = "hasAttribute"
 
-/**
-Returns true if other is an inclusive descendant of node, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/contains)
+  /**
+Returns true if element has an attribute whose namespace is namespace and local name is localName.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttributeNS)
 */
-@send
-external contains: (element, node) => bool = "contains"
+  @send
+  external hasAttributeNS: (T.t, ~namespace: string, ~localName: string) => bool = "hasAttributeNS"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupPrefix)
+  /**
+Returns true if element has attributes, and false otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttributes)
 */
-@send
-external lookupPrefix: (element, string) => string = "lookupPrefix"
+  @send
+  external hasAttributes: T.t => bool = "hasAttributes"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupNamespaceURI)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasPointerCapture)
 */
-@send
-external lookupNamespaceURI: (element, string) => string = "lookupNamespaceURI"
+  @send
+  external hasPointerCapture: (T.t, int) => bool = "hasPointerCapture"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isDefaultNamespace)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentElement)
 */
-@send
-external isDefaultNamespace: (element, string) => bool = "isDefaultNamespace"
+  @send
+  external insertAdjacentElement: (T.t, ~where: insertPosition, ~element: element) => element =
+    "insertAdjacentElement"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/insertBefore)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentHTML)
 */
-@send
-external insertBefore: (element, 't, ~child: node) => 't = "insertBefore"
+  @send
+  external insertAdjacentHTML: (T.t, ~position: insertPosition, ~string: string) => unit =
+    "insertAdjacentHTML"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/appendChild)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentText)
 */
-@send
-external appendChild: (element, 't) => 't = "appendChild"
+  @send
+  external insertAdjacentText: (T.t, ~where: insertPosition, ~data: string) => unit =
+    "insertAdjacentText"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/replaceChild)
+  /**
+Returns true if matching selectors against element's root yields element, and false otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/matches)
 */
-@send
-external replaceChild: (element, ~node: node, 't) => 't = "replaceChild"
+  @send
+  external matches: (T.t, string) => bool = "matches"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/removeChild)
-*/
-@send
-external removeChild: (element, 't) => 't = "removeChild"
+  /**
+Inserts nodes before the first child of node, while replacing strings in nodes with equivalent Text nodes.
 
-/**
-Returns true if element has attributes, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttributes)
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/prepend)
 */
-@send
-external hasAttributes: element => bool = "hasAttributes"
+  @send
+  external prepend: (T.t, node) => unit = "prepend"
 
-/**
-Returns the qualified names of all element's attributes. Can contain duplicates.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNames)
+  /**
+Inserts nodes before the first child of node, while replacing strings in nodes with equivalent Text nodes.
+
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/prepend)
 */
-@send
-external getAttributeNames: element => array<string> = "getAttributeNames"
+  @send
+  external prepend2: (T.t, string) => unit = "prepend"
 
-/**
-Returns element's first attribute whose qualified name is qualifiedName, and null if there is no such attribute otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttribute)
+  /**
+Returns the first element that is a descendant of node that matches selectors.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelector)
 */
-@send
-external getAttribute: (element, string) => string = "getAttribute"
+  @send
+  external querySelector: (T.t, string) => element = "querySelector"
 
-/**
-Returns element's attribute whose namespace is namespace and local name is localName, and null if there is no such attribute otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNS)
+  /**
+Returns all element descendants of node that match selectors.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelectorAll)
 */
-@send
-external getAttributeNS: (element, ~namespace: string, ~localName: string) => string =
-  "getAttributeNS"
+  @send
+  external querySelectorAll: (T.t, string) => nodeList = "querySelectorAll"
 
-/**
-Sets the value of element's first attribute whose qualified name is qualifiedName to value.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttribute)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/releasePointerCapture)
 */
-@send
-external setAttribute: (element, ~qualifiedName: string, ~value: string) => unit = "setAttribute"
+  @send
+  external releasePointerCapture: (T.t, int) => unit = "releasePointerCapture"
 
-/**
-Sets the value of element's attribute whose namespace is namespace and local name is localName to value.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNS)
+  /**
+Removes node.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/remove)
 */
-@send
-external setAttributeNS: (
-  element,
-  ~namespace: string,
-  ~qualifiedName: string,
-  ~value: string,
-) => unit = "setAttributeNS"
+  @send
+  external remove: T.t => unit = "remove"
 
-/**
+  /**
 Removes element's first attribute whose qualified name is qualifiedName.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttribute)
 */
-@send
-external removeAttribute: (element, string) => unit = "removeAttribute"
-
-/**
-Removes element's attribute whose namespace is namespace and local name is localName.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNS)
-*/
-@send
-external removeAttributeNS: (element, ~namespace: string, ~localName: string) => unit =
-  "removeAttributeNS"
-
-/**
-If force is not given, "toggles" qualifiedName, removing it if it is present and adding it if it is not present. If force is true, adds qualifiedName. If force is false, removes qualifiedName.
-
-Returns true if qualifiedName is now present, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/toggleAttribute)
-*/
-@send
-external toggleAttribute: (element, ~qualifiedName: string, ~force: bool=?) => bool =
-  "toggleAttribute"
-
-/**
-Returns true if element has an attribute whose qualified name is qualifiedName, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttribute)
-*/
-@send
-external hasAttribute: (element, string) => bool = "hasAttribute"
-
-/**
-Returns true if element has an attribute whose namespace is namespace and local name is localName.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttributeNS)
-*/
-@send
-external hasAttributeNS: (element, ~namespace: string, ~localName: string) => bool =
-  "hasAttributeNS"
+  @send
+  external removeAttribute: (T.t, string) => unit = "removeAttribute"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNode)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNode)
 */
-@send
-external getAttributeNode: (element, string) => attr = "getAttributeNode"
+  @send
+  external removeAttributeNode: (T.t, attr) => attr = "removeAttributeNode"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNodeNS)
+  /**
+Removes element's attribute whose namespace is namespace and local name is localName.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNS)
 */
-@send
-external getAttributeNodeNS: (element, ~namespace: string, ~localName: string) => attr =
-  "getAttributeNodeNS"
+  @send
+  external removeAttributeNS: (T.t, ~namespace: string, ~localName: string) => unit =
+    "removeAttributeNS"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNode)
-*/
-@send
-external setAttributeNode: (element, attr) => attr = "setAttributeNode"
+  /**
+Replace all children of node with nodes, while replacing strings in nodes with equivalent Text nodes.
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNodeNS)
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/replaceChildren)
 */
-@send
-external setAttributeNodeNS: (element, attr) => attr = "setAttributeNodeNS"
+  @send
+  external replaceChildren: (T.t, node) => unit = "replaceChildren"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNode)
-*/
-@send
-external removeAttributeNode: (element, attr) => attr = "removeAttributeNode"
+  /**
+Replace all children of node with nodes, while replacing strings in nodes with equivalent Text nodes.
 
-/**
-Creates a shadow root for element and returns it.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/attachShadow)
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/replaceChildren)
 */
-@send
-external attachShadow: (element, shadowRootInit) => shadowRoot = "attachShadow"
+  @send
+  external replaceChildren2: (T.t, string) => unit = "replaceChildren"
 
-/**
-Returns the first (starting at element) inclusive ancestor that matches selectors, and null otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/closest)
-*/
-@send
-external closest: (element, string) => 'e = "closest"
+  /**
+Replaces node with nodes, while replacing strings in nodes with equivalent Text nodes.
 
-/**
-Returns true if matching selectors against element's root yields element, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/matches)
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/replaceWith)
 */
-@send
-external matches: (element, string) => bool = "matches"
+  @send
+  external replaceWith: (T.t, node) => unit = "replaceWith"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagName)
-*/
-@send
-external getElementsByTagName: (element, string) => htmlCollection = "getElementsByTagName"
+  /**
+Replaces node with nodes, while replacing strings in nodes with equivalent Text nodes.
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagNameNS)
+Throws a "HierarchyRequestError" DOMException if the constraints of the node tree are violated.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/replaceWith)
 */
-@send
-external getElementsByTagNameNS: (
-  element,
-  ~namespace: string,
-  ~localName: string,
-) => htmlCollectionOf<element> = "getElementsByTagNameNS"
+  @send
+  external replaceWith2: (T.t, string) => unit = "replaceWith"
 
-/**
-Returns a HTMLCollection of the elements in the object on which the method was invoked (a document or an element) that have all the classes given by classNames. The classNames argument is interpreted as a space-separated list of classes.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByClassName)
-*/
-@send
-external getElementsByClassName: (element, string) => htmlCollectionOf<element> =
-  "getElementsByClassName"
+  /**
+Displays element fullscreen and resolves promise when done.
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentElement)
+When supplied, options's navigationUI member indicates whether showing navigation UI while in fullscreen is preferred or not. If set to "show", navigation simplicity is preferred over screen space, and if set to "hide", more screen space is preferred. User agents are always free to honor user preference over the application's. The default value "auto" indicates no application preference.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestFullscreen)
 */
-@send
-external insertAdjacentElement: (element, ~where: insertPosition, ~element: element) => element =
-  "insertAdjacentElement"
+  @send
+  external requestFullscreen: (T.t, ~options: fullscreenOptions=?) => Promise.t<unit> =
+    "requestFullscreen"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentText)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestPointerLock)
 */
-@send
-external insertAdjacentText: (element, ~where: insertPosition, ~data: string) => unit =
-  "insertAdjacentText"
+  @send
+  external requestPointerLock: (T.t, ~options: pointerLockOptions=?) => Promise.t<unit> =
+    "requestPointerLock"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/computedStyleMap)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
 */
-@send
-external computedStyleMap: element => stylePropertyMapReadOnly = "computedStyleMap"
+  @send
+  external scroll: (T.t, ~options: scrollToOptions=?) => unit = "scroll"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getClientRects)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
 */
-@send
-external getClientRects: element => domRectList = "getClientRects"
+  @send
+  external scroll2: (T.t, ~x: float, ~y: float) => unit = "scroll"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getBoundingClientRect)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
 */
-@send
-external getBoundingClientRect: element => domRect = "getBoundingClientRect"
+  @send
+  external scrollBy: (T.t, ~options: scrollToOptions=?) => unit = "scrollBy"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/checkVisibility)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
 */
-@send
-external checkVisibility: (element, ~options: checkVisibilityOptions=?) => bool = "checkVisibility"
+  @send
+  external scrollBy2: (T.t, ~x: float, ~y: float) => unit = "scrollBy"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
 */
-@send
-external scrollIntoView: (element, ~arg: bool=?) => unit = "scrollIntoView"
+  @send
+  external scrollIntoView: (T.t, ~arg: bool=?) => unit = "scrollIntoView"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
 */
-@send
-external scrollIntoView2: (element, ~arg: scrollIntoViewOptions=?) => unit = "scrollIntoView"
+  @send
+  external scrollIntoView2: (T.t, ~arg: scrollIntoViewOptions=?) => unit = "scrollIntoView"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
-*/
-@send
-external scroll: (element, ~options: scrollToOptions=?) => unit = "scroll"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
-*/
-@send
-external scroll2: (element, ~x: float, ~y: float) => unit = "scroll"
-
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
 */
-@send
-external scrollTo: (element, ~options: scrollToOptions=?) => unit = "scrollTo"
+  @send
+  external scrollTo: (T.t, ~options: scrollToOptions=?) => unit = "scrollTo"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
 */
-@send
-external scrollTo2: (element, ~x: float, ~y: float) => unit = "scrollTo"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
-*/
-@send
-external scrollBy: (element, ~options: scrollToOptions=?) => unit = "scrollBy"
+  @send
+  external scrollTo2: (T.t, ~x: float, ~y: float) => unit = "scrollTo"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
+  /**
+Sets the value of element's first attribute whose qualified name is qualifiedName to value.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttribute)
 */
-@send
-external scrollBy2: (element, ~x: float, ~y: float) => unit = "scrollBy"
+  @send
+  external setAttribute: (T.t, ~qualifiedName: string, ~value: string) => unit = "setAttribute"
 
-/**
-Displays element fullscreen and resolves promise when done.
-
-When supplied, options's navigationUI member indicates whether showing navigation UI while in fullscreen is preferred or not. If set to "show", navigation simplicity is preferred over screen space, and if set to "hide", more screen space is preferred. User agents are always free to honor user preference over the application's. The default value "auto" indicates no application preference.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestFullscreen)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNode)
 */
-@send
-external requestFullscreen: (element, ~options: fullscreenOptions=?) => Promise.t<unit> =
-  "requestFullscreen"
+  @send
+  external setAttributeNode: (T.t, attr) => attr = "setAttributeNode"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setHTMLUnsafe)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNodeNS)
 */
-@send
-external setHTMLUnsafe: (element, string) => unit = "setHTMLUnsafe"
+  @send
+  external setAttributeNodeNS: (T.t, attr) => attr = "setAttributeNodeNS"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getHTML)
+  /**
+Sets the value of element's attribute whose namespace is namespace and local name is localName to value.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNS)
 */
-@send
-external getHTML: (element, ~options: getHTMLOptions=?) => string = "getHTML"
+  @send
+  external setAttributeNS: (
+    element,
+    ~namespace: string,
+    ~qualifiedName: string,
+    ~value: string,
+  ) => unit = "setAttributeNS"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentHTML)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setHTMLUnsafe)
 */
-@send
-external insertAdjacentHTML: (element, ~position: insertPosition, ~string: string) => unit =
-  "insertAdjacentHTML"
+  @send
+  external setHTMLUnsafe: (T.t, string) => unit = "setHTMLUnsafe"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setPointerCapture)
 */
-@send
-external setPointerCapture: (element, int) => unit = "setPointerCapture"
+  @send
+  external setPointerCapture: (T.t, int) => unit = "setPointerCapture"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/releasePointerCapture)
-*/
-@send
-external releasePointerCapture: (element, int) => unit = "releasePointerCapture"
+  /**
+If force is not given, "toggles" qualifiedName, removing it if it is present and adding it if it is not present. If force is true, adds qualifiedName. If force is false, removes qualifiedName.
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasPointerCapture)
+Returns true if qualifiedName is now present, and false otherwise.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/toggleAttribute)
 */
-@send
-external hasPointerCapture: (element, int) => bool = "hasPointerCapture"
+  @send
+  external toggleAttribute: (T.t, ~qualifiedName: string, ~force: bool=?) => bool =
+    "toggleAttribute"
+}
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestPointerLock)
-*/
-@send
-external requestPointerLock: (element, ~options: pointerLockOptions=?) => Promise.t<unit> =
-  "requestPointerLock"
+include Impl({
+  type t = element
+})