firefly-compiler 0.4.34 → 0.4.35

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

@@ -0,0 +1,190 @@
+import * as import$0 from 'node:crypto';
+
+import * as ff_core_Any from "../../ff/core/Any.mjs"
+
+import * as ff_core_Array from "../../ff/core/Array.mjs"
+
+import * as ff_core_AssetSystem from "../../ff/core/AssetSystem.mjs"
+
+import * as ff_core_Atomic from "../../ff/core/Atomic.mjs"
+
+import * as ff_core_Bool from "../../ff/core/Bool.mjs"
+
+import * as ff_core_BrowserSystem from "../../ff/core/BrowserSystem.mjs"
+
+import * as ff_core_Buffer from "../../ff/core/Buffer.mjs"
+
+import * as ff_core_BuildSystem from "../../ff/core/BuildSystem.mjs"
+
+import * as ff_core_Channel from "../../ff/core/Channel.mjs"
+
+import * as ff_core_Char from "../../ff/core/Char.mjs"
+
+import * as ff_core_Core from "../../ff/core/Core.mjs"
+
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
+import * as ff_core_Duration from "../../ff/core/Duration.mjs"
+
+import * as ff_core_Equal from "../../ff/core/Equal.mjs"
+
+import * as ff_core_Error from "../../ff/core/Error.mjs"
+
+import * as ff_core_FileHandle from "../../ff/core/FileHandle.mjs"
+
+import * as ff_core_Float from "../../ff/core/Float.mjs"
+
+import * as ff_core_HttpClient from "../../ff/core/HttpClient.mjs"
+
+import * as ff_core_Instant from "../../ff/core/Instant.mjs"
+
+import * as ff_core_Int from "../../ff/core/Int.mjs"
+
+import * as ff_core_IntMap from "../../ff/core/IntMap.mjs"
+
+import * as ff_core_JsSystem from "../../ff/core/JsSystem.mjs"
+
+import * as ff_core_JsValue from "../../ff/core/JsValue.mjs"
+
+import * as ff_core_Json from "../../ff/core/Json.mjs"
+
+import * as ff_core_List from "../../ff/core/List.mjs"
+
+import * as ff_core_Lock from "../../ff/core/Lock.mjs"
+
+import * as ff_core_Log from "../../ff/core/Log.mjs"
+
+import * as ff_core_Map from "../../ff/core/Map.mjs"
+
+import * as ff_core_NodeSystem from "../../ff/core/NodeSystem.mjs"
+
+import * as ff_core_Nothing from "../../ff/core/Nothing.mjs"
+
+import * as ff_core_Option from "../../ff/core/Option.mjs"
+
+import * as ff_core_Ordering from "../../ff/core/Ordering.mjs"
+
+import * as ff_core_Pair from "../../ff/core/Pair.mjs"
+
+import * as ff_core_Path from "../../ff/core/Path.mjs"
+
+import * as ff_core_Random from "../../ff/core/Random.mjs"
+
+import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
+
+import * as ff_core_Set from "../../ff/core/Set.mjs"
+
+import * as ff_core_Show from "../../ff/core/Show.mjs"
+
+import * as ff_core_SourceLocation from "../../ff/core/SourceLocation.mjs"
+
+import * as ff_core_Stream from "../../ff/core/Stream.mjs"
+
+import * as ff_core_String from "../../ff/core/String.mjs"
+
+import * as ff_core_StringMap from "../../ff/core/StringMap.mjs"
+
+import * as ff_core_Task from "../../ff/core/Task.mjs"
+
+import * as ff_core_Try from "../../ff/core/Try.mjs"
+
+import * as ff_core_Unit from "../../ff/core/Unit.mjs"
+
+// type Digest
+
+
+
+
+export function hmacSha256_(key_, buffer_ = ff_core_Buffer.new_(0)) {
+return ff_core_Digest.new_("sha256", ff_core_Option.Some(key_), buffer_)
+}
+
+export function sha256_(buffer_ = ff_core_Buffer.new_(0)) {
+return ff_core_Digest.new_("sha256", ff_core_Option.None(), buffer_)
+}
+
+export function new_(algorithm_, hmacKey_ = ff_core_Option.None(), buffer_ = ff_core_Buffer.new_(0)) {
+
+        const crypto = import$0
+        const digest = typeof hmacKey_.value_ !== 'undefined'
+            ? crypto.createHmac(algorithm_, hmacKey_.value_)
+            : crypto.createHash(algorithm_);
+        if(buffer_.byteLength > 0) digest.update(buffer_);
+        return digest;
+    
+}
+
+export async function hmacSha256_$(key_, buffer_ = ff_core_Buffer.new_(0), $task) {
+return ff_core_Digest.new_("sha256", ff_core_Option.Some(key_), buffer_)
+}
+
+export async function sha256_$(buffer_ = ff_core_Buffer.new_(0), $task) {
+return ff_core_Digest.new_("sha256", ff_core_Option.None(), buffer_)
+}
+
+export async function new_$(algorithm_, hmacKey_ = ff_core_Option.None(), buffer_ = ff_core_Buffer.new_(0), $task) {
+throw new Error('Function new is missing on this target in async context.');
+}
+
+export function Digest_writeText(self_, text_, encoding_ = "utf8") {
+
+            self_.update(text_, encoding_);
+        
+}
+
+export function Digest_writeBuffer(self_, buffer_) {
+
+            self_.update(buffer_);
+        
+}
+
+export function Digest_writeStream(self_, stream_) {
+ff_core_Stream.Stream_each(stream_, ((_w1) => {
+ff_core_Digest.Digest_writeBuffer(self_, _w1)
+}))
+}
+
+export function Digest_toBuffer(self_) {
+
+            const b = self_.digest();
+            return new DataView(b.buffer, b.byteOffset, b.length);
+        
+}
+
+export function Digest_toHex(self_) {
+return ff_core_Buffer.Buffer_toHex(ff_core_Digest.Digest_toBuffer(self_))
+}
+
+export function Digest_toBase64(self_) {
+return ff_core_Buffer.Buffer_toBase64(ff_core_Digest.Digest_toBuffer(self_))
+}
+
+export async function Digest_writeText$(self_, text_, encoding_ = "utf8", $task) {
+throw new Error('Function Digest_writeText is missing on this target in async context.');
+}
+
+export async function Digest_writeBuffer$(self_, buffer_, $task) {
+throw new Error('Function Digest_writeBuffer is missing on this target in async context.');
+}
+
+export async function Digest_writeStream$(self_, stream_, $task) {
+(await ff_core_Stream.Stream_each$(stream_, (async (_w1, $task) => {
+ff_core_Digest.Digest_writeBuffer(self_, _w1)
+}), $task))
+}
+
+export async function Digest_toBuffer$(self_, $task) {
+throw new Error('Function Digest_toBuffer is missing on this target in async context.');
+}
+
+export async function Digest_toHex$(self_, $task) {
+return ff_core_Buffer.Buffer_toHex(ff_core_Digest.Digest_toBuffer(self_))
+}
+
+export async function Digest_toBase64$(self_, $task) {
+return ff_core_Buffer.Buffer_toBase64(ff_core_Digest.Digest_toBuffer(self_))
+}
+
+
+
+

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -28,6 +28,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"
@@ -401,7 +403,7 @@ export async function NodeSystem_execute$(self_, command_, arguments_, standardI
                     const o = Buffer.concat(out);
                     const e = Buffer.concat(err);
                     resolve(ProcessResult(
-                        size > maxBuffer_ ? -1 : code,
+                        code,
                         new DataView(o.buffer, o.byteOffset, o.byteLength),
                         new DataView(e.buffer, e.byteOffset, e.byteLength),
                     ));

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"
@@ -199,6 +201,14 @@ export async function Pair_toMap$(self_, ff_core_Ordering_Order$A, $task) {
 return ff_core_List.List_toMap([self_], ff_core_Ordering_Order$A)
 }
 
+export function Pair_join(self_, separator_ = "") {
+return ((self_.first_ + separator_) + self_.second_)
+}
+
+export async function Pair_join$(self_, separator_ = "", $task) {
+return ((self_.first_ + separator_) + self_.second_)
+}
+
 export function ff_core_Any_HasAnyTag$ff_core_Pair_Pair(ff_core_Any_HasAnyTag$A, ff_core_Any_HasAnyTag$B) { return {
 anyTag_() {
 return ff_core_Any.internalAnyTag_(((((("ff:core/Pair.Pair" + "[") + ff_core_Any.AnyTag_show(ff_core_Any_HasAnyTag$A.anyTag_())) + ",") + ff_core_Any.AnyTag_show(ff_core_Any_HasAnyTag$B.anyTag_())) + "]"))

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

@@ -28,6 +28,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -24,6 +24,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

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

@@ -22,6 +22,8 @@ import * as ff_core_Char from "../../ff/core/Char.mjs"
 
 import * as ff_core_Core from "../../ff/core/Core.mjs"
 
+import * as ff_core_Digest from "../../ff/core/Digest.mjs"
+
 import * as ff_core_Duration from "../../ff/core/Duration.mjs"
 
 import * as ff_core_Equal from "../../ff/core/Equal.mjs"

package/package.json

@@ -4,7 +4,7 @@
   "description": "Firefly compiler",
   "author": "Firefly team",
   "license": "MIT",
-  "version": "0.4.34",
+  "version": "0.4.35",
   "repository": {
     "type": "git",
     "url": "https://github.com/Ahnfelt/firefly-boot"

package/vscode/package.json

@@ -4,7 +4,7 @@
     "description": "Firefly language support",
     "author": "Firefly team",
     "license": "MIT",
-    "version": "0.4.34",
+    "version": "0.4.35",
     "repository": {
         "type": "git",
         "url": "https://github.com/Ahnfelt/firefly-boot"