feat: Intl.Segmenter

Author: illusionalsagacity

src/intl/Core__Intl__Segmenter.mjs

@@ -0,0 +1,2 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */

src/intl/Core__Intl__Segmenter.res

@@ -0,0 +1,40 @@
+/***
+Not supported in Firefox
+*/
+type t
+
+type granularity = [#grapheme | #word | #sentence]
+
+type options = {
+  localeMatcher?: Core__Intl__Common.localeMatcher,
+  granularity?: granularity,
+}
+
+type pluralCategories = [
+  | #zero
+  | #one
+  | #two
+  | #few
+  | #many
+  | #other
+]
+
+type resolvedOptions = {locale: string, granularity: granularity}
+
+type supportedLocalesOptions = {localeMatcher: Core__Intl__Common.localeMatcher}
+
+@new external make: unit => t = "Intl.Segmenter"
+@new external makeWithLocale: string => t = "Intl.Segmenter"
+@new external makeWithLocales: array<string> => t = "Intl.Segmenter"
+@new external makeWithLocaleAndOptions: (string, options) => t = "Intl.Segmenter"
+@new external makeWithLocalesAndOptions: (array<string>, options) => t = "Intl.Segmenter"
+@new external makeWithOptions: (@as(json`undefined`) _, options) => t = "Intl.Segmenter"
+
+@val external supportedLocalesOf: array<string> => t = "Intl.Segmenter.supportedLocalesOf"
+@val
+external supportedLocalesOfWithOptions: (array<string>, supportedLocalesOptions) => t =
+  "Intl.Segmenter.supportedLocalesOf"
+
+@send external resolvedOptions: t => resolvedOptions = "resolvedOptions"
+
+@send external segment: (t, string) => Core__Intl__Segments.t = "segment"

src/intl/Core__Intl__Segments.mjs

@@ -0,0 +1,2 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+/* This output is empty. Its source's type definitions, externals and/or unused code got optimized away. */

src/intl/Core__Intl__Segments.res

@@ -0,0 +1,18 @@
+/***
+ A Segments instance is an object that represents the segments of a specific string, subject to the locale and options of its constructing Intl.Segmenter instance.
+https://tc39.es/ecma402/#sec-segments-objects
+*/
+type t
+
+type segmentData = {
+  segment: string,
+  index: int,
+  isWordLike: option<bool>,
+  input: string,
+}
+
+@send
+external containing: unit => segmentData = "containing"
+
+@send
+external containingWithIndex: int => segmentData = "containing"