@rescript/webapi 0.1.0-experimental-2d6efc2 → 0.1.0-experimental-0781ac8

package/src/{DOMAPI → DOM}/Element.res

@@ -1,6 +1,3 @@
-open DOMAPI
-open Prelude
-
 module Impl = (
   T: {
     type t
@@ -8,7 +5,7 @@ module Impl = (
 ) => {
   include Node.Impl({type t = T.t})
 
-  external asElement: T.t => element = "%identity"
+  external asElement: T.t => DomTypes.element = "%identity"
 
   /**
 Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
@@ -17,7 +14,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/after)
 */
   @send
-  external after: (T.t, node) => unit = "after"
+  external after: (T.t, DomTypes.node) => unit = "after"
 
   /**
 Inserts nodes just after node, while replacing strings in nodes with equivalent Text nodes.
@@ -32,14 +29,17 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
 */
   @send
-  external animate: (T.t, ~keyframes: any, ~options: float=?) => animation = "animate"
+  external animate: (T.t, ~keyframes: unknown, ~options: float=?) => DomTypes.animation = "animate"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
 */
   @send
-  external animate2: (T.t, ~keyframes: any, ~options: keyframeAnimationOptions=?) => animation =
-    "animate"
+  external animate2: (
+    T.t,
+    ~keyframes: unknown,
+    ~options: DomTypes.keyframeAnimationOptions=?,
+  ) => DomTypes.animation = "animate"
 
   /**
 Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
@@ -48,7 +48,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/append)
 */
   @send
-  external append: (T.t, node) => unit = "append"
+  external append: (T.t, DomTypes.node) => unit = "append"
 
   /**
 Inserts nodes after the last child of node, while replacing strings in nodes with equivalent Text nodes.
@@ -64,7 +64,7 @@ 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: (T.t, shadowRootInit) => shadowRoot = "attachShadow"
+  external attachShadow: (T.t, DomTypes.shadowRootInit) => DomTypes.shadowRoot = "attachShadow"
 
   /**
 Inserts nodes just before node, while replacing strings in nodes with equivalent Text nodes.
@@ -73,7 +73,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/before)
 */
   @send
-  external before: (T.t, node) => unit = "before"
+  external before: (T.t, DomTypes.node) => unit = "before"
 
   /**
 Inserts nodes just before node, while replacing strings in nodes with equivalent Text nodes.
@@ -88,7 +88,8 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/checkVisibility)
 */
   @send
-  external checkVisibility: (T.t, ~options: checkVisibilityOptions=?) => bool = "checkVisibility"
+  external checkVisibility: (T.t, ~options: DomTypes.checkVisibilityOptions=?) => bool =
+    "checkVisibility"
 
   /**
 Returns the first (starting at element) inclusive ancestor that matches selectors, and null otherwise.
@@ -101,14 +102,16 @@ Returns the first (starting at element) inclusive ancestor that matches selector
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/computedStyleMap)
 */
   @send
-  external computedStyleMap: T.t => stylePropertyMapReadOnly = "computedStyleMap"
+  external computedStyleMap: T.t => DomTypes.stylePropertyMapReadOnly = "computedStyleMap"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAnimations)
 */
   @send
-  external getAnimations: (T.t, ~options: getAnimationsOptions=?) => array<animation> =
-    "getAnimations"
+  external getAnimations: (
+    T.t,
+    ~options: DomTypes.getAnimationsOptions=?,
+  ) => array<DomTypes.animation> = "getAnimations"
 
   /**
 Returns element's first attribute whose qualified name is qualifiedName, and null if there is no such attribute otherwise.
@@ -128,13 +131,13 @@ Returns the qualified names of all element's attributes. Can contain duplicates.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNode)
 */
   @send
-  external getAttributeNode: (T.t, string) => attr = "getAttributeNode"
+  external getAttributeNode: (T.t, string) => DomTypes.attr = "getAttributeNode"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNodeNS)
 */
   @send
-  external getAttributeNodeNS: (T.t, ~namespace: string, ~localName: string) => attr =
+  external getAttributeNodeNS: (T.t, ~namespace: string, ~localName: string) => DomTypes.attr =
     "getAttributeNodeNS"
 
   /**
@@ -149,43 +152,44 @@ Returns element's attribute whose namespace is namespace and local name is local
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getBoundingClientRect)
 */
   @send
-  external getBoundingClientRect: T.t => domRect = "getBoundingClientRect"
+  external getBoundingClientRect: T.t => DomTypes.domRect = "getBoundingClientRect"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getClientRects)
 */
   @send
-  external getClientRects: T.t => domRectList = "getClientRects"
+  external getClientRects: T.t => DomTypes.domRectList = "getClientRects"
 
   /**
 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: (T.t, string) => htmlCollection<element> =
+  external getElementsByClassName: (T.t, string) => DomTypes.htmlCollection<DomTypes.element> =
     "getElementsByClassName"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagName)
 */
   @send
-  external getElementsByTagName: (T.t, string) => htmlCollection<element> = "getElementsByTagName"
+  external getElementsByTagName: (T.t, string) => DomTypes.htmlCollection<DomTypes.element> =
+    "getElementsByTagName"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagNameNS)
 */
   @send
   external getElementsByTagNameNS: (
-    element,
+    DomTypes.element,
     ~namespace: string,
     ~localName: string,
-  ) => htmlCollection<element> = "getElementsByTagNameNS"
+  ) => DomTypes.htmlCollection<DomTypes.element> = "getElementsByTagNameNS"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getHTML)
 */
   @send
-  external getHTML: (T.t, ~options: getHTMLOptions=?) => string = "getHTML"
+  external getHTML: (T.t, ~options: DomTypes.getHTMLOptions=?) => string = "getHTML"
 
   /**
 Returns true if element has an attribute whose qualified name is qualifiedName, and false otherwise.
@@ -218,21 +222,24 @@ Returns true if element has attributes, and false otherwise.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentElement)
 */
   @send
-  external insertAdjacentElement: (T.t, ~where: insertPosition, ~element: element) => element =
-    "insertAdjacentElement"
+  external insertAdjacentElement: (
+    T.t,
+    ~where: DomTypes.insertPosition,
+    ~element: DomTypes.element,
+  ) => DomTypes.element = "insertAdjacentElement"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentHTML)
 */
   @send
-  external insertAdjacentHTML: (T.t, ~position: insertPosition, ~string: string) => unit =
+  external insertAdjacentHTML: (T.t, ~position: DomTypes.insertPosition, ~string: string) => unit =
     "insertAdjacentHTML"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentText)
 */
   @send
-  external insertAdjacentText: (T.t, ~where: insertPosition, ~data: string) => unit =
+  external insertAdjacentText: (T.t, ~where: DomTypes.insertPosition, ~data: string) => unit =
     "insertAdjacentText"
 
   /**
@@ -249,7 +256,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/prepend)
 */
   @send
-  external prepend: (T.t, node) => unit = "prepend"
+  external prepend: (T.t, DomTypes.node) => unit = "prepend"
 
   /**
 Inserts nodes before the first child of node, while replacing strings in nodes with equivalent Text nodes.
@@ -265,14 +272,15 @@ 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: (T.t, string) => Null.t<element> = "querySelector"
+  external querySelector: (T.t, string) => Null.t<DomTypes.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: (T.t, string) => nodeList<element> = "querySelectorAll"
+  external querySelectorAll: (T.t, string) => DomTypes.nodeList<DomTypes.element> =
+    "querySelectorAll"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/releasePointerCapture)
@@ -298,7 +306,7 @@ Removes element's first attribute whose qualified name is qualifiedName.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNode)
 */
   @send
-  external removeAttributeNode: (T.t, attr) => attr = "removeAttributeNode"
+  external removeAttributeNode: (T.t, DomTypes.attr) => DomTypes.attr = "removeAttributeNode"
 
   /**
 Removes element's attribute whose namespace is namespace and local name is localName.
@@ -315,7 +323,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/replaceChildren)
 */
   @send
-  external replaceChildren: (T.t, node) => unit = "replaceChildren"
+  external replaceChildren: (T.t, DomTypes.node) => unit = "replaceChildren"
 
   /**
 Replace all children of node with nodes, while replacing strings in nodes with equivalent Text nodes.
@@ -333,7 +341,7 @@ Throws a "HierarchyRequestError" DOMException if the constraints of the node tre
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/replaceWith)
 */
   @send
-  external replaceWith: (T.t, node) => unit = "replaceWith"
+  external replaceWith: (T.t, DomTypes.node) => unit = "replaceWith"
 
   /**
 Replaces node with nodes, while replacing strings in nodes with equivalent Text nodes.
@@ -351,21 +359,21 @@ When supplied, options's navigationUI member indicates whether showing navigatio
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestFullscreen)
 */
   @send
-  external requestFullscreen: (T.t, ~options: fullscreenOptions=?) => promise<unit> =
+  external requestFullscreen: (T.t, ~options: DomTypes.fullscreenOptions=?) => promise<unit> =
     "requestFullscreen"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestPointerLock)
 */
   @send
-  external requestPointerLock: (T.t, ~options: pointerLockOptions=?) => promise<unit> =
+  external requestPointerLock: (T.t, ~options: DomTypes.pointerLockOptions=?) => promise<unit> =
     "requestPointerLock"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
 */
   @send
-  external scroll: (T.t, ~options: scrollToOptions=?) => unit = "scroll"
+  external scroll: (T.t, ~options: DomTypes.scrollToOptions=?) => unit = "scroll"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
@@ -377,7 +385,7 @@ When supplied, options's navigationUI member indicates whether showing navigatio
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
 */
   @send
-  external scrollBy: (T.t, ~options: scrollToOptions=?) => unit = "scrollBy"
+  external scrollBy: (T.t, ~options: DomTypes.scrollToOptions=?) => unit = "scrollBy"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
@@ -425,13 +433,14 @@ element->Element.scrollIntoViewWithOptions({ behavior: DOMAPI.Smooth })
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
 */
   @send
-  external scrollIntoViewWithOptions: (T.t, scrollIntoViewOptions) => unit = "scrollIntoView"
+  external scrollIntoViewWithOptions: (T.t, DomTypes.scrollIntoViewOptions) => unit =
+    "scrollIntoView"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
 */
   @send
-  external scrollTo: (T.t, ~options: scrollToOptions=?) => unit = "scrollTo"
+  external scrollTo: (T.t, ~options: DomTypes.scrollToOptions=?) => unit = "scrollTo"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
@@ -450,13 +459,13 @@ Sets the value of element's first attribute whose qualified name is qualifiedNam
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNode)
 */
   @send
-  external setAttributeNode: (T.t, attr) => attr = "setAttributeNode"
+  external setAttributeNode: (T.t, DomTypes.attr) => DomTypes.attr = "setAttributeNode"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNodeNS)
 */
   @send
-  external setAttributeNodeNS: (T.t, attr) => attr = "setAttributeNodeNS"
+  external setAttributeNodeNS: (T.t, DomTypes.attr) => DomTypes.attr = "setAttributeNodeNS"
 
   /**
 Sets the value of element's attribute whose namespace is namespace and local name is localName to value.
@@ -464,7 +473,7 @@ Sets the value of element's attribute whose namespace is namespace and local nam
 */
   @send
   external setAttributeNS: (
-    element,
+    DomTypes.element,
     ~namespace: string,
     ~qualifiedName: string,
     ~value: string,
@@ -493,6 +502,6 @@ Returns true if qualifiedName is now present, and false otherwise.
     "toggleAttribute"
 }
 
-include Impl({type t = element})
+include Impl({type t = DomTypes.element})
 
 let isInstanceOf = (_: 't): bool => %raw(`param instanceof Element`)

package/src/{DOMAPI → DOM}/ElementInternals.res

@@ -1,5 +1,3 @@
-open DOMAPI
-
 /**
 Sets both the state and submission value of internals's target element to value.
 
@@ -7,7 +5,7 @@ If value is null, the element won't participate in form submission.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ElementInternals/setFormValue)
 */
 @send
-external setFormValue: (elementInternals, ~value: unknown, ~state: unknown=?) => unit =
+external setFormValue: (DomTypes.elementInternals, ~value: unknown, ~state: unknown=?) => unit =
   "setFormValue"
 
 /**
@@ -16,10 +14,10 @@ Marks internals's target element as suffering from the constraints indicated by
 */
 @send
 external setValidity: (
-  elementInternals,
-  ~flags: validityStateFlags=?,
+  DomTypes.elementInternals,
+  ~flags: DomTypes.validityStateFlags=?,
   ~message: string=?,
-  ~anchor: htmlElement=?,
+  ~anchor: DomTypes.htmlElement=?,
 ) => unit = "setValidity"
 
 /**
@@ -27,11 +25,11 @@ Returns true if internals's target element has no validity problems; false other
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ElementInternals/checkValidity)
 */
 @send
-external checkValidity: elementInternals => bool = "checkValidity"
+external checkValidity: DomTypes.elementInternals => bool = "checkValidity"
 
 /**
 Returns true if internals's target element has no validity problems; otherwise, returns false, fires an invalid event at the element, and (if the event isn't canceled) reports the problem to the user.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ElementInternals/reportValidity)
 */
 @send
-external reportValidity: elementInternals => bool = "reportValidity"
+external reportValidity: DomTypes.elementInternals => bool = "reportValidity"

package/src/{DOMAPI → DOM}/FileList.res

@@ -1,8 +1,5 @@
-open FileAPI
-open DOMAPI
-
 /**
-Returns the `File` at the specified index.
+Returns the `WebApiFile` at the specified index.
 
 `FileList` is not an array, so you need to iterate manually using `length` and `item`:
 
@@ -16,4 +13,4 @@ for i in 0 to fileList.length - 1 {
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/FileList/item)
 */
 @send
-external item: (fileList, int) => file = "item"
+external item: (DomTypes.fileList, int) => FileTypes.file = "item"

package/src/DOM/HTMLAnchorElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlAnchorElement})

package/src/DOM/HTMLAreaElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlAreaElement})

package/src/DOM/HTMLAudioElement.res

@@ -0,0 +1 @@
+include DomHTMLMediaElement.Impl({type t = DomTypes.htmlAudioElement})

package/src/DOM/HTMLBRElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlbrElement})

package/src/DOM/HTMLBaseElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlBaseElement})

package/src/DOM/HTMLBodyElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlBodyElement})

package/src/{DOMAPI → DOM}/HTMLButtonElement.res

@@ -1,19 +1,17 @@
-open DOMAPI
-
-include HTMLElement.Impl({type t = htmlButtonElement})
+include HTMLElement.Impl({type t = DomTypes.htmlButtonElement})
 
 /**
 Returns whether a form will validate when it is submitted, without having to submit it.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/checkValidity)
 */
 @send
-external checkValidity: htmlButtonElement => bool = "checkValidity"
+external checkValidity: DomTypes.htmlButtonElement => bool = "checkValidity"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/reportValidity)
 */
 @send
-external reportValidity: htmlButtonElement => bool = "reportValidity"
+external reportValidity: DomTypes.htmlButtonElement => bool = "reportValidity"
 
 /**
 Sets a custom error message that is displayed when a form is submitted.
@@ -21,4 +19,4 @@ Sets a custom error message that is displayed when a form is submitted.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLButtonElement/setCustomValidity)
 */
 @send
-external setCustomValidity: (htmlButtonElement, string) => unit = "setCustomValidity"
+external setCustomValidity: (DomTypes.htmlButtonElement, string) => unit = "setCustomValidity"

package/src/{DOMAPI → DOM}/HTMLCollection.res

@@ -1,15 +1,13 @@
-open DOMAPI
-
 /**
 Retrieves an object from various collections.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/item)
 */
 @send
-external item: (htmlCollection<'t>, int) => 't = "item"
+external item: (DomTypes.htmlCollection<'t>, int) => 't = "item"
 
 /**
 Retrieves a select object or an object from an options collection.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/namedItem)
 */
 @send
-external namedItem: (htmlCollection<'t>, string) => 't = "namedItem"
+external namedItem: (DomTypes.htmlCollection<'t>, string) => 't = "namedItem"

package/src/DOM/HTMLDListElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmldListElement})

package/src/DOM/HTMLDataElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlDataElement})

package/src/DOM/HTMLDataListElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlDataListElement})

package/src/{DOMAPI → DOM}/HTMLDialogElement.res

@@ -1,19 +1,17 @@
-open DOMAPI
-
-include HTMLElement.Impl({type t = htmlDialogElement})
+include HTMLElement.Impl({type t = DomTypes.htmlDialogElement})
 
 /**
 Displays the dialog element.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLDialogElement/show)
 */
 @send
-external show: htmlDialogElement => unit = "show"
+external show: DomTypes.htmlDialogElement => unit = "show"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLDialogElement/showModal)
 */
 @send
-external showModal: htmlDialogElement => unit = "showModal"
+external showModal: DomTypes.htmlDialogElement => unit = "showModal"
 
 /**
 Closes the dialog element.
@@ -22,4 +20,4 @@ The argument, if provided, provides a return value.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLDialogElement/close)
 */
 @send
-external close: (htmlDialogElement, ~returnValue: string=?) => unit = "close"
+external close: (DomTypes.htmlDialogElement, ~returnValue: string=?) => unit = "close"

package/src/DOM/HTMLDivElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlDivElement})

package/src/{DOMAPI → DOM}/HTMLElement.res

@@ -1,4 +1,4 @@
-open DOMAPI
+type t = DomTypes.htmlElement
 
 module Impl = (
   T: {
@@ -7,13 +7,13 @@ module Impl = (
 ) => {
   include Element.Impl({type t = T.t})
 
-  external asHTMLElement: T.t => htmlElement = "%identity"
+  external asHTMLElement: T.t => t = "%identity"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/attachInternals)
 */
   @send
-  external attachInternals: T.t => elementInternals = "attachInternals"
+  external attachInternals: T.t => DomTypes.elementInternals = "attachInternals"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/blur)
@@ -31,7 +31,7 @@ module Impl = (
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/focus)
 */
   @send
-  external focus: (T.t, ~options: focusOptions=?) => unit = "focus"
+  external focus: (T.t, ~options: DomTypes.focusOptions=?) => unit = "focus"
 
   /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLElement/hidePopover)
@@ -52,4 +52,4 @@ module Impl = (
   external togglePopover: (T.t, ~force: bool=?) => bool = "togglePopover"
 }
 
-include Impl({type t = htmlElement})
+include Impl({type t = t})

package/src/DOM/HTMLEmbedElement.res

@@ -0,0 +1,4 @@
+include HTMLElement.Impl({type t = DomTypes.htmlEmbedElement})
+
+@send
+external getSVGDocument: DomTypes.htmlEmbedElement => DomTypes.document = "getSVGDocument"

package/src/{DOMAPI → DOM}/HTMLFieldSetElement.res

@@ -1,19 +1,17 @@
-open DOMAPI
-
-include HTMLElement.Impl({type t = htmlFieldSetElement})
+include HTMLElement.Impl({type t = DomTypes.htmlFieldSetElement})
 
 /**
 Returns whether a form will validate when it is submitted, without having to submit it.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFieldSetElement/checkValidity)
 */
 @send
-external checkValidity: htmlFieldSetElement => bool = "checkValidity"
+external checkValidity: DomTypes.htmlFieldSetElement => bool = "checkValidity"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFieldSetElement/reportValidity)
 */
 @send
-external reportValidity: htmlFieldSetElement => bool = "reportValidity"
+external reportValidity: DomTypes.htmlFieldSetElement => bool = "reportValidity"
 
 /**
 Sets a custom error message that is displayed when a form is submitted.
@@ -21,4 +19,4 @@ Sets a custom error message that is displayed when a form is submitted.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFieldSetElement/setCustomValidity)
 */
 @send
-external setCustomValidity: (htmlFieldSetElement, string) => unit = "setCustomValidity"
+external setCustomValidity: (DomTypes.htmlFieldSetElement, string) => unit = "setCustomValidity"

package/src/DOM/HTMLFormControlsCollection.res

@@ -0,0 +1,16 @@
+external asHTMLCollection: DomTypes.htmlFormControlsCollection => DomTypes.htmlCollection<
+  DomTypes.element,
+> = "%identity"
+/**
+Retrieves an object from various collections.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/item)
+*/
+@send
+external item: (DomTypes.htmlFormControlsCollection, int) => DomTypes.element = "item"
+
+/**
+Retrieves a select object or an object from an options collection.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/namedItem)
+*/
+@send
+external namedItem: (DomTypes.htmlFormControlsCollection, string) => DomTypes.element = "namedItem"

package/src/{DOMAPI → DOM}/HTMLFormElement.res

@@ -1,36 +1,36 @@
-open DOMAPI
+type t = DomTypes.htmlFormElement
 
-include HTMLElement.Impl({type t = htmlFormElement})
+include HTMLElement.Impl({type t = t})
 
 /**
 Fires when a FORM is about to be submitted.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFormElement/submit)
 */
 @send
-external submit: htmlFormElement => unit = "submit"
+external submit: t => unit = "submit"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFormElement/requestSubmit)
 */
 @send
-external requestSubmit: (htmlFormElement, ~submitter: htmlElement=?) => unit = "requestSubmit"
+external requestSubmit: (t, ~submitter: HTMLElement.t=?) => unit = "requestSubmit"
 
 /**
 Fires when the user resets a form.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFormElement/reset)
 */
 @send
-external reset: htmlFormElement => unit = "reset"
+external reset: t => unit = "reset"
 
 /**
 Returns whether a form will validate when it is submitted, without having to submit it.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFormElement/checkValidity)
 */
 @send
-external checkValidity: htmlFormElement => bool = "checkValidity"
+external checkValidity: t => bool = "checkValidity"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLFormElement/reportValidity)
 */
 @send
-external reportValidity: htmlFormElement => bool = "reportValidity"
+external reportValidity: t => bool = "reportValidity"

package/src/DOM/HTMLFrameSetElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlFrameSetElement})

package/src/DOM/HTMLHRElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlhrElement})

package/src/DOM/HTMLHeadElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlHeadElement})

package/src/DOM/HTMLHeadingElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlHeadingElement})

package/src/DOM/HTMLHtmlElement.res

@@ -0,0 +1 @@
+include HTMLElement.Impl({type t = DomTypes.htmlHtmlElement})