@rescript/webapi 0.1.0-alpha-b1d58f9

package/src/dom-nodes/DocumentFragment.res

@@ -0,0 +1,96 @@
+type t = DOMTree.documentFragment = private {
+  ...DOMTree.documentFragment,
+}
+
+/**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/DocumentFragmentFragment)
+*/
+@new
+external make: unit => DOMTree.documentFragment = "DocumentFragment"
+
+module Impl = (
+  T: {
+    type t
+  },
+) => {
+  include Node.Impl({type t = T.t})
+
+  external asDocumentFragment: T.t => DOMTree.documentFragment = "%identity"
+
+  /**
+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/DocumentFragment/append)
+*/
+  @throws(JsExn) @send
+  external append: (T.t, DOMTree.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/DocumentFragment/append)
+*/
+  @throws(JsExn) @send
+  external append2: (T.t, string) => unit = "append"
+
+  /**
+Returns the first element within node's descendants whose ID is elementId.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/DocumentFragment/getElementById)
+*/
+  @send
+  external getElementById: (T.t, string) => Null.t<DOMTree.element> = "getElementById"
+
+  /**
+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/DocumentFragment/prepend)
+*/
+  @throws(JsExn) @send
+  external prepend: (T.t, DOMTree.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/DocumentFragment/prepend)
+*/
+  @throws(JsExn) @send
+  external prepend2: (T.t, string) => unit = "prepend"
+
+  /**
+Returns the first element that is a descendant of node that matches selectors.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/DocumentFragment/querySelector)
+*/
+  @throws(JsExn) @send
+  external querySelector: (T.t, string) => Null.t<DOMTree.element> = "querySelector"
+
+  /**
+Returns all element descendants of node that match selectors.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/DocumentFragment/querySelectorAll)
+*/
+  @throws(JsExn) @send
+  external querySelectorAll: (T.t, string) => DOM.nodeList<DOMTree.element> = "querySelectorAll"
+
+  /**
+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/DocumentFragment/replaceChildren)
+*/
+  @throws(JsExn) @send
+  external replaceChildren: (T.t, DOMTree.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/DocumentFragment/replaceChildren)
+*/
+  @throws(JsExn) @send
+  external replaceChildren2: (T.t, string) => unit = "replaceChildren"
+}
+
+include Impl({type t = t})

package/src/dom-nodes/Element.res

@@ -0,0 +1,509 @@
+type t = DOMTree.element = private {
+  ...DOMTree.element,
+}
+
+module Impl = (
+  T: {
+    type t
+  },
+) => {
+  include Node.Impl({type t = T.t})
+
+  external asElement: T.t => DOMTree.element = "%identity"
+
+  /**
+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/Element/after)
+*/
+  @throws(JsExn) @send
+  external after: (T.t, DOMTree.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/Element/after)
+*/
+  @throws(JsExn) @send
+  external after2: (T.t, string) => unit = "after"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
+*/
+  @send
+  external animate: (T.t, ~keyframes: unknown, ~options: float=?) => Animation.t = "animate"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/animate)
+*/
+  @send
+  external animate2: (
+    T.t,
+    ~keyframes: unknown,
+    ~options: Animation.keyframeAnimationOptions=?,
+  ) => Animation.t = "animate"
+
+  /**
+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/Element/append)
+*/
+  @throws(JsExn) @send
+  external append: (T.t, DOMTree.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/Element/append)
+*/
+  @throws(JsExn) @send
+  external append2: (T.t, string) => unit = "append"
+
+  /**
+Creates a shadow root for element and returns it.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/attachShadow)
+*/
+  @throws(JsExn) @send
+  external attachShadow: (T.t, HTML.shadowRootInit) => DOMTree.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/Element/before)
+*/
+  @throws(JsExn) @send
+  external before: (T.t, DOMTree.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/Element/before)
+*/
+  @throws(JsExn) @send
+  external before2: (T.t, string) => unit = "before"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/checkVisibility)
+*/
+  @send
+  external checkVisibility: (T.t, ~options: DOM.checkVisibilityOptions=?) => bool =
+    "checkVisibility"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external closest: (T.t, string) => Null.t<'e> = "closest"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/computedStyleMap)
+*/
+  @send
+  external computedStyleMap: T.t => StylePropertyMapReadOnly.t = "computedStyleMap"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAnimations)
+*/
+  @throws(JsExn) @send
+  external getAnimations: (
+    T.t,
+    ~options: AnimationEffect.getAnimationsOptions=?,
+  ) => array<Animation.t> = "getAnimations"
+
+  /**
+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: (T.t, string) => Null.t<string> = "getAttribute"
+
+  /**
+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: T.t => array<string> = "getAttributeNames"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNode)
+*/
+  @send
+  external getAttributeNode: (T.t, string) => Null.t<Attr.t> = "getAttributeNode"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getAttributeNodeNS)
+*/
+  @send
+  external getAttributeNodeNS: (T.t, ~namespace: string, ~localName: string) => Null.t<Attr.t> =
+    "getAttributeNodeNS"
+
+  /**
+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: (T.t, ~namespace: string, ~localName: string) => Null.t<string> =
+    "getAttributeNS"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getBoundingClientRect)
+*/
+  @send
+  external getBoundingClientRect: T.t => DOM.domRect = "getBoundingClientRect"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getClientRects)
+*/
+  @send
+  external getClientRects: T.t => DOM.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.t<DOMTree.element> =
+    "getElementsByClassName"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagName)
+*/
+  @send
+  external getElementsByTagName: (T.t, string) => HTMLCollection.t<DOMTree.element> =
+    "getElementsByTagName"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getElementsByTagNameNS)
+*/
+  @send
+  external getElementsByTagNameNS: (
+    DOMTree.element,
+    ~namespace: string,
+    ~localName: string,
+  ) => HTMLCollection.t<DOMTree.element> = "getElementsByTagNameNS"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/getHTML)
+*/
+  @send
+  external getHTML: (T.t, ~options: HTML.getHTMLOptions=?) => string = "getHTML"
+
+  /**
+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: (T.t, 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: (T.t, ~namespace: string, ~localName: string) => bool = "hasAttributeNS"
+
+  /**
+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: T.t => bool = "hasAttributes"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/hasPointerCapture)
+*/
+  @send
+  external hasPointerCapture: (T.t, int) => bool = "hasPointerCapture"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentElement)
+*/
+  @send
+  external insertAdjacentElement: (
+    T.t,
+    ~where: DOM.insertPosition,
+    ~element: DOMTree.element,
+  ) => Null.t<DOMTree.element> = "insertAdjacentElement"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentHTML)
+*/
+  @throws(JsExn) @send
+  external insertAdjacentHTML: (T.t, ~position: DOM.insertPosition, ~string: string) => unit =
+    "insertAdjacentHTML"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/insertAdjacentText)
+*/
+  @send
+  external insertAdjacentText: (T.t, ~where: DOM.insertPosition, ~data: string) => unit =
+    "insertAdjacentText"
+
+  /**
+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(JsExn) @send
+  external matches: (T.t, string) => bool = "matches"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external prepend: (T.t, DOMTree.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)
+*/
+  @throws(JsExn) @send
+  external prepend2: (T.t, string) => unit = "prepend"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external querySelector: (T.t, string) => Null.t<DOMTree.element> = "querySelector"
+
+  /**
+Returns all element descendants of node that match selectors.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document/querySelectorAll)
+*/
+  @throws(JsExn) @send
+  external querySelectorAll: (T.t, string) => DOM.nodeList<DOMTree.element> = "querySelectorAll"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/releasePointerCapture)
+*/
+  @throws(JsExn) @send
+  external releasePointerCapture: (T.t, int) => unit = "releasePointerCapture"
+
+  /**
+Removes node.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/CharacterData/remove)
+*/
+  @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: (T.t, string) => unit = "removeAttribute"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/removeAttributeNode)
+*/
+  @throws(JsExn) @send
+  external removeAttributeNode: (T.t, Attr.t) => Attr.t = "removeAttributeNode"
+
+  /**
+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: (T.t, ~namespace: string, ~localName: string) => unit =
+    "removeAttributeNS"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external replaceChildren: (T.t, DOMTree.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)
+*/
+  @throws(JsExn) @send
+  external replaceChildren2: (T.t, string) => unit = "replaceChildren"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external replaceWith: (T.t, DOMTree.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)
+*/
+  @throws(JsExn) @send
+  external replaceWith2: (T.t, string) => unit = "replaceWith"
+
+  /**
+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: (T.t, ~options: DOM.fullscreenOptions=?) => promise<unit> =
+    "requestFullscreen"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/requestPointerLock)
+*/
+  @send
+  external requestPointerLock: (T.t, ~options: DOM.pointerLockOptions=?) => promise<unit> =
+    "requestPointerLock"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
+*/
+  @send
+  external scroll: (T.t, ~options: DOM.scrollToOptions=?) => unit = "scroll"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scroll)
+*/
+  @send
+  external scroll2: (T.t, ~x: float, ~y: float) => unit = "scroll"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
+*/
+  @send
+  external scrollBy: (T.t, ~options: DOM.scrollToOptions=?) => unit = "scrollBy"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollBy)
+*/
+  @send
+  external scrollBy2: (T.t, ~x: float, ~y: float) => unit = "scrollBy"
+
+  /**
+`scrollIntoView()`
+
+Scrolls the element's ancestor containers such that the element on which scrollIntoView() is called is visible to the user.
+
+```res
+element->Element.scrollIntoView()
+```
+
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
+*/
+  @send
+  external scrollIntoView: T.t => unit = "scrollIntoView"
+
+  /**
+`scrollIntoView(true)`
+
+Scrolls the element's ancestor containers such that the element on which scrollIntoView() is called is visible to the user.
+
+```res
+element->Element.scrollIntoView_alignToTop()
+```
+
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
+*/
+  @send
+  external scrollIntoViewAlignToTop: (T.t, @as(json`true`) _) => unit = "scrollIntoView"
+
+  /**
+`scrollIntoView({ behavior: "smooth" })`
+
+Scrolls the element's ancestor containers such that the element on which scrollIntoView() is called is visible to the user.
+
+```res
+element->Element.scrollIntoViewWithOptions({ behavior: DOMAPI.Smooth })
+```
+
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollIntoView)
+*/
+  @send
+  external scrollIntoViewWithOptions: (T.t, DOM.scrollIntoViewOptions) => unit = "scrollIntoView"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
+*/
+  @send
+  external scrollTo: (T.t, ~options: DOM.scrollToOptions=?) => unit = "scrollTo"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/scrollTo)
+*/
+  @send
+  external scrollTo2: (T.t, ~x: float, ~y: float) => unit = "scrollTo"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external setAttribute: (T.t, ~qualifiedName: string, ~value: string) => unit = "setAttribute"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNode)
+*/
+  @send
+  external setAttributeNode: (T.t, Attr.t) => Null.t<Attr.t> = "setAttributeNode"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setAttributeNodeNS)
+*/
+  @send
+  external setAttributeNodeNS: (T.t, Attr.t) => Null.t<Attr.t> = "setAttributeNodeNS"
+
+  /**
+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)
+  */
+  @throws(JsExn) @send
+  external setAttributeNS: (
+    T.t,
+    ~namespace: string,
+    ~qualifiedName: string,
+    ~value: string,
+  ) => unit = "setAttributeNS"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setHTMLUnsafe)
+*/
+  @throws(JsExn) @send
+  external setHTMLUnsafe: (T.t, string) => unit = "setHTMLUnsafe"
+
+  /**
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Element/setPointerCapture)
+*/
+  @throws(JsExn) @send
+  external setPointerCapture: (T.t, int) => unit = "setPointerCapture"
+
+  /**
+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)
+*/
+  @throws(JsExn) @send
+  external toggleAttribute: (T.t, ~qualifiedName: string, ~force: bool=?) => bool =
+    "toggleAttribute"
+}
+
+include Impl({type t = t})
+
+let isInstanceOf = (_: 't): bool => %raw(`param instanceof Element`)

package/src/dom-nodes/ElementInternals.res

@@ -0,0 +1,39 @@
+type t = DOMTree.elementInternals = private {
+  ...DOMTree.elementInternals,
+}
+
+/**
+Sets both the state and submission value of internals's target element to value.
+
+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)
+*/
+@throws(JsExn) @send
+external setFormValue: (DOMTree.elementInternals, ~value: unknown, ~state: unknown=?) => unit =
+  "setFormValue"
+
+/**
+Marks internals's target element as suffering from the constraints indicated by the flags argument, and sets the element's validation message to message. If anchor is specified, the user agent might use it to indicate problems with the constraints of internals's target element when the form owner is validated interactively or reportValidity() is called.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/ElementInternals/setValidity)
+*/
+@throws(JsExn) @send
+external setValidity: (
+  DOMTree.elementInternals,
+  ~flags: DOM.validityStateFlags=?,
+  ~message: string=?,
+  ~anchor: DOMTree.htmlElement=?,
+) => unit = "setValidity"
+
+/**
+Returns true if internals's target element has no validity problems; false otherwise. Fires an invalid event at the element in the latter case.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/ElementInternals/checkValidity)
+*/
+@throws(JsExn) @send
+external checkValidity: DOMTree.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)
+*/
+@throws(JsExn) @send
+external reportValidity: DOMTree.elementInternals => bool = "reportValidity"

package/src/dom-nodes/HTML.res

@@ -0,0 +1,11 @@
+type shadowRootInit = {
+  mutable mode: DOMTree.shadowRootMode,
+  mutable delegatesFocus?: bool,
+  mutable slotAssignment?: DOMTree.slotAssignmentMode,
+  mutable serializable?: bool,
+}
+
+type getHTMLOptions = {
+  mutable serializableShadowRoots?: bool,
+  mutable shadowRoots?: array<DOMTree.shadowRoot>,
+}

package/src/dom-nodes/HTMLCollection.res

@@ -0,0 +1,25 @@
+/**
+A generic collection (array-like object similar to arguments) of elements (in document order) and offers methods and properties for selecting from the list.
+[See HTMLCollection on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection)
+*/
+type t<'item> = private {
+  /**
+    Sets or retrieves the number of objects in a collection.
+    [Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/length)
+    */
+  length: int,
+}
+
+/**
+Retrieves an object from various collections.
+[Read more on MDN](https://developer.mozilla.org/docs/Web/API/HTMLCollection/item)
+*/
+@send
+external item: (t<'item>, int) => Null.t<'item> = "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: (t<'item>, string) => Null.t<'item> = "namedItem"