ParseMonthCode, CreateMonthCode

Author: sffc

spec.emu

@@ -919,42 +919,51 @@ contributors: Google, Ecma International
       </emu-alg>
     </emu-clause>
 
-    <emu-clause id="sup-temporal-integerfrommonthcode" type="implementation-defined abstract operation">
+    <emu-clause id="sup-temporal-parsemonthcode" type="implementation-defined abstract operation">
       <h1>
-        IntegerFromMonthCode (
+        ParseMonthCode (
           _monthCode_: a String,
-        ): an integer
+        ): an Record with fields [[Number]] (an integer) and [[IsLeap]] (a boolean)
       </h1>
       <dl class="header">
         <dt>description</dt>
         <dd>
-          It returns the integer number contained in _monthCode_.
+          It parses a valid month code string (such as one returned by ToMonthCode or CreateMonthCode) into its parts.
         </dd>
       </dl>
       <p>It performs the following steps when called:</p>
       <emu-alg>
-        1. Assert: The length of _monthCode_ is 3 or 4.
+        1. If the length of _monthCode_ is 3, then
+          1. Let _isLeap_ be *false*.
+        1. Else,
+          1. Assert: the length of _monthCode_ is 4.
+          1. Let _isLeap_ be *true*.
         1. Let _monthCodeDigits_ be the substring of _monthCode_ from 1 to 3.
-        1. Return ℝ(StringToNumber(_monthCodeDigits_)).
+        1. Let _number_ be ℝ(StringToNumber(_monthCodeDigits_)).
+        1. Return the Record { [[Number]]: _number_, [[IsLeap]]: _isLeap_ }.
       </emu-alg>
     </emu-clause>
 
-    <emu-clause id="sup-temporal-monthcodefrominteger" type="implementation-defined abstract operation">
+    <emu-clause id="sup-temporal-createmonthcode" type="implementation-defined abstract operation">
       <h1>
-        MonthCodeFromInteger (
-          _integer_: an integer,
+        CreateMonthCode (
+          _number_: an integer,
+          _isLeap_: a Boolean,
         ): a String
       </h1>
       <dl class="header">
         <dt>description</dt>
         <dd>
-          It returns a month code for a non-leap month containing the given integer number.
+          It creates a month code with the given month number and leap month flag.
         </dd>
       </dl>
       <p>It performs the following steps when called:</p>
       <emu-alg>
         1. Let _numberPart_ be ToZeroPaddedDecimalString(_integer_, 2).
-        1. Return the string-concatenation of the code unit 0x004D (LATIN CAPITAL LETTER M) and _numberPart_.
+        1. If _isLeap_ is *true*, then
+          1. Return the string-concatenation of the code unit 0x004D (LATIN CAPITAL LETTER M), _numberPart_, and the code unit 0x004C (LATIN CAPITAL LETTER L).
+        1. Else,
+          1. Return the string-concatenation of the code unit 0x004D (LATIN CAPITAL LETTER M) and _numberPart_.
       </emu-alg>
     </emu-clause>
 
@@ -1061,7 +1070,7 @@ contributors: Google, Ecma International
         1. If _calendar_ is *"chinese"*, *"dangi"*, or *"hebrew"*, then
           1. If _calendar_ is *"chinese"* or *"dangi"*, then
             1. If IsValidMonthCodeForCalendarInYear(_calendar_, _y2_, _monthCode_) is *false*, then
-              1. Set _monthCode_ to MonthCodeFromInteger(IntegerFromMonthCode(_monthCode_)).
+              1. Set _monthCode_ to CreateMonthCode(ParseMonthCode(_monthCode_).[[Number]], *false*).
           1. Else,
             1. Assert: _calendar_ is *"hebrew"*.
             1. Let _d2_ be CalendarISOToDate(_calendar_, ! CalendarDateCodesToISO(_calendar_, _y2_, *"M01"*, 1)).
@@ -1074,7 +1083,7 @@ contributors: Google, Ecma International
           1. Assert: IsValidMonthCodeForCalendarInYear(_calendar_, _y2_, _monthCode_) is *true*.
           1. Let _month_ be CalendarISOToDate(_calendar_, ! CalendarDateCodesToISO(_calendar_, _y2_, _monthCode_, 1)).[[Month]].
         1. Else,
-          1. Let _month_ be IntegerFromMonthCode(_monthCode_).
+          1. Let _month_ be ParseMonthCode(_monthCode_).[[Number]].
         1. Return the Record { [[Year]]: _y2_, [[Month]]: _month_ }.
       </emu-alg>
     </emu-clause>