package Ġcom . k gl . v ma . enums Ċ Ċ import Ġcom . k gl . v ma . utils .* Ċ import Ġcv ma .* Ċ Ċ actual Ġenum Ġclass ĠRecord ( override Ġval Ġvalue : ĠUInt ) Ġ: ĠV ma Flag < Record > Ġ{ ĊĠĠĠ ĠFL USH _ AFTER _ CALL ( V MA _ RECORD _ FLUSH _ AFTER _ CALL _ BIT ); ĊĉĊ ĉ actual Ġcompanion Ġobject Ġ{ Ċĉ ĉ private Ġval Ġenum Look Up Map : ĠMap < UInt , ĠRecord > Ġ= Ċĉĉ ĉ enum Values < Record >(). associate By Ġ{ Ġit . value Ġ} ĊĉĉĊĉ ĉ fun Ġfrom Multiple ( value : ĠUInt ): ĠV ma Flag < Record >? Ġ= Ġif Ġ( value Ġ== Ġ 0 u ) Ġnull Ġelse ĠV ma Flag ( value ) ĊĉĉĊĉ ĉ fun Ġfrom ( value : ĠUInt ): ĠRecord Ġ= Ġenum Look Up Map [ value ] !! Ċ ĉ } Ċ } Ċ