firefly-compiler 0.4.4 → 0.4.6

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

@@ -1,118 +1,122 @@
-
-
-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_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_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_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_Stack from "../../ff/core/Stack.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 Channel
-
-
-// type ChannelAction
-
-
-
-
-export function readOr_(channel_, body_) {
-throw new Error('Function readOr is missing on this target in sync context.');
-}
-
-export function writeOr_(channel_, message_, body_) {
-throw new Error('Function writeOr is missing on this target in sync context.');
-}
-
-export function internalRunChannelAction_(action_, mode_) {
-throw new Error('Function internalRunChannelAction is missing on this target in sync context.');
-}
-
-export async function readOr_$(channel_, body_, $task) {
-return {channel: channel_, body: body_, previous: null}
-}
-
-export async function writeOr_$(channel_, message_, body_, $task) {
-return {channel: channel_, body: body_, message: message_, previous: null}
-}
-
-export async function internalRunChannelAction_$(action_, mode_, $task) {
+
+
+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_Box from "../../ff/core/Box.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_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_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_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_Stack from "../../ff/core/Stack.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 Channel
+
+
+// type ChannelAction
+
+
+
+
+export function readOr_(channel_, body_) {
+throw new Error('Function readOr is missing on this target in sync context.');
+}
+
+export function writeOr_(channel_, message_, body_) {
+throw new Error('Function writeOr is missing on this target in sync context.');
+}
+
+export function internalRunChannelAction_(action_, mode_) {
+throw new Error('Function internalRunChannelAction is missing on this target in sync context.');
+}
+
+export async function readOr_$(channel_, body_, $task) {
+return {channel: channel_, body: body_, previous: null}
+}
+
+export async function writeOr_$(channel_, message_, body_, $task) {
+return {channel: channel_, body: body_, message: message_, previous: null}
+}
+
+export async function internalRunChannelAction_$(action_, mode_, $task) {
 
         ff_core_Task.Task_throwIfAborted($task)
 
@@ -196,73 +200,73 @@ export async function internalRunChannelAction_$(action_, mode_, $task) {
             $task.controller.signal.removeEventListener('abort', abort)
             if($task.controller.signal.aborted) $task.controller = new AbortController()
         }
-    
-}
-
-export function Channel_read(self_) {
-return ff_core_Channel.ChannelAction_wait(ff_core_Channel.readOr_(self_, ((_w1) => {
-return _w1
-})))
-}
-
-export function Channel_write(self_, message_) {
-ff_core_Channel.ChannelAction_wait(ff_core_Channel.writeOr_(self_, message_, (() => {
-
-})))
-}
-
-export async function Channel_read$(self_, $task) {
-return (await ff_core_Channel.ChannelAction_wait$((await ff_core_Channel.readOr_$(self_, (async (_w1, $task) => {
-return _w1
-}), $task)), $task))
-}
-
-export async function Channel_write$(self_, message_, $task) {
-(await ff_core_Channel.ChannelAction_wait$((await ff_core_Channel.writeOr_$(self_, message_, (async ($task) => {
-
-}), $task)), $task))
-}
-
-export function ChannelAction_readOr(self_, channel_, body_) {
-throw new Error('Function ChannelAction_readOr is missing on this target in sync context.');
-}
-
-export function ChannelAction_writeOr(self_, channel_, message_, body_) {
-throw new Error('Function ChannelAction_writeOr is missing on this target in sync context.');
-}
-
-export function ChannelAction_wait(self_) {
-return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.None())
-}
-
-export function ChannelAction_timeout(self_, duration_, body_) {
-return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.Some(duration_))))
-}
-
-export function ChannelAction_immediately(self_, body_) {
-return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.None())))
-}
-
-export async function ChannelAction_readOr$(self_, channel_, body_, $task) {
-return {channel: channel_, body: body_, previous: self_}
-}
-
-export async function ChannelAction_writeOr$(self_, channel_, message_, body_, $task) {
-return {channel: channel_, body: body_, message: message_, previous: self_}
-}
-
-export async function ChannelAction_wait$(self_, $task) {
-return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.None(), $task))
-}
-
-export async function ChannelAction_timeout$(self_, duration_, body_, $task) {
-return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.Some(duration_))), $task))
-}
-
-export async function ChannelAction_immediately$(self_, body_, $task) {
-return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.None())), $task))
-}
-
-
-
-
+    
+}
+
+export function Channel_read(self_) {
+return ff_core_Channel.ChannelAction_wait(ff_core_Channel.readOr_(self_, ((_w1) => {
+return _w1
+})))
+}
+
+export function Channel_write(self_, message_) {
+ff_core_Channel.ChannelAction_wait(ff_core_Channel.writeOr_(self_, message_, (() => {
+
+})))
+}
+
+export async function Channel_read$(self_, $task) {
+return (await ff_core_Channel.ChannelAction_wait$((await ff_core_Channel.readOr_$(self_, (async (_w1, $task) => {
+return _w1
+}), $task)), $task))
+}
+
+export async function Channel_write$(self_, message_, $task) {
+(await ff_core_Channel.ChannelAction_wait$((await ff_core_Channel.writeOr_$(self_, message_, (async ($task) => {
+
+}), $task)), $task))
+}
+
+export function ChannelAction_readOr(self_, channel_, body_) {
+throw new Error('Function ChannelAction_readOr is missing on this target in sync context.');
+}
+
+export function ChannelAction_writeOr(self_, channel_, message_, body_) {
+throw new Error('Function ChannelAction_writeOr is missing on this target in sync context.');
+}
+
+export function ChannelAction_wait(self_) {
+return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.None())
+}
+
+export function ChannelAction_timeout(self_, duration_, body_) {
+return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.Some(duration_))))
+}
+
+export function ChannelAction_immediately(self_, body_) {
+return ff_core_Channel.internalRunChannelAction_(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.None())))
+}
+
+export async function ChannelAction_readOr$(self_, channel_, body_, $task) {
+return {channel: channel_, body: body_, previous: self_}
+}
+
+export async function ChannelAction_writeOr$(self_, channel_, message_, body_, $task) {
+return {channel: channel_, body: body_, message: message_, previous: self_}
+}
+
+export async function ChannelAction_wait$(self_, $task) {
+return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.None(), $task))
+}
+
+export async function ChannelAction_timeout$(self_, duration_, body_, $task) {
+return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.Some(duration_))), $task))
+}
+
+export async function ChannelAction_immediately$(self_, body_, $task) {
+return (await ff_core_Channel.internalRunChannelAction_$(self_, ff_core_Option.Some(ff_core_Pair.Pair(body_, ff_core_Option.None())), $task))
+}
+
+
+
+