@rescript/webapi 0.1.0-pre-alpha-4ffc5e2 → 0.1.0-pre-alpha-b7f8547

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@rescript/webapi",
-  "version": "0.1.0-pre-alpha-4ffc5e2",
+  "version": "0.1.0-pre-alpha-b7f8547",
   "description": "Experimental successor to [rescript-webapi](https://github.com/TheSpyder/rescript-webapi)",
   "keywords": [
     "dom",

package/src/ClipboardAPI/Clipboard.res

@@ -1,27 +1,31 @@
 open ClipboardTypes
 
-include EventTarget.Impl({type t = clipboard})
+type t = ClipboardTypes.clipboard = {...ClipboardTypes.clipboard}
+
+external current: t = "clipboard"
+
+include EventTarget.Impl({type t = t})
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Clipboard/read)
 */
 @send
-external read: clipboard => promise<array<clipboardItem>> = "read"
+external read: t => promise<array<clipboardItem>> = "read"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Clipboard/readText)
 */
 @send
-external readText: clipboard => promise<string> = "readText"
+external readText: t => promise<string> = "readText"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Clipboard/write)
 */
 @send
-external write: (clipboard, array<clipboardItem>) => promise<unit> = "write"
+external write: (t, array<clipboardItem>) => promise<unit> = "write"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Clipboard/writeText)
 */
 @send
-external writeText: (clipboard, string) => promise<unit> = "writeText"
+external writeText: (t, string) => promise<unit> = "writeText"

package/src/CredentialManagementAPI/CredentialsContainer.res

@@ -1,29 +1,31 @@
 open CredentialManagementTypes
 
+type t = CredentialManagementTypes.credentialsContainer = {
+  ...CredentialManagementTypes.credentialsContainer,
+}
+
+external current: t = "credentials"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CredentialsContainer/get)
 */
 @send
-external get: (credentialsContainer, ~options: credentialRequestOptions=?) => promise<credential> =
-  "get"
+external get: (t, ~options: credentialRequestOptions=?) => promise<credential> = "get"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CredentialsContainer/store)
 */
 @send
-external store: (credentialsContainer, credential) => promise<unit> = "store"
+external store: (t, credential) => promise<unit> = "store"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CredentialsContainer/create)
 */
 @send
-external create: (
-  credentialsContainer,
-  ~options: credentialCreationOptions=?,
-) => promise<credential> = "create"
+external create: (t, ~options: credentialCreationOptions=?) => promise<credential> = "create"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CredentialsContainer/preventSilentAccess)
 */
 @send
-external preventSilentAccess: credentialsContainer => promise<unit> = "preventSilentAccess"
+external preventSilentAccess: t => promise<unit> = "preventSilentAccess"

package/src/DOMAPI/Document.res

@@ -2,6 +2,8 @@ open DOMTypes
 open EventTypes
 open ViewTransitionsTypes
 
+type t = document = {...document}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Document)
 */

package/src/DOMAPI/Element.res

@@ -1,6 +1,8 @@
 open DOMTypes
 open Prelude
 
+type t = element = {...element}
+
 module Impl = (
   T: {
     type t

package/src/DOMAPI/HTMLCanvasElement.res

@@ -2,6 +2,8 @@ open DOMTypes
 open CanvasTypes
 open MediaCaptureAndStreamsTypes
 
+type t = htmlCanvasElement = {...htmlCanvasElement}
+
 include HTMLElement.Impl({type t = htmlCanvasElement})
 
 /**

package/src/DOMAPI/HTMLElement.res

@@ -1,5 +1,7 @@
 open DOMTypes
 
+type t = htmlElement = {...htmlElement}
+
 module Impl = (
   T: {
     type t

package/src/DOMAPI/HTMLImageElement.res

@@ -1,5 +1,7 @@
 open DOMTypes
 
+type t = htmlImageElement = {...htmlImageElement}
+
 include HTMLElement.Impl({type t = htmlImageElement})
 
 /**

package/src/DOMAPI/HTMLInputElement.res

@@ -1,5 +1,7 @@
 open DOMTypes
 
+type t = htmlInputElement = {...htmlInputElement}
+
 include HTMLElement.Impl({type t = htmlInputElement})
 
 /**

package/src/DOMAPI/Location.res

@@ -1,5 +1,7 @@
 open DOMTypes
 
+type t = location = {...location}
+
 /**
 Navigates to the given URL.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Location/assign)

package/src/DOMAPI/Node.res

@@ -1,5 +1,7 @@
 open DOMTypes
 
+type t = node = {...node}
+
 module Impl = (
   T: {
     type t

package/src/DOMAPI/Window.res

@@ -67,7 +67,7 @@ external clearInterval: (window, int) => unit = "clearInterval"
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/queueMicrotask)
 */
 @send
-external queueMicrotask: (window, voidFunction) => unit = "queueMicrotask"
+external queueMicrotask: (window, unit => unit) => unit = "queueMicrotask"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/createImageBitmap)

package/src/EventAPI/AbortController.res

@@ -1,5 +1,7 @@
 open EventTypes
 
+type t = abortController = {...abortController}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/AbortController)
 */

package/src/EventAPI/AbortSignal.res

@@ -1,5 +1,7 @@
 open EventTypes
 
+type t = abortSignal = {...abortSignal}
+
 include EventTarget.Impl({type t = abortSignal})
 
 /**

package/src/EventAPI/Event.res

@@ -1,5 +1,7 @@
 open EventTypes
 
+type t = event = {...event}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Event)
 */

package/src/EventAPI/EventTarget.res

@@ -1,5 +1,7 @@
 open EventTypes
 
+type t = eventTarget = {...eventTarget}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/EventTarget)
 */

package/src/EventAPI/ExtendableEvent.res

@@ -1,5 +1,7 @@
 open EventTypes
 
+type t = extendableEvent = {...extendableEvent}
+
 module Impl = (
   T: {
     type t

package/src/Global.res

@@ -13,11 +13,6 @@ open ChannelMessagingTypes
 open FetchTypes
 open EventTypes
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/window)
-*/
-external window: window = "window"
-
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/self)
 */
@@ -124,11 +119,6 @@ external parent: window = "parent"
 */
 external frameElement: element = "frameElement"
 
-/**
-[Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/navigator)
-*/
-external navigator: navigator = "navigator"
-
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Window/screen)
 */

package/src/HistoryAPI/History.res

@@ -1,32 +1,35 @@
 open HistoryTypes
 
+type t = HistoryTypes.history = {...HistoryTypes.history}
+
+external current: t = "history"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/History/go)
 */
 @send
-external go: (history, ~delta: int=?) => unit = "go"
+external go: (t, ~delta: int=?) => unit = "go"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/History/back)
 */
 @send
-external back: history => unit = "back"
+external back: t => unit = "back"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/History/forward)
 */
 @send
-external forward: history => unit = "forward"
+external forward: t => unit = "forward"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/History/pushState)
 */
 @send
-external pushState: (history, ~data: JSON.t, ~unused: string, ~url: string=?) => unit = "pushState"
+external pushState: (t, ~data: JSON.t, ~unused: string, ~url: string=?) => unit = "pushState"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/History/replaceState)
 */
 @send
-external replaceState: (history, ~data: JSON.t, ~unused: string, ~url: string=?) => unit =
-  "replaceState"
+external replaceState: (t, ~data: JSON.t, ~unused: string, ~url: string=?) => unit = "replaceState"

package/src/IndexedDBAPI/IDBFactory.res

@@ -1,24 +1,28 @@
 open IndexedDBTypes
 
+type t = IndexedDBTypes.idbFactory = {...IndexedDBTypes.idbFactory}
+
+external current: t = "indexedDB"
+
 /**
 Attempts to open a connection to the named database with the current version, or 1 if it does not already exist. If the request is successful request's result will be the connection.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/IDBFactory/open)
 */
 @send
-external open_: (idbFactory, ~name: string, ~version: int=?) => idbOpenDBRequest = "open"
+external open_: (t, ~name: string, ~version: int=?) => idbOpenDBRequest = "open"
 
 /**
 Attempts to delete the named database. If the database already exists and there are open connections that don't close in response to a versionchange event, the request will be blocked until all they close. If the request is successful request's result will be null.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/IDBFactory/deleteDatabase)
 */
 @send
-external deleteDatabase: (idbFactory, string) => idbOpenDBRequest = "deleteDatabase"
+external deleteDatabase: (t, string) => idbOpenDBRequest = "deleteDatabase"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/IDBFactory/databases)
 */
 @send
-external databases: idbFactory => promise<array<idbDatabaseInfo>> = "databases"
+external databases: t => promise<array<idbDatabaseInfo>> = "databases"
 
 /**
 Compares two values as keys. Returns -1 if key1 precedes key2, 1 if key2 precedes key1, and 0 if the keys are equal.
@@ -27,4 +31,4 @@ Throws a "DataError" DOMException if either input is not a valid key.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/IDBFactory/cmp)
 */
 @send
-external cmp: (idbFactory, ~first: JSON.t, ~second: JSON.t) => int = "cmp"
+external cmp: (t, ~first: JSON.t, ~second: JSON.t) => int = "cmp"

package/src/IntersectionObserverAPI/IntersectionObserver.res

@@ -1,6 +1,8 @@
 open DOMTypes
 open IntersectionObserverTypes
 
+type t = intersectionObserver = {...intersectionObserver}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/IntersectionObserver)
 */

package/src/IntersectionObserverAPI/IntersectionObserverRoot.res

@@ -1,6 +1,8 @@
 open DOMTypes
 open IntersectionObserverTypes
 
+type t = root
+
 external fromDocument: document => root = "%identity"
 external fromElement: element => root = "%identity"
 external fromNull: root = "null"

package/src/MutationObserverAPI/MutationObserver.res

@@ -1,6 +1,8 @@
 open DOMTypes
 open MutationObserverTypes
 
+type t = mutationObserver
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/MutationObserver)
 */

package/src/PerformanceAPI/Performance.res

@@ -1,72 +1,73 @@
 open PerformanceTypes
 
-include EventTarget.Impl({type t = performance})
+type t = PerformanceTypes.performance = {...PerformanceTypes.performance}
+
+external current: t = "performance"
+
+include EventTarget.Impl({type t = t})
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/now)
 */
 @send
-external now: performance => float = "now"
+external now: t => float = "now"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/toJSON)
 */
 @send
-external toJSON: performance => Dict.t<string> = "toJSON"
+external toJSON: t => Dict.t<string> = "toJSON"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/getEntries)
 */
 @send
-external getEntries: performance => performanceEntryList = "getEntries"
+external getEntries: t => performanceEntryList = "getEntries"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/getEntriesByType)
 */
 @send
-external getEntriesByType: (performance, string) => performanceEntryList = "getEntriesByType"
+external getEntriesByType: (t, string) => performanceEntryList = "getEntriesByType"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/getEntriesByName)
 */
 @send
-external getEntriesByName: (performance, ~name: string, ~type_: string=?) => performanceEntryList =
+external getEntriesByName: (t, ~name: string, ~type_: string=?) => performanceEntryList =
   "getEntriesByName"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/clearResourceTimings)
 */
 @send
-external clearResourceTimings: performance => unit = "clearResourceTimings"
+external clearResourceTimings: t => unit = "clearResourceTimings"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/setResourceTimingBufferSize)
 */
 @send
-external setResourceTimingBufferSize: (performance, int) => unit = "setResourceTimingBufferSize"
+external setResourceTimingBufferSize: (t, int) => unit = "setResourceTimingBufferSize"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/mark)
 */
 @send
-external mark: (
-  performance,
-  ~markName: string,
-  ~markOptions: performanceMarkOptions=?,
-) => performanceMark = "mark"
+external mark: (t, ~markName: string, ~markOptions: performanceMarkOptions=?) => performanceMark =
+  "mark"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/clearMarks)
 */
 @send
-external clearMarks: (performance, ~markName: string=?) => unit = "clearMarks"
+external clearMarks: (t, ~markName: string=?) => unit = "clearMarks"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/measure)
 */
 @send
 external measure: (
-  performance,
+  t,
   ~measureName: string,
   ~startOrMeasureOptions: string=?,
   ~endMark: string=?,
@@ -77,7 +78,7 @@ external measure: (
 */
 @send
 external measureWithOptions: (
-  performance,
+  t,
   ~measureName: string,
   ~startOrMeasureOptions: performanceMeasureOptions=?,
   ~endMark: string=?,
@@ -87,4 +88,4 @@ external measureWithOptions: (
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Performance/clearMeasures)
 */
 @send
-external clearMeasures: (performance, ~measureName: string=?) => unit = "clearMeasures"
+external clearMeasures: (t, ~measureName: string=?) => unit = "clearMeasures"

package/src/PermissionsAPI/Permissions.res

@@ -1,7 +1,11 @@
 open PermissionsTypes
 
+type t = PermissionsTypes.permissions = {...PermissionsTypes.permissions}
+
+external current: t = "permissions"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Permissions/query)
 */
 @send
-external query: (permissions, permissionDescriptor) => promise<permissionStatus> = "query"
+external query: (t, permissionDescriptor) => promise<permissionStatus> = "query"

package/src/ResizeObserverAPI/ResizeObserver.res

@@ -1,6 +1,8 @@
 open DOMTypes
 open ResizeObserverTypes
 
+type t = resizeObserver = {...resizeObserver}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ResizeObserver)
 */

package/src/ScreenWakeLockAPI/WakeLock.res

@@ -1,7 +1,11 @@
 open ScreenWakeLockTypes
 
+type t = ScreenWakeLockTypes.wakeLock = {...ScreenWakeLockTypes.wakeLock}
+
+external current: t = "wakeLock"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/WakeLock/request)
 */
 @send
-external request: (wakeLock, ~type_: wakeLockType=?) => promise<wakeLockSentinel> = "request"
+external request: (t, ~type_: wakeLockType=?) => promise<wakeLockSentinel> = "request"

package/src/ServiceWorkerAPI/ServiceWorkerContainer.res

@@ -1,13 +1,17 @@
 open ServiceWorkerTypes
 
-include EventTarget.Impl({type t = serviceWorkerContainer})
+type t = ServiceWorkerTypes.serviceWorkerContainer = {...ServiceWorkerTypes.serviceWorkerContainer}
+
+external current: t = "serviceWorker"
+
+include EventTarget.Impl({type t = t})
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ServiceWorkerContainer/register)
 */
 @send
 external register: (
-  serviceWorkerContainer,
+  t,
   string,
   ~options: registrationOptions=?,
 ) => promise<serviceWorkerRegistration> = "register"
@@ -16,20 +20,17 @@ external register: (
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ServiceWorkerContainer/getRegistration)
 */
 @send
-external getRegistration: (
-  serviceWorkerContainer,
-  ~clientURL: string=?,
-) => Nullable.t<serviceWorkerRegistration> = "getRegistration"
+external getRegistration: (t, ~clientURL: string=?) => Nullable.t<serviceWorkerRegistration> =
+  "getRegistration"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ServiceWorkerContainer/getRegistrations)
 */
 @send
-external getRegistrations: serviceWorkerContainer => promise<array<serviceWorkerRegistration>> =
-  "getRegistrations"
+external getRegistrations: t => promise<array<serviceWorkerRegistration>> = "getRegistrations"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ServiceWorkerContainer/startMessages)
 */
 @send
-external startMessages: serviceWorkerContainer => unit = "startMessages"
+external startMessages: t => unit = "startMessages"

package/src/ServiceWorkerAPI/ServiceWorkerGlobalScope.res

@@ -1,10 +1,14 @@
 open ServiceWorkerTypes
 
-include WorkerGlobalScope.Impl({type t = serviceWorkerGlobalScope})
+type t = ServiceWorkerTypes.serviceWorkerGlobalScope = {
+  ...ServiceWorkerTypes.serviceWorkerGlobalScope,
+}
+
+include WorkerGlobalScope.Impl({type t = t})
 
 /**
 Forces the waiting service worker to become the active service worker.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ServiceWorkerGlobalScope/skipWaiting)
 */
 @send
-external skipWaiting: serviceWorkerGlobalScope => promise<unit> = "skipWaiting"
+external skipWaiting: t => promise<unit> = "skipWaiting"

package/src/StorageAPI/StorageManager.res

@@ -1,26 +1,30 @@
 open StorageTypes
 open FileTypes
 
+type t = StorageTypes.storageManager = {...StorageTypes.storageManager}
+
+external current: t = "storage"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/StorageManager/persisted)
 */
 @send
-external persisted: storageManager => promise<bool> = "persisted"
+external persisted: t => promise<bool> = "persisted"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/StorageManager/persist)
 */
 @send
-external persist: storageManager => promise<bool> = "persist"
+external persist: t => promise<bool> = "persist"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/StorageManager/estimate)
 */
 @send
-external estimate: storageManager => promise<storageEstimate> = "estimate"
+external estimate: t => promise<storageEstimate> = "estimate"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/StorageManager/getDirectory)
 */
 @send
-external getDirectory: storageManager => promise<fileSystemDirectoryHandle> = "getDirectory"
+external getDirectory: t => promise<fileSystemDirectoryHandle> = "getDirectory"

package/src/UIEventsAPI/CompositionEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = compositionEvent = {...compositionEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/CompositionEvent)
 */

package/src/UIEventsAPI/DataTransfer.res

@@ -1,6 +1,8 @@
 open UIEventsTypes
 open DOMTypes
 
+type t = dataTransfer = {...dataTransfer}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/DataTransfer)
 */

package/src/UIEventsAPI/DataTransferItem.res

@@ -2,6 +2,8 @@ open UIEventsTypes
 open FileTypes
 open FileAndDirectoryEntriesTypes
 
+type t = dataTransferItem = {...dataTransferItem}
+
 /**
 Invokes the callback with the string data as the argument, if the drag data item kind is text.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/DataTransferItem/getAsString)

package/src/UIEventsAPI/DataTransferItemList.res

@@ -1,6 +1,8 @@
 open UIEventsTypes
 open FileTypes
 
+type t = dataTransferItemList = {...dataTransferItemList}
+
 /**
 Adds a new entry for the given data to the drag data store. If the data is plain text then a type string has to be provided also.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/DataTransferItemList/add)

package/src/UIEventsAPI/FocusEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = focusEvent = {...focusEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/FocusEvent)
 */

package/src/UIEventsAPI/InputEvent.res

@@ -1,6 +1,8 @@
 open UIEventsTypes
 open DOMTypes
 
+type t = inputEvent = {...inputEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/InputEvent)
 */

package/src/UIEventsAPI/KeyboardEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = keyboardEvent = {...keyboardEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/KeyboardEvent)
 */

package/src/UIEventsAPI/MouseEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = mouseEvent = {...mouseEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/MouseEvent)
 */

package/src/UIEventsAPI/PointerEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = pointerEvent = {...pointerEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/PointerEvent)
 */

package/src/UIEventsAPI/Touch.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = touch = {...touch}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Touch)
 */

package/src/UIEventsAPI/TouchEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = touchEvent = {...touchEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/TouchEvent)
 */

package/src/UIEventsAPI/TouchList.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = touchList = {...touchList}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/TouchList/item)
 */

package/src/UIEventsAPI/UIEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = uiEvent = {...uiEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/UIEvent)
 */

package/src/UIEventsAPI/WheelEvent.res

@@ -1,5 +1,7 @@
 open UIEventsTypes
 
+type t = wheelEvent = {...wheelEvent}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/WheelEvent)
 */

package/src/ViewTransitionsAPI/ViewTransition.res

@@ -1,5 +1,7 @@
 open ViewTransitionsTypes
 
+type t = viewTransition = {...viewTransition}
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/ViewTransition/skipTransition)
 */

package/src/WebCryptoAPI/Crypto.res

@@ -1,13 +1,17 @@
 open WebCryptoTypes
 
+type t = WebCryptoTypes.crypto = {...WebCryptoTypes.crypto}
+
+external current: t = "crypto"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Crypto/getRandomValues)
 */
 @send
-external getRandomValues: (crypto, 't) => 't = "getRandomValues"
+external getRandomValues: (t, 't) => 't = "getRandomValues"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Crypto/randomUUID)
 */
 @send
-external randomUUID: crypto => string = "randomUUID"
+external randomUUID: t => string = "randomUUID"

package/src/WebLocksAPI/LockManager.res

@@ -1,18 +1,21 @@
 open WebLocksTypes
 
+type t = WebLocksTypes.lockManager = {...WebLocksTypes.lockManager}
+
+external current: t = "locks"
+
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/LockManager/request)
 */
 @send
-external request: (lockManager, ~name: string, ~callback: lockGrantedCallback) => promise<JSON.t> =
-  "request"
+external request: (t, ~name: string, ~callback: lockGrantedCallback) => promise<JSON.t> = "request"
 
 /**
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/LockManager/request)
 */
 @send
 external requestWithOptions: (
-  lockManager,
+  t,
   ~name: string,
   ~options: lockOptions,
   ~callback: lockGrantedCallback,
@@ -22,4 +25,4 @@ external requestWithOptions: (
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/LockManager/query)
 */
 @send
-external query: lockManager => promise<lockManagerSnapshot> = "query"
+external query: t => promise<lockManagerSnapshot> = "query"

package/src/WebStorageAPI/Storage.res

@@ -1,18 +1,24 @@
 open WebStorageTypes
 
+type t = WebStorageTypes.storage = {...WebStorageTypes.storage}
+
+external local: t = "localStorage"
+
+external session: t = "sessionStorage"
+
 /**
 Returns the name of the nth key, or null if n is greater than or equal to the number of key/value pairs.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Storage/key)
 */
 @send
-external key: (storage, int) => Null.t<string> = "key"
+external key: (t, int) => Null.t<string> = "key"
 
 /**
 Returns the current value associated with the given key, or null if the given key does not exist.
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Storage/getItem)
 */
 @send
-external getItem: (storage, string) => Null.t<string> = "getItem"
+external getItem: (t, string) => Null.t<string> = "getItem"
 
 /**
 Sets the value of the pair identified by key to value, creating a new key/value pair if none existed for key previously.
@@ -23,7 +29,7 @@ Dispatches a storage event on Window objects holding an equivalent Storage objec
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Storage/setItem)
 */
 @send
-external setItem: (storage, ~key: string, ~value: string) => unit = "setItem"
+external setItem: (t, ~key: string, ~value: string) => unit = "setItem"
 
 /**
 Removes the key/value pair with the given key, if a key/value pair with the given key exists.
@@ -32,7 +38,7 @@ Dispatches a storage event on Window objects holding an equivalent Storage objec
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Storage/removeItem)
 */
 @send
-external removeItem: (storage, string) => unit = "removeItem"
+external removeItem: (t, string) => unit = "removeItem"
 
 /**
 Removes all key/value pairs, if there are any.
@@ -41,4 +47,4 @@ Dispatches a storage event on Window objects holding an equivalent Storage objec
 [Read more on MDN](https://developer.mozilla.org/docs/Web/API/Storage/clear)
 */
 @send
-external clear: storage => unit = "clear"
+external clear: t => unit = "clear"

package/src/WebWorkersAPI/SharedWorkerGlobalScope.res

@@ -1,5 +1,7 @@
 open WebWorkersTypes
 
+type t = WebWorkersTypes.sharedWorkerGlobalScope = {...WebWorkersTypes.sharedWorkerGlobalScope}
+
 module Impl = (
   T: {
     type t
@@ -24,4 +26,4 @@ self -> SharedWorkerGlobalScope.close
   external close: T.t => unit = "close"
 }
 
-include Impl({type t = sharedWorkerGlobalScope})
+include Impl({type t = t})

package/src/WebWorkersAPI/WorkerGlobalScope.res

@@ -1,6 +1,8 @@
 open WebWorkersTypes
 open FetchTypes
 
+type t = WebWorkersTypes.workerGlobalScope = {...WebWorkersTypes.workerGlobalScope}
+
 module Impl = (
   T: {
     type t
@@ -8,6 +10,8 @@ module Impl = (
 ) => {
   include EventTarget.Impl({type t = T.t})
 
+  external current: T.t = "self"
+
   /**
 `fetch(workerGlobalScope, string, init)`
 
@@ -38,4 +42,4 @@ let response = await self->WorkerGlobalScope.fetch(myRequest)
   external fetchWithRequest: (T.t, request, ~init: requestInit=?) => promise<response> = "fetch"
 }
 
-include Impl({type t = workerGlobalScope})
+include Impl({type t = t})