package Ġas mb le . compile . jvm Ċ Ċ import Ġas mb le . TestBase Ċ import Ġas mb le . ast . Node Ċ import Ġas mb le . run . jvm . Script Context Ċ import Ġas mb le . util . get Ċ import Ġorg . junit . Test Ċ import Ġjava . nio . ByteBuffer Ċ import Ġjava . util .* Ċ import Ġkotlin . test . assertEquals Ċ Ċ class ĠLarge Data Test Ġ: ĠTest Base () Ġ{ ĊĠĠĠ Ġ@ Test ĊĠĠĠ Ġfun Ġtest Large Data () Ġ{ ĊĠĠĠĠĠĠĠ Ġ// ĠThis Ġpreviously Ġfailed Ġbecause Ġstring Ġconstants Ġcan 't Ġbe Ġlonger Ġthan Ġ 6 5 5 3 6 Ġchars . ĊĠĠĠĠĠĠĠ Ġ// ĠWe Ġcreate Ġa Ġbyte Ġarray Ġacross Ġthe Ġwhole Ġgam bit Ġof Ġbytes Ġto Ġtest ĠUTF 8 Ġencoding . ĊĠĠĠĠĠĠĠ Ġval Ġbytes Expected Ġ= ĠByteArray ( 7 0 0 0 0 ) Ġ{ Ġ(( it Ġ% Ġ 2 5 5 ) Ġ- ĠByte . MIN _ VALUE ). to Byte () Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġmod Ġ= ĠNode . Module ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmem ories Ġ= ĠlistOf ( Node . Type . Memory ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġlimits Ġ= ĠNode . Resizable Limits ( initial Ġ= Ġ 2 , Ġmaximum Ġ= Ġ 2 ) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdata Ġ= ĠlistOf ( Node . Data ( ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġindex Ġ= Ġ 0 , ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġoffset Ġ= ĠlistOf ( Node . Instr . I 3 2 Const ( 0 )), ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġdata Ġ= Ġbytes Expected ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ)) ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġval Ġctx Ġ= ĠC ls Context ( ĊĠĠĠĠĠĠĠĠĠĠĠ ĠpackageName Ġ= Ġ" test ", ĊĠĠĠĠĠĠĠĠĠĠĠ ĠclassName Ġ= Ġ" Temp " Ġ+ ĠUUID . randomUUID (). toString (). replace ("- ", Ġ""), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmod Ġ= Ġmod , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġlogger Ġ= Ġlogger ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ ĠAst To Asm . from Module ( ctx ) ĊĠĠĠĠĠĠĠ Ġval Ġcls Ġ= ĠScript Context . Simple ClassLoader ( java Class . class Loader , Ġlogger ). from Built Context ( ctx ) ĊĠĠĠĠĠĠĠ Ġ// ĠInstantiate Ġit , Ġget Ġthe Ġmemory Ġout , Ġand Ġcheck Ġit ĊĠĠĠĠĠĠĠ Ġval Ġfield Ġ= Ġcls . getDeclared Field (" memory "). apply Ġ{ Ġis Accessible Ġ= Ġtrue Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġbuf Ġ= Ġfield [ cls . newInstance ()] Ġas ĠByteBuffer ĊĠĠĠĠĠĠĠ Ġ// ĠGrab Ġall Ġ+ Ġ 1 Ġand Ġcheck Ġvalues ĊĠĠĠĠĠĠĠ Ġval Ġbytes Actual Ġ= ĠByteArray ( 7 0 0 0 1 ). also Ġ{ Ġbuf . get ( 0 , Ġit ) Ġ} ĊĠĠĠĠĠĠĠ Ġbytes Actual . forEach Indexed Ġ{ Ġindex , Ġbyte Ġ-> ĊĠĠĠĠĠĠĠĠĠĠĠ ĠassertEquals ( if Ġ( index Ġ== Ġ 7 0 0 0 0 ) Ġ 0 . to Byte () Ġelse Ġbytes Expected [ index ], Ġbyte ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ }