tests/clock.test: added test illustrating bug [tcl:2c0f49e26c27847a] - cache becomes inconsistent when deriving localized formats (e. g. %x)

Author: sebres

tests/clock.test

@@ -35500,6 +35500,18 @@ test clock-29.1812 {parsing of several localized formats} {
     }
     set res
 } [lrepeat 12 0]
+
+test clock-29.1813 {cache consistency when deriving localized formats, bug [2c0f49e26c27847a]} {
+    # ensure localized formats are not affected by mistaken merge of mc
+    # from parent locale, so such formats got invalidated in child cache:
+    namespace inscope ::tcl::clock {
+	::msgcat::mcset en_US_roman_xx    DATE_FORMAT "%d.%m.%Y"
+	::msgcat::mcset en_US_roman_xx_yy DATE_FORMAT "%Y|%m|%d"
+    }
+    list [clock format 86400 -format %x -gmt 1 -locale en_US_roman] \
+         [clock format 86400 -format %x -gmt 1 -locale en_US_roman_xx] \
+	 [clock format 86400 -format %x -gmt 1 -locale en_US_roman_xx_yy]
+} {01/02/1970 02.01.1970 1970|01|02}
 # END testcases29