firefly-compiler 0.4.40 → 0.4.46

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

@@ -96,71 +96,71 @@ import * as ff_core_Unit from "../../ff/core/Unit.mjs"
 
 
 export function read_(json_) {
-
-        try {
-            return ff_core_Option.Some(JSON.parse(json_));
-        } catch(e) {
-            return ff_core_Option.None();
-        }
+
+        try {
+            return ff_core_Option.Some(JSON.parse(json_));
+        } catch(e) {
+            return ff_core_Option.None();
+        }
     
 }
 
 export function string_(json_) {
-
-        return json_;
+
+        return json_;
     
 }
 
 export function int_(json_) {
-
-        return json_;
+
+        return json_;
     
 }
 
 export function float_(json_) {
-
-        return json_;
+
+        return json_;
     
 }
 
 export function bool_(json_) {
-
-        return json_;
+
+        return json_;
     
 }
 
 export function null_() {
-
-        return null;
+
+        return null;
     
 }
 
 export function array_(json_) {
-
-        return json_;
+
+        return json_;
     
 }
 
 export function object_() {
-
-        return {};
+
+        return {};
     
 }
 
 export function fields_(body_) {
-
-        const result = {};
-        body_((k, v) => {result[k] = v});
-        return result;
+
+        const result = {};
+        body_((k, v) => {result[k] = v});
+        return result;
     
 }
 
 export function internalWith_(self_, field_, value_) {
-
-        if(typeof self_ !== 'object' || self_ === null || Array.isArray(self_)) {
-            throw new Error('Not an object: ' + JSON.stringify(self_));
-        }
-        return {...self_, [field_]: value_};
+
+        if(typeof self_ !== 'object' || self_ === null || Array.isArray(self_)) {
+            throw new Error('Not an object: ' + JSON.stringify(self_));
+        }
+        return {...self_, [field_]: value_};
     
 }
 
@@ -173,69 +173,69 @@ for(const [key, value] of Object.entries(self_)) if(!body_(key, value)) break
 }
 
 export function internalEquals_(a_, b_) {
-
-        if(a_ === b_) {
-            return true;
-        } else if(Array.isArray(a_) || Array.isArray(b_)) {
-            if(!Array.isArray(a_) || !Array.isArray(b_)) return false;
-            if(a_.length !== b_.length) return false;
-            for(let i = 0; i < a_.length; i++) {
-                if(!internalEquals_(a_[i], b_[i])) return false;
-            }
-            return true;
-        } else if(typeof a_ === 'object' && typeof b_ === 'object' && a_ !== null && b_ !== null) {
-            const aKeys = Object.keys(a_);
-            const bKeys = Object.keys(b_);
-            if(aKeys.length !== bKeys.length) return false;
-            for(const key of aKeys) {
-                if(!Object.hasOwn(b_, key) || !internalEquals_(a_[key], b_[key])) return false;
-            }
-            return true;
-        } else {
-            return false;
-        }
+
+        if(a_ === b_) {
+            return true;
+        } else if(Array.isArray(a_) || Array.isArray(b_)) {
+            if(!Array.isArray(a_) || !Array.isArray(b_)) return false;
+            if(a_.length !== b_.length) return false;
+            for(let i = 0; i < a_.length; i++) {
+                if(!internalEquals_(a_[i], b_[i])) return false;
+            }
+            return true;
+        } else if(typeof a_ === 'object' && typeof b_ === 'object' && a_ !== null && b_ !== null) {
+            const aKeys = Object.keys(a_);
+            const bKeys = Object.keys(b_);
+            if(aKeys.length !== bKeys.length) return false;
+            for(const key of aKeys) {
+                if(!Object.hasOwn(b_, key) || !internalEquals_(a_[key], b_[key])) return false;
+            }
+            return true;
+        } else {
+            return false;
+        }
     
 }
 
 export function internalCompare_(a_, b_) {
-
-        if(a_ === b_) {
-            return 0;
-        } else if (a_ === null || b_ === null) {
-            return a_ === null ? -1 : 1;
-        } else if (typeof a_ === 'boolean' || typeof b_ === 'boolean') {
-            if(typeof b_ !== 'boolean') return -1;
-            if(typeof a_ !== 'boolean') return 1;
-            return a_ < b_ ? -1 : 1;
-        } else if (typeof a_ === 'number' || typeof b_ === 'number') {
-            if(typeof b_ !== 'number') return -1;
-            if(typeof a_ !== 'number') return 1;
-            if(isNaN(a_)) return isNaN(b_) ? 0 : -1;
-            if(isNaN(b_)) return 1;
-            return a_ < b_ ? -1 : 1;
-        } else if (typeof a_ === 'string' || typeof b_ === 'string') {
-            if(typeof b_ !== 'string') return -1;
-            if(typeof a_ !== 'string') return 1;
-            return a_.localeCompare(b_, 'en');
-        } else if(Array.isArray(a_) || Array.isArray(b_)) {
-            if(!Array.isArray(a_) || !Array.isArray(b_)) return a_ < b_ ? -1 : 1;
-            const length = Math.min(a_.length, b_.length);
-            for(let i = 0; i < length; i++) {
-                const cmp = internalCompare_(a_[i], b_[i]);
-                if(cmp !== 0) return cmp;
-            }
-            return a_.length - b_.length;
-        } else {
-            const aKeys = Object.keys(a_).sort();
-            const bKeys = Object.keys(b_).sort();
-            const keyResult = internalCompare_(aKeys, bKeys);
-            if(keyResult !== 0) return keyResult;
-            for(const key of aKeys) {
-                const result = internalCompare_(a_[key], b_[key]);
-                if(result !== 0) return result;
-            }
-            return 0;
-        }
+
+        if(a_ === b_) {
+            return 0;
+        } else if (a_ === null || b_ === null) {
+            return a_ === null ? -1 : 1;
+        } else if (typeof a_ === 'boolean' || typeof b_ === 'boolean') {
+            if(typeof b_ !== 'boolean') return -1;
+            if(typeof a_ !== 'boolean') return 1;
+            return a_ < b_ ? -1 : 1;
+        } else if (typeof a_ === 'number' || typeof b_ === 'number') {
+            if(typeof b_ !== 'number') return -1;
+            if(typeof a_ !== 'number') return 1;
+            if(isNaN(a_)) return isNaN(b_) ? 0 : -1;
+            if(isNaN(b_)) return 1;
+            return a_ < b_ ? -1 : 1;
+        } else if (typeof a_ === 'string' || typeof b_ === 'string') {
+            if(typeof b_ !== 'string') return -1;
+            if(typeof a_ !== 'string') return 1;
+            return a_.localeCompare(b_, 'en');
+        } else if(Array.isArray(a_) || Array.isArray(b_)) {
+            if(!Array.isArray(a_) || !Array.isArray(b_)) return a_ < b_ ? -1 : 1;
+            const length = Math.min(a_.length, b_.length);
+            for(let i = 0; i < length; i++) {
+                const cmp = internalCompare_(a_[i], b_[i]);
+                if(cmp !== 0) return cmp;
+            }
+            return a_.length - b_.length;
+        } else {
+            const aKeys = Object.keys(a_).sort();
+            const bKeys = Object.keys(b_).sort();
+            const keyResult = internalCompare_(aKeys, bKeys);
+            if(keyResult !== 0) return keyResult;
+            for(const key of aKeys) {
+                const result = internalCompare_(a_[key], b_[key]);
+                if(result !== 0) return result;
+            }
+            return 0;
+        }
     
 }
 
@@ -272,10 +272,10 @@ throw new Error('Function object is missing on this target in async context.');
 }
 
 export async function fields_$(body_, $task) {
-
-        const result = {};
-        await body_((k, v) => {result[k] = v}, $task);
-        return result;
+
+        const result = {};
+        await body_((k, v) => {result[k] = v}, $task);
+        return result;
     
 }
 
@@ -300,8 +300,8 @@ throw new Error('Function internalCompare is missing on this target in async con
 }
 
 export function Json_write(self_, indentation_ = ff_core_Option.None()) {
-
-            return JSON.stringify(self_, null, indentation_.value_);
+
+            return JSON.stringify(self_, null, indentation_.value_);
         
 }
 
@@ -310,50 +310,50 @@ return ff_core_Json.internalWith_(self_, field_, ff_core_Json_JsonLike$T.toJson_
 }
 
 export function Json_merge(self_, that_) {
-
-            if(typeof self_ !== 'object' || self_ === null || Array.isArray(self_)) {
-                throw new Error('Not an object: ' + JSON.stringify(self_));
-            }
-            if(typeof that_ !== 'object' || that_ === null || Array.isArray(that_)) {
-                throw new Error('Not an object: ' + JSON.stringify(that_));
-            }
-            return {...self_, ...that_};
+
+            if(typeof self_ !== 'object' || self_ === null || Array.isArray(self_)) {
+                throw new Error('Not an object: ' + JSON.stringify(self_));
+            }
+            if(typeof that_ !== 'object' || that_ === null || Array.isArray(that_)) {
+                throw new Error('Not an object: ' + JSON.stringify(that_));
+            }
+            return {...self_, ...that_};
         
 }
 
 export function Json_grabString(self_) {
-
-            if(typeof self_ !== 'string') throw new Error('Not a string: ' + JSON.stringify(self_));
-            return self_;
+
+            if(typeof self_ !== 'string') throw new Error('Not a string: ' + JSON.stringify(self_));
+            return self_;
         
 }
 
 export function Json_grabInt(self_) {
-
-            if(!Number.isSafeInteger(self_)) throw new Error('Not an int: ' + JSON.stringify(self_));
-            return Math.trunc(self_);
+
+            if(!Number.isSafeInteger(self_)) throw new Error('Not an int: ' + JSON.stringify(self_));
+            return Math.trunc(self_);
         
 }
 
 export function Json_grabFloat(self_) {
-
-            if(typeof self_ !== 'number') throw new Error('Not a float: ' + JSON.stringify(self_));
-            return self_;
+
+            if(typeof self_ !== 'number') throw new Error('Not a float: ' + JSON.stringify(self_));
+            return self_;
         
 }
 
 export function Json_grabBool(self_) {
-
-            if(self_ === true) return true;
-            if(self_ === false) return false;
-            throw new Error('Not a bool: ' + JSON.stringify(self_));
+
+            if(self_ === true) return true;
+            if(self_ === false) return false;
+            throw new Error('Not a bool: ' + JSON.stringify(self_));
         
 }
 
 export function Json_grabArray(self_) {
-
-            if(!Array.isArray(self_)) throw new Error('Not an array: ' + JSON.stringify(self_));
-            return self_;
+
+            if(!Array.isArray(self_)) throw new Error('Not an array: ' + JSON.stringify(self_));
+            return self_;
         
 }
 
@@ -402,83 +402,83 @@ return ff_core_Option.Some(ff_core_Json.Json_grabMap(self_))
 }
 
 export function Json_isString(self_) {
-
-            return typeof self_ === 'string';
+
+            return typeof self_ === 'string';
         
 }
 
 export function Json_isInt(self_) {
-
-            return Number.isSafeInteger(self_);
+
+            return Number.isSafeInteger(self_);
         
 }
 
 export function Json_isFloat(self_) {
-
-            return typeof self_ === 'number';
+
+            return typeof self_ === 'number';
         
 }
 
 export function Json_isBool(self_) {
-
-            return typeof self_ === 'boolean';
+
+            return typeof self_ === 'boolean';
         
 }
 
 export function Json_isArray(self_) {
-
-            return Array.isArray(self_);
+
+            return Array.isArray(self_);
         
 }
 
 export function Json_isObject(self_) {
-
-            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_);
+
+            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_);
         
 }
 
 export function Json_isNull(self_) {
-
-            return self_ === null;
+
+            return self_ === null;
         
 }
 
 export function Json_field(self_, key_) {
-
-            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_)
-                ? self_[key_] : null;
+
+            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_)
+                ? self_[key_] : null;
         
 }
 
 export function Json_index(self_, key_) {
-
-            return typeof self_ === 'array' ? self_[key] ?? null : null;
+
+            return typeof self_ === 'array' ? self_[key] ?? null : null;
         
 }
 
 export function Json_hasField(self_, key_) {
-
-            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_);
+
+            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_);
         
 }
 
 export function Json_getField(self_, key_) {
-
-            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_)
-                ? ff_core_Option.Some(self_[key_]) : ff_core_Option.None();
+
+            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_) && Object.hasOwn(self_, key_)
+                ? ff_core_Option.Some(self_[key_]) : ff_core_Option.None();
         
 }
 
 export function Json_getIndex(self_, key_) {
-
-            return typeof self_ === 'array' ? ff_core_Option.Some(self_[key_] ?? null) : ff_core_Option.None();
+
+            return typeof self_ === 'array' ? ff_core_Option.Some(self_[key_] ?? null) : ff_core_Option.None();
         
 }
 
 export function Json_getFields(self_) {
-
-            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_)
-                ? ff_core_Option.Some(Object.keys(self_)) : ff_core_Option.None();
+
+            return typeof self_ === 'object' && self_ !== null && !Array.isArray(self_)
+                ? ff_core_Option.Some(Object.keys(self_)) : ff_core_Option.None();
         
 }
 

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

@@ -96,26 +96,26 @@ import * as ff_core_Unit from "../../ff/core/Unit.mjs"
 
 
 export function new_() {
-
-        return [];
+
+        return [];
     
 }
 
 export function fill_(size_, value_) {
-
-        return new Array(size_).fill(value_);
+
+        return new Array(size_).fill(value_);
     
 }
 
 export function fillBy_(size_, body_) {
-
-        return Array.from({length: size_}, (_, i) => body_(i));
+
+        return Array.from({length: size_}, (_, i) => body_(i));
     
 }
 
 export function range_(size_) {
-
-        return Array.from({length: size_}, (_, i) => i);
+
+        return Array.from({length: size_}, (_, i) => i);
     
 }
 
@@ -124,8 +124,8 @@ return left_ === right_
 }
 
 export function internalGrab_(self_, index_) {
-
-        return index_ < 0 || index_ >= self_.length ? ff_core_Try.internalThrowGrabException_() : self_[index_];
+
+        return index_ < 0 || index_ >= self_.length ? ff_core_Try.internalThrowGrabException_() : self_[index_];
     
 }
 
@@ -138,12 +138,12 @@ throw new Error('Function fill is missing on this target in async context.');
 }
 
 export async function fillBy_$(size_, body_, $task) {
-
-        const array = new Array(size_);
-        for(let i = 0; i < size_; i++) {
-            array[i] = await(body_(_i));
-        }
-        return array;
+
+        const array = new Array(size_);
+        for(let i = 0; i < size_; i++) {
+            array[i] = await(body_(_i));
+        }
+        return array;
     
 }
 
@@ -172,16 +172,16 @@ return self_.length
 }
 
 export function List_get(self_, index_) {
-
-            return index_ >= 0 && index_ < self_.length
-                ? ff_core_Option.Some(self_[index_])
-                : ff_core_Option.None()
+
+            return index_ >= 0 && index_ < self_.length
+                ? ff_core_Option.Some(self_[index_])
+                : ff_core_Option.None()
         
 }
 
 export function List_grab(self_, index_) {
-
-            return self_[index_] ?? internalGrab_(self_, index_);
+
+            return self_[index_] ?? internalGrab_(self_, index_);
         
 }
 
@@ -245,13 +245,13 @@ return value_
 }
 
 export function List_modify(self_, index_, body_) {
-
-            if(index_ < 0 || index_ >= self_.length) {
-                ff_core_Try.internalThrowGrabException_()
-            }
-            let result = self_.slice();
-            result[index_] = body_(result[index_]);
-            return result;
+
+            if(index_ < 0 || index_ >= self_.length) {
+                ff_core_Try.internalThrowGrabException_()
+            }
+            let result = self_.slice();
+            result[index_] = body_(result[index_]);
+            return result;
         
 }
 
@@ -316,8 +316,8 @@ return {array: self_.slice()}
 }
 
 export function List_each(self_, body_) {
-
-            return self_.forEach(body_);
+
+            return self_.forEach(body_);
         
 }
 
@@ -373,8 +373,8 @@ return (!body_(_w1))
 }
 
 export function List_map(self_, body_) {
-
-            return self_.map(body_)
+
+            return self_.map(body_)
         
 }
 
@@ -528,13 +528,13 @@ return value_
 }
 
 export async function List_modify$(self_, index_, body_, $task) {
-
-            if(index_ < 0 || index_ >= self_.length) {
-                ff_core_Try.internalThrowGrabException_()
-            }
-            let result = self_.slice();
-            result[index_] = await body_(result[index_], $task);
-            return result;
+
+            if(index_ < 0 || index_ >= self_.length) {
+                ff_core_Try.internalThrowGrabException_()
+            }
+            let result = self_.slice();
+            result[index_] = await body_(result[index_], $task);
+            return result;
         
 }
 
@@ -599,10 +599,10 @@ throw new Error('Function List_toArray is missing on this target in async contex
 }
 
 export async function List_each$(self_, body_, $task) {
-
-            for(let i = 0; i < self_.length; i++) {
-                await body_(self_[i], $task)
-            }
+
+            for(let i = 0; i < self_.length; i++) {
+                await body_(self_[i], $task)
+            }
         
 }
 
@@ -658,12 +658,12 @@ return (!(await body_(_w1, $task)))
 }
 
 export async function List_map$(self_, body_, $task) {
-
-            let result = [];
-            for(let i = 0; i < self_.length; i++) {
-                result.push(await body_(self_[i], $task));
-            }
-            return result;
+
+            let result = [];
+            for(let i = 0; i < self_.length; i++) {
+                result.push(await body_(self_[i], $task));
+            }
+            return result;
         
 }