Stricter Intl Bindings

CHANGELOG.md

@@ -2,6 +2,7 @@
 
 ## Next version
 
+- BREAKING: Adds typed bindings to `Intl`, replacing the options type of `{..}` with records. https://github.com/rescript-association/rescript-core/pull/65
 - Add `Dict.forEach`, `Dict.forEachWithKey` and `Dict.mapValues` https://github.com/rescript-association/rescript-core/pull/181
 - Remove internal xxxU helper functions that are not needed anymore in uncurried mode. https://github.com/rescript-association/rescript-core/pull/191
 - Rename `Object.empty` to `Object.make` for consistency.

rescript.json

@@ -8,6 +8,7 @@
     },
     {
       "dir": "test",
+      "subdirs": ["intl"],
       "type": "dev"
     }
   ],

src/Core__Intl.mjs

@@ -5,6 +5,8 @@ var Collator;
 
 var DateTimeFormat;
 
+var ListFormat;
+
 var Locale;
 
 var NumberFormat;
@@ -13,12 +15,19 @@ var PluralRules;
 
 var RelativeTimeFormat;
 
+var Segmenter;
+
+var Segments;
+
 export {
   Collator ,
   DateTimeFormat ,
+  ListFormat ,
   Locale ,
   NumberFormat ,
   PluralRules ,
   RelativeTimeFormat ,
+  Segmenter ,
+  Segments ,
 }
 /* No side effect */

src/Core__Intl.res

@@ -1,6 +1,24 @@
 module Collator = Core__Intl__Collator
 module DateTimeFormat = Core__Intl__DateTimeFormat
+module ListFormat = Core__Intl__ListFormat
 module Locale = Core__Intl__Locale
 module NumberFormat = Core__Intl__NumberFormat
 module PluralRules = Core__Intl__PluralRules
 module RelativeTimeFormat = Core__Intl__RelativeTimeFormat
+module Segmenter = Core__Intl__Segmenter
+module Segments = Core__Intl__Segments
+
+/**
+@throws RangeError
+*/
+external getCanonicalLocalesExn: string => array<string> = "Intl.getCanonicalLocales"
+
+/**
+@throws RangeError
+*/
+external getCanonicalLocalesManyExn: array<string> => array<string> = "Intl.getCanonicalLocales"
+
+/**
+@throws RangeError
+*/
+external supportedValuesOfExn: string => array<string> = "Intl.supportedValuesOf"

src/intl/Core__Intl__Collator.res

@@ -1,17 +1,42 @@
 type t
 
+type usage = [#sort | #search]
+type sensitivity = [#base | #accent | #case | #variant]
+type caseFirst = [#upper | #lower | #"false"]
+
+type options = {
+  localeMatcher?: Core__Intl__Common.localeMatcher,
+  usage?: usage,
+  sensitivity?: sensitivity,
+  ignorePunctuation?: bool,
+  numeric?: bool,
+  caseFirst?: caseFirst,
+}
+
+type resolvedOptions = {
+  locale: string,
+  usage: usage,
+  sensitivity: sensitivity,
+  ignorePunctuation: bool,
+  collation: [Core__Intl__Common.collation | #default],
+  numeric?: bool,
+  caseFirst?: caseFirst,
+}
+
+type supportedLocalesOptions = {localeMatcher: Core__Intl__Common.localeMatcher}
+
 @new external make: unit => t = "Intl.Collator"
 @new external makeWithLocale: string => t = "Intl.Collator"
 @new external makeWithLocales: array<string> => t = "Intl.Collator"
-@new external makeWithLocaleAndOptions: (string, {..}) => t = "Intl.Collator"
-@new external makeWithLocalesAndOptions: (array<string>, {..}) => t = "Intl.Collator"
-@new external makeWithOptions: (@as(json`undefined`) _, {..}) => t = "Intl.Collator"
+@new external makeWithLocaleAndOptions: (string, options) => t = "Intl.Collator"
+@new external makeWithLocalesAndOptions: (array<string>, options) => t = "Intl.Collator"
+@new external makeWithOptions: (@as(json`undefined`) _, options) => t = "Intl.Collator"
 
 @val external supportedLocalesOf: array<string> => t = "Intl.Collator.supportedLocalesOf"
 @val
-external supportedLocalesOfWithOptions: (array<string>, {..}) => t =
+external supportedLocalesOfWithOptions: (array<string>, supportedLocalesOptions) => t =
   "Intl.Collator.supportedLocalesOf"
 
-@send external resolvedOptions: t => {..} = "resolvedOptions"
+@send external resolvedOptions: t => resolvedOptions = "resolvedOptions"
 
 @send external compare: (t, string, string) => int = "compare"

src/intl/Core__Intl__Common.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__Common.res

@@ -0,0 +1,156 @@
+type localeMatcher = [#lookup | @as("best fit") #bestFit]
+
+type calendar = [
+  | #buddhist
+  | #chinese
+  | #coptic
+  | #dangi
+  | #ethioaa
+  | #ethiopic
+  | #gregory
+  | #hebrew
+  | #indian
+  | #islamic
+  | #"islamic-umalqura"
+  | #"islamic-tbla"
+  | #"islamic-civil"
+  | #"islamic-rgsa"
+  | #iso8601
+  | #japanese
+  | #persian
+  | #roc
+]
+
+type collation = [
+  | #compat // (Arabic)
+  | #dict // (Sinhala)
+  | #emoji // (root)
+  | #eor // (root)
+  | #phonebk // (German)
+  | #phonetic // (Lingala)
+  | #pinyin // (Chinese)
+  | #stroke // (Chinese)
+  | #trad
+  | #unihan // (Chinese, Japanese, and Korean; not available in Chrome or Edge)
+  | #zhuyin
+] // (Chinese)
+
+type numberingSystem = [
+  | #adlm
+  | #ahom
+  | #arab
+  | #arabext
+  | #bali
+  | #beng
+  | #bhks
+  | #brah
+  | #cakm
+  | #cham
+  | #deva
+  | #diak
+  | #fullwide
+  | #gong
+  | #gonm
+  | #gujr
+  | #guru
+  | #hanidec
+  | #hmng
+  | #hmnp
+  | #java
+  | #kali
+  | #kawi
+  | #khmr
+  | #knda
+  | #lana
+  | #lanatham
+  | #laoo
+  | #latn
+  | #lepc
+  | #limb
+  | #mathbold
+  | #mathdbl
+  | #mathmono
+  | #mathsanb
+  | #mathsans
+  | #mlym
+  | #modi
+  | #mong
+  | #mroo
+  | #mtei
+  | #mymr
+  | #mymrshan
+  | #mymrtlng
+  | #nagm
+  | #newa
+  | #nkoo
+  | #olck
+  | #orya
+  | #osma
+  | #rohg
+  | #saur
+  | #segment
+  | #shrd
+  | #sind
+  | #sinh
+  | #sora
+  | #sund
+  | #takr
+  | #talu
+  | #tamldec
+  | #telu
+  | #thai
+  | #tibt
+  | #tirh
+  | #tnsa
+  | #vaii
+  | #wara
+  | #wcho
+]
+
+type oneTo21 = [
+  | #1
+  | #2
+  | #3
+  | #4
+  | #5
+  | #6
+  | #7
+  | #8
+  | #9
+  | #10
+  | #11
+  | #12
+  | #13
+  | #14
+  | #15
+  | #16
+  | #17
+  | #18
+  | #19
+  | #20
+  | #21
+]
+
+type zeroTo20 = [
+  | #0
+  | #1
+  | #2
+  | #3
+  | #4
+  | #5
+  | #6
+  | #7
+  | #8
+  | #9
+  | #10
+  | #11
+  | #12
+  | #13
+  | #14
+  | #15
+  | #16
+  | #17
+  | #18
+  | #19
+  | #20
+]