// ĠWITH _ STD LIB Ċ // ĠWORK S _ WHEN _ VALUE _ CLASS Ċ // ĠLANGUAGE : Ġ+ Value Classes Ċ Ċ fun Ġ< T > Ġeval ( fn : Ġ() Ġ-> ĠT ) Ġ= Ġfn () Ċ Ċ OPTIONAL _ JVM _ INLINE _ AN NOT ATION Ċ value Ġclass ĠR ( private Ġval Ġr : ĠInt ) Ġ{ ĊĠĠĠ Ġfun Ġtest () Ġ= Ġeval Ġ{ Ġ" OK " Ġ} Ċ } Ċ Ċ fun Ġbox () Ġ= ĠR ( 0 ). test ()