feat: Add DurationOptions

Resolves #22

Author: pete-murphy

package-lock.json

@@ -0,0 +1,5 @@
+{
+  "devDependencies": {
+    "@formatjs/intl-durationformat": "^0.7.2"
+  }
+}

package.json

@@ -267,12 +267,77 @@ options =
         , { name: "Other", toString: "other" }
         ]
     }
+  , { name: "DurationFormatStyle"
+    , constructors:
+        narrowShortLong <>
+          [ { name: "Digital", toString: "digital" } ]
+    }
+  , { name: "Years"
+    , constructors: narrowShortLong
+    }
+  , { name: "YearsDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Months"
+    , constructors: narrowShortLong
+    }
+  , { name: "MonthsDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Weeks"
+    , constructors: narrowShortLong
+    }
+  , { name: "WeeksDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Days"
+    , constructors: narrowShortLong
+    }
+  , { name: "DaysDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Hours"
+    , constructors: narrowShortLong <> twoDigitNumeric
+    }
+  , { name: "HoursDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Minutes"
+    , constructors: narrowShortLong <> twoDigitNumeric
+    }
+  , { name: "MinutesDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Seconds"
+    , constructors: narrowShortLong <> twoDigitNumeric
+    }
+  , { name: "SecondsDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Milliseconds"
+    , constructors: narrowShortLong <> numeric
+    }
+  , { name: "MillisecondsDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Microseconds"
+    , constructors: narrowShortLong <> numeric
+    }
+  , { name: "MicrosecondsDisplay"
+    , constructors: alwaysAuto
+    }
+  , { name: "Nanoseconds"
+    , constructors: narrowShortLong <> numeric
+    }
+  , { name: "NanosecondsDisplay"
+    , constructors: alwaysAuto
+    }
   ]
   where
+  numeric = [ { name: "Numeric", toString: "numeric" } ]
   twoDigitNumeric =
-    [ { name: "Numeric", toString: "numeric" }
-    , { name: "TwoDigit", toString: "2-digit" }
-    ]
+    [ { name: "TwoDigit", toString: "2-digit" } ]
+      <> numeric
   narrowShortLong =
     [ { name: "Narrow", toString: "narrow" }
     , { name: "Short", toString: "short" }
@@ -284,6 +349,10 @@ options =
     , { name: "Medium", toString: "medium" }
     , { name: "Short", toString: "short" }
     ]
+  alwaysAuto =
+    [ { name: "Always", toString: "always" }
+    , { name: "Auto", toString: "auto" }
+    ]
 
 makeModule :: String -> Option -> Module Void
 makeModule moduleName option = Partial.Unsafe.unsafePartial do

script/generate-options/src/Main.purs

@@ -0,0 +1,21 @@
+"use strict";
+
+export function _new(locales, options) {
+  return new Intl.DurationFormat(locales, options);
+}
+
+export function _format(durationFormat, number) {
+  return durationFormat.format(number);
+}
+
+export function _formatToParts(durationFormat, number) {
+  return durationFormat.formatToParts(number);
+}
+
+export function _resolvedOptions(durationFormat) {
+  return durationFormat.resolvedOptions();
+}
+
+export function _supportedLocalesOf(locales, options) {
+  return Intl.NumberFormat.supportedLocalesOf(locales, options);
+}