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

package/src/DOMAPI/MediaQueryList.res

@@ -1,82 +1,5 @@
-open EventAPI
 open DOMAPI
 
-external asEventTarget: mediaQueryList => eventTarget = "%identity"
-/**
-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: (
-  mediaQueryList,
-  ~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: (
-  mediaQueryList,
-  ~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: (
-  mediaQueryList,
-  ~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: (
-  mediaQueryList,
-  ~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: (mediaQueryList, event) => bool = "dispatchEvent"
+include EventTarget.Impl({
+  type t = mediaQueryList
+})

package/src/DOMAPI/Node.res

@@ -1,179 +1,114 @@
-open EventAPI
 open DOMAPI
 
-external asEventTarget: node => eventTarget = "%identity"
-/**
-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.
+module Impl = (
+  T: {
+    type t
+  },
+) => {
+  include EventTarget.Impl({
+    type t = T.t
+  })
 
-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.
+  external asNode: T.t => node = "%identity"
 
-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: (
-  node,
-  ~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: (
-  node,
-  ~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: (
-  node,
-  ~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: (
-  node,
-  ~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: (node, event) => bool = "dispatchEvent"
-
-/**
+  /**
 Returns node's root.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/getRootNode)
 */
-@send
-external getRootNode: (node, ~options: getRootNodeOptions=?) => node = "getRootNode"
+  @send
+  external getRootNode: (T.t, ~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: node => bool = "hasChildNodes"
+  @send
+  external hasChildNodes: T.t => 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: node => unit = "normalize"
+  @send
+  external normalize: T.t => 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: (node, ~deep: bool=?) => node = "cloneNode"
+  @send
+  external cloneNode: (T.t, ~deep: bool=?) => T.t = "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: (node, node) => bool = "isEqualNode"
+  @send
+  external isEqualNode: (T.t, node) => bool = "isEqualNode"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isSameNode)
 */
-@send
-external isSameNode: (node, node) => bool = "isSameNode"
+  @send
+  external isSameNode: (T.t, 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: (node, node) => int = "compareDocumentPosition"
+  @send
+  external compareDocumentPosition: (T.t, 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: (node, node) => bool = "contains"
+  @send
+  external contains: (T.t, node) => bool = "contains"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupPrefix)
 */
-@send
-external lookupPrefix: (node, string) => string = "lookupPrefix"
+  @send
+  external lookupPrefix: (T.t, string) => string = "lookupPrefix"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/lookupNamespaceURI)
 */
-@send
-external lookupNamespaceURI: (node, string) => string = "lookupNamespaceURI"
+  @send
+  external lookupNamespaceURI: (T.t, string) => string = "lookupNamespaceURI"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/isDefaultNamespace)
 */
-@send
-external isDefaultNamespace: (node, string) => bool = "isDefaultNamespace"
+  @send
+  external isDefaultNamespace: (T.t, string) => bool = "isDefaultNamespace"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/insertBefore)
 */
-@send
-external insertBefore: (node, 't, ~child: node) => 't = "insertBefore"
+  @send
+  external insertBefore: (T.t, 't, ~child: node) => 't = "insertBefore"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/appendChild)
 */
-@send
-external appendChild: (node, 't) => 't = "appendChild"
+  @send
+  external appendChild: (T.t, 't) => 't = "appendChild"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/replaceChild)
 */
-@send
-external replaceChild: (node, ~node: node, 't) => 't = "replaceChild"
+  @send
+  external replaceChild: (T.t, ~node: node, 't) => 't = "replaceChild"
 
-/**
+  /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Node/removeChild)
 */
-@send
-external removeChild: (node, 't) => 't = "removeChild"
+  @send
+  external removeChild: (T.t, 't) => 't = "removeChild"
+}
+
+include Impl({
+  type t = node
+})