package Ġcom . bad oo . reak t ive . utils . atomic Ċ Ċ actual Ġclass ĠAtomic Int Ġactual Ġconstructor ( initial Value : ĠInt ) Ġ{ ĊĊĠĠĠ Ġprivate Ġval Ġdelegate Ġ= Ġjava . util . concurrent . atomic . Atomic Integer ( initial Value ) ĊĊĠĠĠ Ġactual Ġvar Ġvalue : ĠInt ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġdelegate . get () ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdelegate . set ( value ) ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠ Ġactual Ġfun Ġadd AndGet ( delta : ĠInt ): ĠInt Ġ= Ġdelegate . add AndGet ( delta ) ĊĊĠĠĠ Ġactual Ġfun Ġcompare AndSet ( expected Value : ĠInt , ĠnewValue : ĠInt ): ĠBoolean Ġ= Ġdelegate . compare AndSet ( expected Value , ĠnewValue ) Ċ }