firefly-compiler 0.4.7 → 0.4.8
This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
- package/compiler/Compiler.ff +2 -0
- package/compiler/Deriver.ff +7 -0
- package/core/Array.ff +17 -4
- package/core/AssetSystem.ff +1 -1
- package/core/BrowserSystem.ff +27 -0
- package/core/List.ff +4 -0
- package/core/Lock.ff +2 -2
- package/core/Random.ff +148 -0
- package/core/SourceLocation.ff +27 -0
- package/core/Task.ff +3 -0
- package/core/WebSocket.ff +127 -0
- package/httpserver/HttpServer.ff +1 -1
- package/lux/Css.ff +648 -0
- package/lux/CssTest.ff +48 -0
- package/lux/Lux.ff +33 -18
- package/lux/Main.ff +4 -1
- package/output/js/ff/compiler/Builder.mjs +4 -0
- package/output/js/ff/compiler/Compiler.mjs +5 -1
- package/output/js/ff/compiler/Dependencies.mjs +4 -0
- package/output/js/ff/compiler/Deriver.mjs +10 -2
- package/output/js/ff/compiler/Dictionaries.mjs +6 -0
- package/output/js/ff/compiler/Environment.mjs +10 -0
- package/output/js/ff/compiler/Inference.mjs +4 -0
- package/output/js/ff/compiler/JsEmitter.mjs +14 -0
- package/output/js/ff/compiler/JsImporter.mjs +4 -0
- package/output/js/ff/compiler/LspHook.mjs +6 -0
- package/output/js/ff/compiler/Main.mjs +16 -0
- package/output/js/ff/compiler/Parser.mjs +8 -0
- package/output/js/ff/compiler/Patterns.mjs +8 -0
- package/output/js/ff/compiler/Resolver.mjs +4 -0
- package/output/js/ff/compiler/Substitution.mjs +4 -0
- package/output/js/ff/compiler/Syntax.mjs +132 -0
- package/output/js/ff/compiler/Token.mjs +56 -0
- package/output/js/ff/compiler/Tokenizer.mjs +4 -0
- package/output/js/ff/compiler/Unification.mjs +10 -0
- package/output/js/ff/compiler/Wildcards.mjs +4 -0
- package/output/js/ff/compiler/Workspace.mjs +8 -0
- package/output/js/ff/core/Any.mjs +4 -0
- package/output/js/ff/core/Array.mjs +27 -1
- package/output/js/ff/core/AssetSystem.mjs +6 -2
- package/output/js/ff/core/Atomic.mjs +4 -0
- package/output/js/ff/core/Bool.mjs +4 -0
- package/output/js/ff/core/Box.mjs +4 -0
- package/output/js/ff/core/BrowserSystem.mjs +55 -0
- package/output/js/ff/core/Buffer.mjs +4 -0
- package/output/js/ff/core/BuildSystem.mjs +4 -0
- package/output/js/ff/core/Channel.mjs +4 -0
- package/output/js/ff/core/Char.mjs +4 -0
- package/output/js/ff/core/Core.mjs +4 -0
- package/output/js/ff/core/Duration.mjs +4 -0
- package/output/js/ff/core/Equal.mjs +4 -0
- package/output/js/ff/core/Error.mjs +4 -0
- package/output/js/ff/core/FileHandle.mjs +4 -0
- package/output/js/ff/core/Float.mjs +4 -0
- package/output/js/ff/core/HttpClient.mjs +4 -0
- package/output/js/ff/core/Instant.mjs +4 -0
- package/output/js/ff/core/Int.mjs +4 -0
- package/output/js/ff/core/IntMap.mjs +4 -0
- package/output/js/ff/core/JsSystem.mjs +4 -0
- package/output/js/ff/core/JsValue.mjs +4 -0
- package/output/js/ff/core/List.mjs +12 -0
- package/output/js/ff/core/Lock.mjs +6 -2
- package/output/js/ff/core/Log.mjs +4 -0
- package/output/js/ff/core/Map.mjs +4 -0
- package/output/js/ff/core/NodeSystem.mjs +4 -0
- package/output/js/ff/core/Nothing.mjs +4 -0
- package/output/js/ff/core/Option.mjs +8 -0
- package/output/js/ff/core/Ordering.mjs +4 -0
- package/output/js/ff/core/Pair.mjs +6 -0
- package/output/js/ff/core/Path.mjs +4 -0
- package/output/js/ff/core/Random.mjs +340 -0
- package/output/js/ff/core/RbMap.mjs +4 -0
- package/output/js/ff/core/Serializable.mjs +4 -0
- package/output/js/ff/core/Set.mjs +4 -0
- package/output/js/ff/core/Show.mjs +4 -0
- package/output/js/ff/core/SourceLocation.mjs +45 -1
- package/output/js/ff/core/Stack.mjs +4 -0
- package/output/js/ff/core/Stream.mjs +4 -0
- package/output/js/ff/core/String.mjs +4 -0
- package/output/js/ff/core/StringMap.mjs +4 -0
- package/output/js/ff/core/Task.mjs +7 -1
- package/output/js/ff/core/Try.mjs +4 -0
- package/output/js/ff/core/Unit.mjs +4 -0
- package/output/js/ff/core/WebSocket.mjs +198 -0
- package/package.json +1 -1
- package/vscode/package.json +1 -1
- package/webserver/.firefly/include/package-lock.json +16 -0
- package/webserver/.firefly/include/package.json +5 -0
- package/webserver/.firefly/package.ff +2 -0
- package/webserver/WebServer.ff +608 -0
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Atomic
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Bool
|
|
92
96
|
const False$ = {False: true};
|
|
93
97
|
export function False() {
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Box
|
|
92
96
|
export function Box(value_) {
|
|
93
97
|
return {value_};
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type BrowserSystem
|
|
92
96
|
|
|
93
97
|
|
|
@@ -101,6 +105,10 @@ export function BrowserSystem_httpClient(self_) {
|
|
|
101
105
|
throw new Error('Function BrowserSystem_httpClient is missing on this target in sync context.');
|
|
102
106
|
}
|
|
103
107
|
|
|
108
|
+
export function BrowserSystem_webSocket(self_, url_) {
|
|
109
|
+
return ff_core_WebSocket.internalOpenBrowserWebSocket_(self_, url_)
|
|
110
|
+
}
|
|
111
|
+
|
|
104
112
|
export function BrowserSystem_mainTask(self_) {
|
|
105
113
|
throw new Error('Function BrowserSystem_mainTask is missing on this target in sync context.');
|
|
106
114
|
}
|
|
@@ -109,10 +117,30 @@ export function BrowserSystem_js(self_) {
|
|
|
109
117
|
throw new Error('Function BrowserSystem_js is missing on this target in sync context.');
|
|
110
118
|
}
|
|
111
119
|
|
|
120
|
+
export function BrowserSystem_url(self_) {
|
|
121
|
+
throw new Error('Function BrowserSystem_url is missing on this target in sync context.');
|
|
122
|
+
}
|
|
123
|
+
|
|
124
|
+
export function BrowserSystem_urlPath(self_) {
|
|
125
|
+
throw new Error('Function BrowserSystem_urlPath is missing on this target in sync context.');
|
|
126
|
+
}
|
|
127
|
+
|
|
128
|
+
export function BrowserSystem_urlQuery(self_, name_) {
|
|
129
|
+
throw new Error('Function BrowserSystem_urlQuery is missing on this target in sync context.');
|
|
130
|
+
}
|
|
131
|
+
|
|
132
|
+
export function BrowserSystem_urlFragment(self_) {
|
|
133
|
+
throw new Error('Function BrowserSystem_urlFragment is missing on this target in sync context.');
|
|
134
|
+
}
|
|
135
|
+
|
|
112
136
|
export async function BrowserSystem_httpClient$(self_, $task) {
|
|
113
137
|
return null
|
|
114
138
|
}
|
|
115
139
|
|
|
140
|
+
export async function BrowserSystem_webSocket$(self_, url_, $task) {
|
|
141
|
+
return (await ff_core_WebSocket.internalOpenBrowserWebSocket_$(self_, url_, $task))
|
|
142
|
+
}
|
|
143
|
+
|
|
116
144
|
export async function BrowserSystem_mainTask$(self_, $task) {
|
|
117
145
|
return self_.task_
|
|
118
146
|
}
|
|
@@ -121,6 +149,33 @@ export async function BrowserSystem_js$(self_, $task) {
|
|
|
121
149
|
return typeof globalThis !== 'undefined' ? globalThis : window
|
|
122
150
|
}
|
|
123
151
|
|
|
152
|
+
export async function BrowserSystem_url$(self_, $task) {
|
|
153
|
+
|
|
154
|
+
return location.href;
|
|
155
|
+
|
|
156
|
+
}
|
|
157
|
+
|
|
158
|
+
export async function BrowserSystem_urlPath$(self_, $task) {
|
|
159
|
+
|
|
160
|
+
return location.pathname;
|
|
161
|
+
|
|
162
|
+
}
|
|
163
|
+
|
|
164
|
+
export async function BrowserSystem_urlQuery$(self_, name_, $task) {
|
|
165
|
+
|
|
166
|
+
const param = new URLSearchParams(location.search).get(name_)
|
|
167
|
+
if(param == null) return ff_core_Option.None();
|
|
168
|
+
return ff_core_Option.Some(param);
|
|
169
|
+
|
|
170
|
+
}
|
|
171
|
+
|
|
172
|
+
export async function BrowserSystem_urlFragment$(self_, $task) {
|
|
173
|
+
|
|
174
|
+
if(!location.hash.startsWith('#')) return ff_core_Option.None();
|
|
175
|
+
return ff_core_Option.Some(location.hash.slice(1));
|
|
176
|
+
|
|
177
|
+
}
|
|
178
|
+
|
|
124
179
|
|
|
125
180
|
|
|
126
181
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Buffer
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type BuildSystem
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Channel
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// newtype Char
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type GrabException
|
|
92
96
|
const GrabException$ = {GrabException: true};
|
|
93
97
|
export function GrabException() {
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// newtype Duration
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Error
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type FileHandle
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Float
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type HttpClient
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// newtype Instant
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Int
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type IntMap
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type JsSystem
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type JsValue
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type List
|
|
92
96
|
const Empty$ = {Empty: true};
|
|
93
97
|
export function Empty() {
|
|
@@ -478,6 +482,10 @@ return
|
|
|
478
482
|
}
|
|
479
483
|
}
|
|
480
484
|
|
|
485
|
+
export function List_eachWhile(self_, body_) {
|
|
486
|
+
return ff_core_List.List_all(self_, body_)
|
|
487
|
+
}
|
|
488
|
+
|
|
481
489
|
export function List_all(self_, body_) {
|
|
482
490
|
_tailcall: for(;;) {
|
|
483
491
|
{
|
|
@@ -1344,6 +1352,10 @@ return
|
|
|
1344
1352
|
}
|
|
1345
1353
|
}
|
|
1346
1354
|
|
|
1355
|
+
export async function List_eachWhile$(self_, body_, $task) {
|
|
1356
|
+
return (await ff_core_List.List_all$(self_, body_, $task))
|
|
1357
|
+
}
|
|
1358
|
+
|
|
1347
1359
|
export async function List_all$(self_, body_, $task) {
|
|
1348
1360
|
_tailcall: for(;;) {
|
|
1349
1361
|
{
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Lock
|
|
92
96
|
|
|
93
97
|
|
|
@@ -234,7 +238,7 @@ export async function LockCondition_sleep$(self_, $task) {
|
|
|
234
238
|
}
|
|
235
239
|
const level = self_.lock.level
|
|
236
240
|
self_.lock.level = 1
|
|
237
|
-
await
|
|
241
|
+
await ff_core_Lock.Lock_release$(self_.lock)
|
|
238
242
|
try {
|
|
239
243
|
await new Promise((resolve, reject) => {
|
|
240
244
|
$task.controller.signal.addEventListener('abort', reject)
|
|
@@ -250,7 +254,7 @@ export async function LockCondition_sleep$(self_, $task) {
|
|
|
250
254
|
let acquired = false
|
|
251
255
|
while(!acquired) {
|
|
252
256
|
try {
|
|
253
|
-
await
|
|
257
|
+
await ff_core_Lock.Lock_acquire$(self_.lock)
|
|
254
258
|
self_.lock.level = level
|
|
255
259
|
acquired = true
|
|
256
260
|
} catch(e) {
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_RbMap from "../../ff/core/RbMap.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
@@ -90,6 +92,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
90
92
|
|
|
91
93
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
92
94
|
|
|
95
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
96
|
+
|
|
93
97
|
// newtype Map
|
|
94
98
|
|
|
95
99
|
|
|
@@ -70,6 +70,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
70
70
|
|
|
71
71
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
72
72
|
|
|
73
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
74
|
+
|
|
73
75
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
74
76
|
|
|
75
77
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -92,6 +94,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
92
94
|
|
|
93
95
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
94
96
|
|
|
97
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
98
|
+
|
|
95
99
|
// type NodeSystem
|
|
96
100
|
|
|
97
101
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Nothing
|
|
92
96
|
|
|
93
97
|
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Option
|
|
92
96
|
const None$ = {None: true};
|
|
93
97
|
export function None() {
|
|
@@ -918,6 +922,7 @@ const value_a = value_;
|
|
|
918
922
|
if(value_a.None) {
|
|
919
923
|
const v_ = value_a;
|
|
920
924
|
serialization_.checksum_ = ff_core_Int.Int_bitOr(((31 * serialization_.checksum_) + 19), 0);
|
|
925
|
+
ff_core_Serializable.Serialization_autoResize(serialization_, 1);
|
|
921
926
|
ff_core_Buffer.Buffer_setUint8(serialization_.buffer_, serialization_.offset_, 0);
|
|
922
927
|
serialization_.offset_ += 1
|
|
923
928
|
return
|
|
@@ -927,6 +932,7 @@ return
|
|
|
927
932
|
if(value_a.Some) {
|
|
928
933
|
const v_ = value_a;
|
|
929
934
|
serialization_.checksum_ = ff_core_Int.Int_bitOr(((31 * serialization_.checksum_) + 19), 0);
|
|
935
|
+
ff_core_Serializable.Serialization_autoResize(serialization_, 1);
|
|
930
936
|
ff_core_Buffer.Buffer_setUint8(serialization_.buffer_, serialization_.offset_, 1);
|
|
931
937
|
serialization_.offset_ += 1;
|
|
932
938
|
ff_core_Serializable_Serializable$T.serializeUsing_(serialization_, v_.value_)
|
|
@@ -968,6 +974,7 @@ const value_a = value_;
|
|
|
968
974
|
if(value_a.None) {
|
|
969
975
|
const v_ = value_a;
|
|
970
976
|
serialization_.checksum_ = ff_core_Int.Int_bitOr(((31 * serialization_.checksum_) + 19), 0);
|
|
977
|
+
ff_core_Serializable.Serialization_autoResize(serialization_, 1);
|
|
971
978
|
ff_core_Buffer.Buffer_setUint8(serialization_.buffer_, serialization_.offset_, 0);
|
|
972
979
|
serialization_.offset_ += 1
|
|
973
980
|
return
|
|
@@ -977,6 +984,7 @@ return
|
|
|
977
984
|
if(value_a.Some) {
|
|
978
985
|
const v_ = value_a;
|
|
979
986
|
serialization_.checksum_ = ff_core_Int.Int_bitOr(((31 * serialization_.checksum_) + 19), 0);
|
|
987
|
+
ff_core_Serializable.Serialization_autoResize(serialization_, 1);
|
|
980
988
|
ff_core_Buffer.Buffer_setUint8(serialization_.buffer_, serialization_.offset_, 1);
|
|
981
989
|
serialization_.offset_ += 1;
|
|
982
990
|
ff_core_Serializable_Serializable$T.serializeUsing_(serialization_, v_.value_)
|
|
@@ -66,6 +66,8 @@ import * as ff_core_Pair from "../../ff/core/Pair.mjs"
|
|
|
66
66
|
|
|
67
67
|
import * as ff_core_Path from "../../ff/core/Path.mjs"
|
|
68
68
|
|
|
69
|
+
import * as ff_core_Random from "../../ff/core/Random.mjs"
|
|
70
|
+
|
|
69
71
|
import * as ff_core_Serializable from "../../ff/core/Serializable.mjs"
|
|
70
72
|
|
|
71
73
|
import * as ff_core_Set from "../../ff/core/Set.mjs"
|
|
@@ -88,6 +90,8 @@ import * as ff_core_Try from "../../ff/core/Try.mjs"
|
|
|
88
90
|
|
|
89
91
|
import * as ff_core_Unit from "../../ff/core/Unit.mjs"
|
|
90
92
|
|
|
93
|
+
import * as ff_core_WebSocket from "../../ff/core/WebSocket.mjs"
|
|
94
|
+
|
|
91
95
|
// type Ordering
|
|
92
96
|
const OrderingBefore$ = {OrderingBefore: true};
|
|
93
97
|
export function OrderingBefore() {
|