"December"
} clone 1 <n-based-assoc> ; inline
-[ "December" t ]
+{ "December" t }
[ 12 months at* ] unit-test
-[ f f ]
+{ f f }
[ 13 months at* ] unit-test
-[ f f ]
+{ f f }
[ 0 months at* ] unit-test
-[ 12 ] [ months assoc-size ] unit-test
+{ 12 } [ months assoc-size ] unit-test
-[ {
+{ {
{ 1 "January" }
{ 2 "February" }
{ 3 "March" }
{ 10 "October" }
{ 11 "November" }
{ 12 "December" }
-} ] [ months >alist ] unit-test
+} } [ months >alist ] unit-test
-[ V{
+{ V{
"January"
"February"
"March"
"November"
"December"
"Smarch"
-} ] [ "Smarch" 13 months [ set-at ] keep seq>> ] unit-test
+} } [ "Smarch" 13 months [ set-at ] keep seq>> ] unit-test
-[ V{ } ] [ months [ clear-assoc ] keep seq>> ] unit-test
+{ V{ } } [ months [ clear-assoc ] keep seq>> ] unit-test