/* Ċ Ġ* ĠCopyright Ġ 2 0 2 0 ĠAnt on ĠTr ush kov Ċ Ġ* Ċ Ġ* Ġ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 Ġapp . the le ma . json Ċ Ċ import Ġglfw .* Ċ import Ġkotlinx . c interop . to K String Ċ import Ġapp . the le ma . json .* Ċ Ċ class ĠNative Json : ĠI JSON Ġ{ ĊĠĠĠ Ġoverride Ġfun Ġparse Object ( text : ĠString ): ĠI JsonObject Ġ{ ĊĠĠĠĠĠĠĠ Ġ// ĠFIXME Ġroot Ġmust Ġbe Ġdisposed ĊĠĠĠĠĠĠĠ Ġval Ġroot Ġ= Ġjson _ parse _ string ( text ) ĊĠĠĠĠĠĠĠ Ġreturn ĠNative JsonObject ( json _ object ( root ) !! ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġparse Array ( text : ĠString ): ĠI JsonArray Ġ{ ĊĠĠĠĠĠĠĠ Ġ// ĠFIXME Ġroot Ġmust Ġbe Ġdisposed ĊĠĠĠĠĠĠĠ Ġval Ġroot Ġ= Ġjson _ parse _ string ( text ) ĊĠĠĠĠĠĠĠ Ġreturn ĠNative JsonArray ( json _ array ( root ) !! ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġprint Array ( context : ĠI JsonArray . () Ġ-> ĠUnit ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġjson Value Ġ= Ġjson _ value _ init _ object () ĊĠĠĠĠĠĠĠ ĠNative JsonArray ( json _ array ( json Value ) !! ). apply ( context ) ĊĠĠĠĠĠĠĠ Ġval Ġbytes Ġ= Ġjson _ serialize _ to _ string _ pretty ( json Value ) !! ĊĠĠĠĠĠĠĠ Ġjson _ value _ free ( json Value ) ĊĠĠĠĠĠĠĠ Ġreturn Ġbytes . to K String () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġprint Object ( context : ĠI JsonObject . () Ġ-> ĠUnit ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġjson Value Ġ= Ġjson _ value _ init _ object () ĊĠĠĠĠĠĠĠ ĠNative JsonObject ( json _ object ( json Value ) !! ). apply ( context ) ĊĠĠĠĠĠĠĠ Ġval Ġbytes Ġ= Ġjson _ serialize _ to _ string _ pretty ( json Value ) !! ĊĠĠĠĠĠĠĠ Ġjson _ value _ free ( json Value ) ĊĠĠĠĠĠĠĠ Ġreturn Ġbytes . to K String () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġprint Object ( json : ĠI JsonObject IO ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġjson Value Ġ= Ġjson _ value _ init _ object () ĊĠĠĠĠĠĠĠ ĠNative JsonObject ( json _ object ( json Value ) !! ). apply Ġ{ Ġjson . read Json ( this ) Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġbytes Ġ= Ġjson _ serialize _ to _ string _ pretty ( json Value ) !! ĊĠĠĠĠĠĠĠ Ġjson _ value _ free ( json Value ) ĊĠĠĠĠĠĠĠ Ġreturn Ġbytes . to K String () ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun Ġprint Array ( json : ĠI JsonArray IO ): ĠString Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġjson Value Ġ= Ġjson _ value _ init _ object () ĊĠĠĠĠĠĠĠ ĠNative JsonArray ( json _ array ( json Value ) !! ). apply Ġ{ Ġjson . read Json ( this ) Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġbytes Ġ= Ġjson _ serialize _ to _ string _ pretty ( json Value ) !! ĊĠĠĠĠĠĠĠ Ġjson _ value _ free ( json Value ) ĊĠĠĠĠĠĠĠ Ġreturn Ġbytes . to K String () ĊĠĠĠ Ġ} Ċ }