@rescript/webapi 0.1.0-experimental-a0d5168 → 0.1.0-experimental-47c6b2c

package/src/DOMAPI/HTMLElement.res

@@ -1,685 +1,59 @@
 open DOMAPI
-open Prelude
-open EventAPI
 
-external asElement: htmlElement => element = "%identity"
-external asNode: htmlElement => node = "%identity"
-external asEventTarget: htmlElement => eventTarget = "%identity"
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/focus)
-*/
-@send
-external focus: (htmlElement, ~options: focusOptions=?) => unit = "focus"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/blur)
-*/
-@send
-external blur: htmlElement => unit = "blur"
-
-/**
-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 prepend: (htmlElement, node) => unit = "prepend"
-
-/**
-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 prepend2: (htmlElement, string) => unit = "prepend"
-
-/**
-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/append)
-*/
-@send
-external append: (htmlElement, node) => unit = "append"
-
-/**
-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/append)
-*/
-@send
-external append2: (htmlElement, string) => unit = "append"
-
-/**
-Replace all children of 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/Document/replaceChildren)
-*/
-@send
-external replaceChildren: (htmlElement, node) => unit = "replaceChildren"
-
-/**
-Replace all children of 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/Document/replaceChildren)
-*/
-@send
-external replaceChildren2: (htmlElement, 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)
-*/
-@send
-external querySelector: (htmlElement, string) => element = "querySelector"
-
-/**
-Returns all element descendants of node that match selectors.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelectorAll)
-*/
-@send
-external querySelectorAll: (htmlElement, string) => nodeList = "querySelectorAll"
-
-/**
-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)
-*/
-@send
-external before: (htmlElement, 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)
-*/
-@send
-external before2: (htmlElement, 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: (htmlElement, 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: (htmlElement, 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: (htmlElement, 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: (htmlElement, string) => unit = "replaceWith"
-
-/**
-Removes node.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/remove)
-*/
-@send
-external remove: htmlElement => unit = "remove"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
-*/
-@send
-external animate: (htmlElement, ~keyframes: any, ~options: float=?) => animation = "animate"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
-*/
-@send
-external animate2: (
-  htmlElement,
-  ~keyframes: any,
-  ~options: keyframeAnimationOptions=?,
-) => animation = "animate"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAnimations)
-*/
-@send
-external getAnimations: (htmlElement, ~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.
-
-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)
-*/
-@send
-external addEventListener: (
-  htmlElement,
-  ~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.
-
-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)
-*/
-@send
-external addEventListener2: (
-  htmlElement,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: bool=?,
-) => unit = "addEventListener"
-
-/**
-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)
-*/
-@send
-external removeEventListener: (
-  htmlElement,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: eventListenerOptions=?,
-) => unit = "removeEventListener"
-
-/**
-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)
-*/
-@send
-external removeEventListener2: (
-  htmlElement,
-  ~type_: eventType,
-  ~callback: eventListener<'event>,
-  ~options: bool=?,
-) => unit = "removeEventListener"
-
-/**
-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)
-*/
-@send
-external dispatchEvent: (htmlElement, event) => bool = "dispatchEvent"
+module Impl = (
+  T: {
+    type t
+  },
+) => {
+  include Element.Impl({
+    type t = T.t
+  })
 
-/**
-Returns node's root.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/getRootNode)
-*/
-@send
-external getRootNode: (htmlElement, ~options: getRootNodeOptions=?) => node = "getRootNode"
-
-/**
-Returns whether node has children.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/hasChildNodes)
-*/
-@send
-external hasChildNodes: htmlElement => bool = "hasChildNodes"
-
-/**
-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)
-*/
-@send
-external normalize: htmlElement => unit = "normalize"
-
-/**
-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)
-*/
-@send
-external cloneNode: (htmlElement, ~deep: bool=?) => node = "cloneNode"
-
-/**
-Returns whether node and otherNode have the same properties.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isEqualNode)
-*/
-@send
-external isEqualNode: (htmlElement, node) => bool = "isEqualNode"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isSameNode)
-*/
-@send
-external isSameNode: (htmlElement, node) => bool = "isSameNode"
-
-/**
-Returns a bitmask indicating the position of other relative to node.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/compareDocumentPosition)
-*/
-@send
-external compareDocumentPosition: (htmlElement, node) => int = "compareDocumentPosition"
-
-/**
-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)
-*/
-@send
-external contains: (htmlElement, node) => bool = "contains"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupPrefix)
-*/
-@send
-external lookupPrefix: (htmlElement, string) => string = "lookupPrefix"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupNamespaceURI)
-*/
-@send
-external lookupNamespaceURI: (htmlElement, string) => string = "lookupNamespaceURI"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isDefaultNamespace)
-*/
-@send
-external isDefaultNamespace: (htmlElement, string) => bool = "isDefaultNamespace"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/insertBefore)
-*/
-@send
-external insertBefore: (htmlElement, 't, ~child: node) => 't = "insertBefore"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/appendChild)
-*/
-@send
-external appendChild: (htmlElement, 't) => 't = "appendChild"
+  external asHTMLElement: T.t => htmlElement = "%identity"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/replaceChild)
-*/
-@send
-external replaceChild: (htmlElement, ~node: node, 't) => 't = "replaceChild"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/removeChild)
-*/
-@send
-external removeChild: (htmlElement, 't) => 't = "removeChild"
-
-/**
-Returns true if element has attributes, and false otherwise.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasAttributes)
-*/
-@send
-external hasAttributes: htmlElement => bool = "hasAttributes"
-
-/**
-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 getAttributeNames: htmlElement => array<string> = "getAttributeNames"
-
-/**
-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 getAttribute: (htmlElement, string) => string = "getAttribute"
-
-/**
-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 getAttributeNS: (htmlElement, ~namespace: string, ~localName: string) => string =
-  "getAttributeNS"
-
-/**
-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 setAttribute: (htmlElement, ~qualifiedName: string, ~value: string) => unit =
-  "setAttribute"
-
-/**
-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 setAttributeNS: (
-  htmlElement,
-  ~namespace: string,
-  ~qualifiedName: string,
-  ~value: string,
-) => unit = "setAttributeNS"
-
-/**
-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: (htmlElement, 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: (htmlElement, ~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: (htmlElement, ~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: (htmlElement, 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: (htmlElement, ~namespace: string, ~localName: string) => bool =
-  "hasAttributeNS"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNode)
-*/
-@send
-external getAttributeNode: (htmlElement, string) => attr = "getAttributeNode"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNodeNS)
-*/
-@send
-external getAttributeNodeNS: (htmlElement, ~namespace: string, ~localName: string) => attr =
-  "getAttributeNodeNS"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNode)
-*/
-@send
-external setAttributeNode: (htmlElement, attr) => attr = "setAttributeNode"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNodeNS)
-*/
-@send
-external setAttributeNodeNS: (htmlElement, attr) => attr = "setAttributeNodeNS"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNode)
-*/
-@send
-external removeAttributeNode: (htmlElement, attr) => attr = "removeAttributeNode"
-
-/**
-Creates a shadow root for element and returns it.
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/attachShadow)
-*/
-@send
-external attachShadow: (htmlElement, shadowRootInit) => shadowRoot = "attachShadow"
-
-/**
-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: (htmlElement, string) => 'e = "closest"
-
-/**
-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 matches: (htmlElement, string) => bool = "matches"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagName)
-*/
-@send
-external getElementsByTagName: (htmlElement, string) => htmlCollection = "getElementsByTagName"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagNameNS)
-*/
-@send
-external getElementsByTagNameNS: (
-  htmlElement,
-  ~namespace: string,
-  ~localName: string,
-) => htmlCollectionOf<element> = "getElementsByTagNameNS"
-
-/**
-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: (htmlElement, string) => htmlCollectionOf<element> =
-  "getElementsByClassName"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentElement)
-*/
-@send
-external insertAdjacentElement: (
-  htmlElement,
-  ~where: insertPosition,
-  ~element: element,
-) => element = "insertAdjacentElement"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentText)
-*/
-@send
-external insertAdjacentText: (htmlElement, ~where: insertPosition, ~data: string) => unit =
-  "insertAdjacentText"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/computedStyleMap)
-*/
-@send
-external computedStyleMap: htmlElement => stylePropertyMapReadOnly = "computedStyleMap"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getClientRects)
-*/
-@send
-external getClientRects: htmlElement => domRectList = "getClientRects"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getBoundingClientRect)
-*/
-@send
-external getBoundingClientRect: htmlElement => domRect = "getBoundingClientRect"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/checkVisibility)
-*/
-@send
-external checkVisibility: (htmlElement, ~options: checkVisibilityOptions=?) => bool =
-  "checkVisibility"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
-*/
-@send
-external scrollIntoView: (htmlElement, ~arg: bool=?) => unit = "scrollIntoView"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
-*/
-@send
-external scrollIntoView2: (htmlElement, ~arg: scrollIntoViewOptions=?) => unit = "scrollIntoView"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
-*/
-@send
-external scroll: (htmlElement, ~options: scrollToOptions=?) => unit = "scroll"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
-*/
-@send
-external scroll2: (htmlElement, ~x: float, ~y: float) => unit = "scroll"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
-*/
-@send
-external scrollTo: (htmlElement, ~options: scrollToOptions=?) => unit = "scrollTo"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
-*/
-@send
-external scrollTo2: (htmlElement, ~x: float, ~y: float) => unit = "scrollTo"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
-*/
-@send
-external scrollBy: (htmlElement, ~options: scrollToOptions=?) => unit = "scrollBy"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
-*/
-@send
-external scrollBy2: (htmlElement, ~x: float, ~y: float) => unit = "scrollBy"
-
-/**
-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)
-*/
-@send
-external requestFullscreen: (htmlElement, ~options: fullscreenOptions=?) => Promise.t<unit> =
-  "requestFullscreen"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setHTMLUnsafe)
-*/
-@send
-external setHTMLUnsafe: (htmlElement, string) => unit = "setHTMLUnsafe"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getHTML)
-*/
-@send
-external getHTML: (htmlElement, ~options: getHTMLOptions=?) => string = "getHTML"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentHTML)
-*/
-@send
-external insertAdjacentHTML: (htmlElement, ~position: insertPosition, ~string: string) => unit =
-  "insertAdjacentHTML"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setPointerCapture)
-*/
-@send
-external setPointerCapture: (htmlElement, int) => unit = "setPointerCapture"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/releasePointerCapture)
-*/
-@send
-external releasePointerCapture: (htmlElement, int) => unit = "releasePointerCapture"
-
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasPointerCapture)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/attachInternals)
 */
-@send
-external hasPointerCapture: (htmlElement, int) => bool = "hasPointerCapture"
+  @send
+  external attachInternals: T.t => elementInternals = "attachInternals"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestPointerLock)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/blur)
 */
-@send
-external requestPointerLock: (htmlElement, ~options: pointerLockOptions=?) => Promise.t<unit> =
-  "requestPointerLock"
+  @send
+  external blur: T.t => unit = "blur"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/click)
 */
-@send
-external click: htmlElement => unit = "click"
+  @send
+  external click: T.t => unit = "click"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/attachInternals)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/focus)
 */
-@send
-external attachInternals: htmlElement => elementInternals = "attachInternals"
+  @send
+  external focus: (T.t, ~options: focusOptions=?) => unit = "focus"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/showPopover)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/hidePopover)
 */
-@send
-external showPopover: htmlElement => unit = "showPopover"
+  @send
+  external hidePopover: T.t => unit = "hidePopover"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/hidePopover)
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/showPopover)
 */
-@send
-external hidePopover: htmlElement => unit = "hidePopover"
+  @send
+  external showPopover: T.t => unit = "showPopover"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/togglePopover)
 */
-@send
-external togglePopover: (htmlElement, ~force: bool=?) => bool = "togglePopover"
+  @send
+  external togglePopover: (T.t, ~force: bool=?) => bool = "togglePopover"
+}
+
+include Impl({
+  type t = htmlElement
+})