/* Ċ Ġ* ĠCopyright Ġ 2 0 2 1 ĠMichael ĠRo z um y ans ki y Ċ Ġ* Ċ Ġ* ĠLicensed Ġunder Ġthe ĠApache ĠLicense , ĠVersion Ġ 2 . 0 Ġ( the Ġ" License "); Ċ Ġ* Ġyou Ġmay Ġnot Ġuse Ġthis Ġfile Ġexcept Ġin Ġcompliance Ġwith Ġthe ĠLicense . Ċ Ġ* ĠYou Ġmay Ġobtain Ġa Ġcopy Ġof Ġthe ĠLicense Ġat Ċ Ġ* Ċ Ġ* ĠĠĠĠ Ġhttp :// www . apache . org / licenses / LICENSE - 2 . 0 Ċ Ġ* Ċ Ġ* ĠUnless Ġrequired Ġby Ġapplicable Ġlaw Ġor Ġagreed Ġto Ġin Ġwriting , Ġsoftware Ċ Ġ* Ġdistributed Ġunder Ġthe ĠLicense Ġis Ġdistributed Ġon Ġan Ġ" AS ĠIS " ĠBASIS , Ċ Ġ* ĠWITHOUT ĠWARRANTIES ĠOR ĠCONDITIONS ĠOF ĠANY ĠKIND , Ġeither Ġexpress Ġor Ġimplied . Ċ Ġ* ĠSee Ġthe ĠLicense Ġfor Ġthe Ġspecific Ġlanguage Ġgoverning Ġpermissions Ġand Ċ Ġ* Ġlimitations Ġunder Ġthe ĠLicense . Ċ Ġ*/ Ċ Ċ package Ġio . m ichael ro cks . g rip Ċ Ċ import Ġio . m ichael ro cks . g rip . commons . Lazy Map Ċ import Ġio . m ichael ro cks . g rip . mir rors . Class Mirror Ċ import Ġio . m ichael ro cks . g rip . mir rors . Type Ċ Ċ interface ĠClasses Result Ġ: ĠMap < Type . Object , ĠClass Mirror > Ġ{ ĊĠ Ġval Ġtypes : ĠSet < Type . Object > ĊĠĠĠ Ġget () Ġ= Ġkeys ĊĠ Ġval Ġclasses : ĠCollection < Class Mirror > ĊĠĠĠ Ġget () Ġ= Ġvalues ĊĊĠ Ġfun Ġcontains Type ( type : ĠType . Object ) Ġ= ĊĠĠĠ Ġcontains Key ( type ) ĊĊĠ Ġfun Ġcontains Class ( class Mirror : ĠClass Mirror ) Ġ= ĊĠĠĠ Ġcontains Value ( class Mirror ) ĊĊĠ Ġclass ĠBuilder Ġ{ ĊĠĠĠ Ġprivate Ġval Ġclasses Ġ= ĠLazy Map < Type . Object , ĠClass Mirror >() ĊĊĠĠĠ Ġfun Ġadd Class ( mirror : ĠClass Mirror ) Ġ= Ġapply Ġ{ ĊĠĠĠĠĠ Ġval Ġold Mirror Ġ= Ġclasses . put ( mirror . type , Ġmirror ) ĊĠĠĠĠĠ Ġrequire ( old Mirror Ġ== Ġnull ) Ġ{ Ġ" Duplicate ĠClass Mirror Ġfor Ġtype Ġ${ mirror . type }" Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġfun Ġbuild (): ĠClasses Result Ġ= ĠImmutable Classes Result ( this ) ĊĊĠĠĠ Ġprivate Ġclass ĠImmutable Classes Result ( ĊĠĠĠĠĠ Ġbuilder : ĠBuilder ĊĠĠĠ Ġ) Ġ: ĠClasses Result , ĠMap < Type . Object , ĠClass Mirror > Ġby Ġbuilder . classes . detach Immutable Copy () ĊĠ Ġ} Ċ } Ċ Ċ internal Ġinline Ġfun Ġbuild Classes Result ( body : ĠClasses Result . Builder . () Ġ-> ĠUnit ) Ġ= ĊĠ ĠClasses Result . Builder (). run Ġ{ ĊĠĠĠ Ġbody () ĊĠĠĠ Ġbuild () ĊĠ Ġ} Ċ Ċ val ĠMap . Entry < Type . Object , ĠClass Mirror >. type : ĠType . Object ĊĠ Ġget () Ġ= Ġkey Ċ val ĠMap . Entry < Type . Object , ĠClass Mirror >. class Mirror : ĠClass Mirror ĊĠ Ġget () Ġ= Ġvalue Ċ