firefly-compiler 0.5.9 → 0.5.11

package/output/js/ff/core/List.mjs

@@ -243,7 +243,7 @@ export function List_takeWhile(self_, body_) {
 const result_ = ff_core_Array.new_();
 let i_ = 0;
 while(((i_ < ff_core_List.List_size(self_)) && body_((self_[i_] ?? ff_core_List.internalGrab_(self_, i_))))) {
-ff_core_Array.Array_push(result_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+result_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Array.Array_drain(result_)
@@ -256,7 +256,7 @@ while(((i_ < ff_core_List.List_size(self_)) && body_((self_[i_] ?? ff_core_List.
 i_ += 1
 };
 while((i_ < ff_core_List.List_size(self_))) {
-ff_core_Array.Array_push(result_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+result_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Array.Array_drain(result_)
@@ -267,11 +267,11 @@ const first_ = ff_core_Array.new_();
 const second_ = ff_core_Array.new_();
 let i_ = 0;
 while(((i_ < ff_core_List.List_size(self_)) && body_((self_[i_] ?? ff_core_List.internalGrab_(self_, i_))))) {
-ff_core_Array.Array_push(first_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+first_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 while((i_ < ff_core_List.List_size(self_))) {
-ff_core_Array.Array_push(second_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+second_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Pair.Pair(ff_core_Array.Array_drain(first_), ff_core_Array.Array_drain(second_))
@@ -292,9 +292,10 @@ return ff_core_List.List_takeFirst(ff_core_List.List_dropFirst(self_, from_), (u
 
 export function List_foldLeft(self_, initial_, body_) {
 let result_ = initial_;
-ff_core_List.List_each(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = body_(result_, x_)
-}));
+};
 return result_
 }
 
@@ -335,17 +336,18 @@ export function List_chunk(self_, chunkSize_) {
 const results_ = ff_core_Array.new_();
 const result_ = ff_core_Array.new_();
 let added_ = 0;
-ff_core_List.List_each(self_, ((item_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const item_ = for_a[for_i];
 if((added_ < chunkSize_)) {
 added_ += 1
 } else {
-ff_core_Array.Array_push(results_, ff_core_Array.Array_drain(result_));
+results_.array.push(ff_core_Array.Array_drain(result_));
 added_ = 1
 };
-ff_core_Array.Array_push(result_, item_)
-}));
+result_.array.push(item_)
+};
 if((added_ !== 0)) {
-ff_core_Array.Array_push(results_, ff_core_Array.Array_drain(result_))
+results_.array.push(ff_core_Array.Array_drain(result_))
 };
 return ff_core_Array.Array_drain(results_)
 }
@@ -387,57 +389,64 @@ for(const value of self_) if(!body_(value)) break
 
 export function List_all(self_, body_) {
 let result_ = true;
-ff_core_List.List_eachWhile(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = (result_ && body_(x_));
-return result_
-}));
+if(!result_) break
+};
 return result_
 }
 
 export function List_any(self_, body_) {
 let result_ = false;
-ff_core_List.List_eachWhile(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = (result_ || body_(x_));
-return (!result_)
-}));
+if(!(!result_)) break
+};
 return result_
 }
 
 export function List_indexWhere(self_, body_) {
 let result_ = ff_core_Option.None();
 let i_ = 0;
-ff_core_List.List_eachWhile(self_, ((x_) => {
-if(body_(x_)) {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!(body_(x_)
+? (function() {
 result_ = ff_core_Option.Some(i_);
 return false
-} else {
+})()
+: (function() {
 i_ += 1;
 return true
-}
-}));
+})())) break
+};
 return result_
 }
 
 export function List_find(self_, body_) {
 let result_ = ff_core_Option.None();
-ff_core_List.List_eachWhile(self_, ((x_) => {
-if(body_(x_)) {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!(body_(x_)
+? (function() {
 result_ = ff_core_Option.Some(x_);
 return false
-} else {
-return true
-}
-}));
+})()
+: true)) break
+};
 return result_
 }
 
 export function List_filter(self_, body_) {
 const result_ = ff_core_Array.new_();
-ff_core_List.List_each(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 if(body_(x_)) {
-ff_core_Array.Array_push(result_, x_)
+result_.array.push(x_)
 }
-}));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
@@ -455,27 +464,29 @@ export function List_map(self_, body_) {
 
 export function List_flatMap(self_, body_) {
 const results_ = ff_core_Array.new_();
-ff_core_List.List_each(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 ff_core_Array.Array_pushList(results_, body_(x_))
-}));
+};
 return ff_core_Array.Array_drain(results_)
 }
 
 export function List_collect(self_, body_) {
 let result_ = ff_core_Array.new_();
-ff_core_List.List_each(self_, ((x_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 ff_core_Option.Option_each(body_(x_), ((_w1) => {
-ff_core_Array.Array_push(result_, _w1)
+result_.array.push(_w1)
 }))
-}));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
 export function List_collectFirst(self_, body_) {
 let result_ = ff_core_Option.None();
-ff_core_List.List_eachWhile(self_, ((x_) => {
-{
-const _1 = body_(x_);
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!(((_1) => {
 if(_1.None) {
 return true
 }
@@ -484,8 +495,8 @@ const o_ = _1;
 result_ = o_;
 return false
 }
-}
-}));
+}))(body_(x_))) break
+};
 return result_
 }
 
@@ -516,7 +527,7 @@ const x_ = _1.second_;
 if((i_ !== 0)) {
 ff_core_Array.Array_pushList(array_, separator_)
 };
-ff_core_Array.Array_push(array_, x_)
+array_.array.push(x_)
 return
 }
 }));
@@ -599,7 +610,7 @@ export async function List_takeWhile$(self_, body_, $task) {
 const result_ = ff_core_Array.new_();
 let i_ = 0;
 while(((i_ < ff_core_List.List_size(self_)) && (await body_((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)), $task)))) {
-ff_core_Array.Array_push(result_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+result_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Array.Array_drain(result_)
@@ -612,7 +623,7 @@ while(((i_ < ff_core_List.List_size(self_)) && (await body_((self_[i_] ?? ff_cor
 i_ += 1
 };
 while((i_ < ff_core_List.List_size(self_))) {
-ff_core_Array.Array_push(result_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+result_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Array.Array_drain(result_)
@@ -623,11 +634,11 @@ const first_ = ff_core_Array.new_();
 const second_ = ff_core_Array.new_();
 let i_ = 0;
 while(((i_ < ff_core_List.List_size(self_)) && (await body_((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)), $task)))) {
-ff_core_Array.Array_push(first_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+first_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 while((i_ < ff_core_List.List_size(self_))) {
-ff_core_Array.Array_push(second_, (self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
+second_.array.push((self_[i_] ?? ff_core_List.internalGrab_(self_, i_)));
 i_ += 1
 };
 return ff_core_Pair.Pair(ff_core_Array.Array_drain(first_), ff_core_Array.Array_drain(second_))
@@ -648,9 +659,10 @@ return ff_core_List.List_takeFirst(ff_core_List.List_dropFirst(self_, from_), (u
 
 export async function List_foldLeft$(self_, initial_, body_, $task) {
 let result_ = initial_;
-(await ff_core_List.List_each$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = (await body_(result_, x_, $task))
-}), $task));
+};
 return result_
 }
 
@@ -691,17 +703,18 @@ export async function List_chunk$(self_, chunkSize_, $task) {
 const results_ = ff_core_Array.new_();
 const result_ = ff_core_Array.new_();
 let added_ = 0;
-ff_core_List.List_each(self_, ((item_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const item_ = for_a[for_i];
 if((added_ < chunkSize_)) {
 added_ += 1
 } else {
-ff_core_Array.Array_push(results_, ff_core_Array.Array_drain(result_));
+results_.array.push(ff_core_Array.Array_drain(result_));
 added_ = 1
 };
-ff_core_Array.Array_push(result_, item_)
-}));
+result_.array.push(item_)
+};
 if((added_ !== 0)) {
-ff_core_Array.Array_push(results_, ff_core_Array.Array_drain(result_))
+results_.array.push(ff_core_Array.Array_drain(result_))
 };
 return ff_core_Array.Array_drain(results_)
 }
@@ -745,57 +758,64 @@ for(const value of self_) if(!await body_(value, $task)) break
 
 export async function List_all$(self_, body_, $task) {
 let result_ = true;
-(await ff_core_List.List_eachWhile$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = (result_ && (await body_(x_, $task)));
-return result_
-}), $task));
+if(!result_) break
+};
 return result_
 }
 
 export async function List_any$(self_, body_, $task) {
 let result_ = false;
-(await ff_core_List.List_eachWhile$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 result_ = (result_ || (await body_(x_, $task)));
-return (!result_)
-}), $task));
+if(!(!result_)) break
+};
 return result_
 }
 
 export async function List_indexWhere$(self_, body_, $task) {
 let result_ = ff_core_Option.None();
 let i_ = 0;
-(await ff_core_List.List_eachWhile$(self_, (async (x_, $task) => {
-if((await body_(x_, $task))) {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!((await body_(x_, $task))
+? (await (async function() {
 result_ = ff_core_Option.Some(i_);
 return false
-} else {
+})())
+: (await (async function() {
 i_ += 1;
 return true
-}
-}), $task));
+})()))) break
+};
 return result_
 }
 
 export async function List_find$(self_, body_, $task) {
 let result_ = ff_core_Option.None();
-(await ff_core_List.List_eachWhile$(self_, (async (x_, $task) => {
-if((await body_(x_, $task))) {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!((await body_(x_, $task))
+? (await (async function() {
 result_ = ff_core_Option.Some(x_);
 return false
-} else {
-return true
-}
-}), $task));
+})())
+: true)) break
+};
 return result_
 }
 
 export async function List_filter$(self_, body_, $task) {
 const result_ = ff_core_Array.new_();
-(await ff_core_List.List_each$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 if((await body_(x_, $task))) {
-ff_core_Array.Array_push(result_, x_)
+result_.array.push(x_)
 }
-}), $task));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
@@ -817,27 +837,29 @@ export async function List_map$(self_, body_, $task) {
 
 export async function List_flatMap$(self_, body_, $task) {
 const results_ = ff_core_Array.new_();
-(await ff_core_List.List_each$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 ff_core_Array.Array_pushList(results_, (await body_(x_, $task)))
-}), $task));
+};
 return ff_core_Array.Array_drain(results_)
 }
 
 export async function List_collect$(self_, body_, $task) {
 let result_ = ff_core_Array.new_();
-(await ff_core_List.List_each$(self_, (async (x_, $task) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 ff_core_Option.Option_each((await body_(x_, $task)), ((_w1) => {
-ff_core_Array.Array_push(result_, _w1)
+result_.array.push(_w1)
 }))
-}), $task));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
 export async function List_collectFirst$(self_, body_, $task) {
 let result_ = ff_core_Option.None();
-(await ff_core_List.List_eachWhile$(self_, (async (x_, $task) => {
-{
-const _1 = (await body_(x_, $task));
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
+if(!(((_1) => {
 if(_1.None) {
 return true
 }
@@ -846,8 +868,8 @@ const o_ = _1;
 result_ = o_;
 return false
 }
-}
-}), $task));
+}))((await body_(x_, $task)))) break
+};
 return result_
 }
 
@@ -878,7 +900,7 @@ const x_ = _1.second_;
 if((i_ !== 0)) {
 ff_core_Array.Array_pushList(array_, separator_)
 };
-ff_core_Array.Array_push(array_, x_)
+array_.array.push(x_)
 return
 }
 }));
@@ -943,17 +965,19 @@ return false
 
 export function List_flatten(self_) {
 const result_ = ff_core_Array.new_();
-ff_core_List.List_each(self_, ((xs_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const xs_ = for_a[for_i];
 ff_core_Array.Array_pushList(result_, xs_)
-}));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
 export async function List_flatten$(self_, $task) {
 const result_ = ff_core_Array.new_();
-ff_core_List.List_each(self_, ((xs_) => {
+for(let for_i = 0, for_a = self_, for_l = for_a.length; for_i < for_l; for_i++) {
+const xs_ = for_a[for_i];
 ff_core_Array.Array_pushList(result_, xs_)
-}));
+};
 return ff_core_Array.Array_drain(result_)
 }
 
@@ -1016,8 +1040,8 @@ ff_core_List.List_each(self_, ((_1) => {
 {
 const x_ = _1.first_;
 const y_ = _1.second_;
-ff_core_Array.Array_push(first_, x_);
-ff_core_Array.Array_push(second_, y_)
+first_.array.push(x_);
+second_.array.push(y_)
 return
 }
 }));
@@ -1031,8 +1055,8 @@ ff_core_List.List_each(self_, ((_1) => {
 {
 const x_ = _1.first_;
 const y_ = _1.second_;
-ff_core_Array.Array_push(first_, x_);
-ff_core_Array.Array_push(second_, y_)
+first_.array.push(x_);
+second_.array.push(y_)
 return
 }
 }));
@@ -1050,26 +1074,28 @@ throw new Error('Function List_join is missing on this target in async context.'
 export function ff_core_Show_Show$ff_core_List_List(ff_core_Show_Show$T) { return {
 show_(value_) {
 const array_ = ff_core_Array.new_();
-ff_core_Array.Array_push(array_, "[");
-ff_core_List.List_each(value_, ((x_) => {
+array_.array.push("[");
+for(let for_i = 0, for_a = value_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 if((ff_core_Array.Array_size(array_) > 1)) {
-ff_core_Array.Array_push(array_, ", ")
+array_.array.push(", ")
 };
-ff_core_Array.Array_push(array_, ff_core_Show_Show$T.show_(x_))
-}));
-ff_core_Array.Array_push(array_, "]");
+array_.array.push(ff_core_Show_Show$T.show_(x_))
+};
+array_.array.push("]");
 return ff_core_Array.Array_join(array_, "")
 },
 async show_$(value_, $task) {
 const array_ = ff_core_Array.new_();
-ff_core_Array.Array_push(array_, "[");
-ff_core_List.List_each(value_, ((x_) => {
+array_.array.push("[");
+for(let for_i = 0, for_a = value_, for_l = for_a.length; for_i < for_l; for_i++) {
+const x_ = for_a[for_i];
 if((ff_core_Array.Array_size(array_) > 1)) {
-ff_core_Array.Array_push(array_, ", ")
+array_.array.push(", ")
 };
-ff_core_Array.Array_push(array_, ff_core_Show_Show$T.show_(x_))
-}));
-ff_core_Array.Array_push(array_, "]");
+array_.array.push(ff_core_Show_Show$T.show_(x_))
+};
+array_.array.push("]");
 return ff_core_Array.Array_join(array_, "")
 }
 }}

package/output/js/ff/core/Map.mjs

@@ -149,9 +149,10 @@ return result_
 
 export function Map_removeList(self_, keys_, ff_core_Ordering_Order$K) {
 let result_ = self_;
-ff_core_List.List_each(keys_, ((k_) => {
+for(let for_i = 0, for_a = keys_, for_l = for_a.length; for_i < for_l; for_i++) {
+const k_ = for_a[for_i];
 result_ = ff_core_RbMap.delete_(k_, result_, ff_core_Ordering_Order$K)
-}));
+};
 return result_
 }
 
@@ -267,9 +268,10 @@ return result_
 
 export async function Map_removeList$(self_, keys_, ff_core_Ordering_Order$K, $task) {
 let result_ = self_;
-ff_core_List.List_each(keys_, ((k_) => {
+for(let for_i = 0, for_a = keys_, for_l = for_a.length; for_i < for_l; for_i++) {
+const k_ = for_a[for_i];
 result_ = ff_core_RbMap.delete_(k_, result_, ff_core_Ordering_Order$K)
-}));
+};
 return result_
 }
 
@@ -366,7 +368,7 @@ return ff_core_Map.Map_add(self_, key_, ff_core_List.List_toArray([value_]), ff_
 }
 if(_1.Some) {
 const array_ = _1.value_;
-ff_core_Array.Array_push(array_, value_);
+array_.array.push(value_);
 return self_
 }
 }
@@ -380,7 +382,7 @@ return ff_core_Map.Map_add(self_, key_, ff_core_List.List_toArray([value_]), ff_
 }
 if(_1.Some) {
 const array_ = _1.value_;
-ff_core_Array.Array_push(array_, value_);
+array_.array.push(value_);
 return self_
 }
 }

package/output/js/ff/core/Random.mjs

@@ -190,9 +190,10 @@ return (ff_core_Random.Random_nextInt(self_, 0, 2) === 0)
 }
 
 export function Random_nextBytes(self_, buffer_, start_, stop_) {
-ff_core_List.List_each(ff_core_Int.Int_until(start_, stop_), ((i_) => {
+for(let for_i = start_, for_e = stop_; for_i < for_e; for_i++) {
+const i_ = for_i;
 ff_core_Buffer.Buffer_setUint8(buffer_, i_, ff_core_Random.Random_nextInt(self_, 0, 256))
-}))
+}
 }
 
 export function Random_nextGauss(self_, mean_, standardDeviation_) {
@@ -216,12 +217,13 @@ export function Random_nextGauss(self_, mean_, standardDeviation_) {
 }
 
 export function Random_shuffleArray(self_, array_) {
-ff_core_List.List_each(ff_core_Int.Int_until(0, (ff_core_Array.Array_size(array_) - 1)), ((i_) => {
+for(let for_i = 0, for_e = (ff_core_Array.Array_size(array_) - 1); for_i < for_e; for_i++) {
+const i_ = for_i;
 const j_ = (ff_core_Random.Random_nextInt(self_, 0, (ff_core_Array.Array_size(array_) - i_)) + i_);
 const value_ = (array_.array[i_] ?? ff_core_Array.internalGrab_(array_, i_));
 ff_core_Array.Array_set(array_, i_, (array_.array[j_] ?? ff_core_Array.internalGrab_(array_, j_)));
 ff_core_Array.Array_set(array_, j_, value_)
-}))
+}
 }
 
 export function Random_shuffleList(self_, list_) {
@@ -231,9 +233,10 @@ return ff_core_Array.Array_drain(array_)
 }
 
 export function Random_sampleArray(self_, count_, array_, body_) {
-ff_core_List.List_each(ff_core_List.List_takeFirst(ff_core_Random.Random_shuffleList(self_, ff_core_Array.Array_toList(array_, 0, 9007199254740991)), count_), ((_w1) => {
+for(let for_i = 0, for_a = ff_core_Random.Random_shuffleList(self_, ff_core_Array.Array_toList(array_, 0, 9007199254740991)), for_l = Math.min(Math.max(count_, 0), for_a.length); for_i < for_l; for_i++) {
+const _w1 = for_a[for_i];
 body_(_w1)
-}))
+}
 }
 
 export function Random_sampleList(self_, count_, list_) {
@@ -265,9 +268,10 @@ return (ff_core_Random.Random_nextInt(self_, 0, 2) === 0)
 }
 
 export async function Random_nextBytes$(self_, buffer_, start_, stop_, $task) {
-ff_core_List.List_each(ff_core_Int.Int_until(start_, stop_), ((i_) => {
+for(let for_i = start_, for_e = stop_; for_i < for_e; for_i++) {
+const i_ = for_i;
 ff_core_Buffer.Buffer_setUint8(buffer_, i_, ff_core_Random.Random_nextInt(self_, 0, 256))
-}))
+}
 }
 
 export async function Random_nextGauss$(self_, mean_, standardDeviation_, $task) {
@@ -275,12 +279,13 @@ throw new Error('Function Random_nextGauss is missing on this target in async co
 }
 
 export async function Random_shuffleArray$(self_, array_, $task) {
-ff_core_List.List_each(ff_core_Int.Int_until(0, (ff_core_Array.Array_size(array_) - 1)), ((i_) => {
+for(let for_i = 0, for_e = (ff_core_Array.Array_size(array_) - 1); for_i < for_e; for_i++) {
+const i_ = for_i;
 const j_ = (ff_core_Random.Random_nextInt(self_, 0, (ff_core_Array.Array_size(array_) - i_)) + i_);
 const value_ = (array_.array[i_] ?? ff_core_Array.internalGrab_(array_, i_));
 ff_core_Array.Array_set(array_, i_, (array_.array[j_] ?? ff_core_Array.internalGrab_(array_, j_)));
 ff_core_Array.Array_set(array_, j_, value_)
-}))
+}
 }
 
 export async function Random_shuffleList$(self_, list_, $task) {
@@ -290,9 +295,10 @@ return ff_core_Array.Array_drain(array_)
 }
 
 export async function Random_sampleArray$(self_, count_, array_, body_, $task) {
-(await ff_core_List.List_each$(ff_core_List.List_takeFirst(ff_core_Random.Random_shuffleList(self_, ff_core_Array.Array_toList(array_, 0, 9007199254740991)), count_), (async (_w1, $task) => {
+for(let for_i = 0, for_a = ff_core_Random.Random_shuffleList(self_, ff_core_Array.Array_toList(array_, 0, 9007199254740991)), for_l = Math.min(Math.max(count_, 0), for_a.length); for_i < for_l; for_i++) {
+const _w1 = for_a[for_i];
 (await body_(_w1, $task))
-}), $task))
+}
 }
 
 export async function Random_sampleList$(self_, count_, list_, $task) {

package/output/js/ff/core/RbMap.mjs

@@ -1010,7 +1010,7 @@ return ((ff_core_RbMap.RB_size(l_, ff_core_Ordering_Order$K) + 1) + ff_core_RbMa
 export function RB_pairs(self_, ff_core_Ordering_Order$K) {
 const result_ = ff_core_List.List_toArray([]);
 ff_core_RbMap.RB_each(self_, ((k_, v_) => {
-ff_core_Array.Array_push(result_, ff_core_Pair.Pair(k_, v_))
+result_.array.push(ff_core_Pair.Pair(k_, v_))
 }), ff_core_Ordering_Order$K);
 return ff_core_Array.Array_drain(result_)
 }
@@ -1203,7 +1203,7 @@ return ((ff_core_RbMap.RB_size(l_, ff_core_Ordering_Order$K) + 1) + ff_core_RbMa
 export async function RB_pairs$(self_, ff_core_Ordering_Order$K, $task) {
 const result_ = ff_core_List.List_toArray([]);
 ff_core_RbMap.RB_each(self_, ((k_, v_) => {
-ff_core_Array.Array_push(result_, ff_core_Pair.Pair(k_, v_))
+result_.array.push(ff_core_Pair.Pair(k_, v_))
 }), ff_core_Ordering_Order$K);
 return ff_core_Array.Array_drain(result_)
 }

package/output/js/ff/core/Serializable.mjs

@@ -251,9 +251,10 @@ serialization_.offset_ += (1 + 4)
 } else {
 ff_core_Core.panic_("Can't serialize arrays where size() >= 1073741824")
 };
-ff_core_List.List_each(value_, ((_w1) => {
+for(let for_i = 0, for_a = value_, for_l = for_a.length; for_i < for_l; for_i++) {
+const _w1 = for_a[for_i];
 ff_core_Serializable_Serializable$T.serializeUsing_(serialization_, _w1)
-}))
+}
 },
 deserializeUsing_(serialization_) {
 const smallSize_ = ff_core_Buffer.Buffer_grabUint8(serialization_.buffer_, serialization_.offset_);
@@ -293,9 +294,10 @@ serialization_.offset_ += (1 + 4)
 } else {
 ff_core_Core.panic_("Can't serialize arrays where size() >= 1073741824")
 };
-ff_core_List.List_each(value_, ((_w1) => {
+for(let for_i = 0, for_a = value_, for_l = for_a.length; for_i < for_l; for_i++) {
+const _w1 = for_a[for_i];
 ff_core_Serializable_Serializable$T.serializeUsing_(serialization_, _w1)
-}))
+}
 },
 async deserializeUsing_$(serialization_, $task) {
 const smallSize_ = ff_core_Buffer.Buffer_grabUint8(serialization_.buffer_, serialization_.offset_);