firefly-compiler 0.5.47 → 0.5.48

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

@@ -137,6 +137,14 @@ export function Map_get(self_, key_, ff_core_Ordering_Order$K) {
 return ff_core_RbMap.RB_get(self_, key_, ff_core_Ordering_Order$K)
 }
 
+export function Map_lastBefore(self_, key_, ff_core_Ordering_Order$K) {
+return ff_core_RbMap.RB_lastBefore(self_, key_, ff_core_Ordering_Order$K)
+}
+
+export function Map_firstAfter(self_, key_, ff_core_Ordering_Order$K) {
+return ff_core_RbMap.RB_firstAfter(self_, key_, ff_core_Ordering_Order$K)
+}
+
 export function Map_remove(self_, key_, ff_core_Ordering_Order$K) {
 return ff_core_RbMap.delete_(key_, self_, ff_core_Ordering_Order$K)
 }
@@ -256,6 +264,14 @@ export async function Map_get$(self_, key_, ff_core_Ordering_Order$K, $task) {
 return ff_core_RbMap.RB_get(self_, key_, ff_core_Ordering_Order$K)
 }
 
+export async function Map_lastBefore$(self_, key_, ff_core_Ordering_Order$K, $task) {
+return ff_core_RbMap.RB_lastBefore(self_, key_, ff_core_Ordering_Order$K)
+}
+
+export async function Map_firstAfter$(self_, key_, ff_core_Ordering_Order$K, $task) {
+return ff_core_RbMap.RB_firstAfter(self_, key_, ff_core_Ordering_Order$K)
+}
+
 export async function Map_remove$(self_, key_, ff_core_Ordering_Order$K, $task) {
 return ff_core_RbMap.delete_(key_, self_, ff_core_Ordering_Order$K)
 }

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

@@ -428,10 +428,7 @@ dir_ = fsPromises_.opendir(self_.absolutePath_, {bufferSize: 128})
 };
 const entry_ = dir_.read();
 if((!ff_core_JsValue.JsValue_isNull(entry_))) {
-return ff_core_Option.Some((function() {
-entry_.ffPath = self_.absolutePath_;
-return entry_
-})())
+return ff_core_Option.Some((entry_.ffPath = self_.absolutePath_, entry_))
 } else return ff_core_Option.None()
 }), (() => {
 if((!ff_core_JsValue.JsValue_isNull(dir_))) {
@@ -729,10 +726,7 @@ dir_ = (await fsPromises_.opendir(self_.absolutePath_, {bufferSize: 128}))
 };
 const entry_ = (await dir_.read());
 if((!ff_core_JsValue.JsValue_isNull(entry_))) {
-return ff_core_Option.Some((await (async function() {
-entry_.ffPath = self_.absolutePath_;
-return entry_
-})()))
+return ff_core_Option.Some((entry_.ffPath = self_.absolutePath_, entry_))
 } else return ff_core_Option.None()
 }), (async ($task) => {
 if((!ff_core_JsValue.JsValue_isNull(dir_))) {

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

@@ -995,6 +995,62 @@ return
 }
 }
 
+export function RB_lastBefore(self_, key_, ff_core_Ordering_Order$K) {
+{
+const _1 = self_;
+if(_1.E) {
+return ff_core_Option.None()
+}
+if(_1.T) {
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+if(ff_core_Ordering.notBefore_(k_, key_, ff_core_Ordering_Order$K)) {
+return ff_core_RbMap.RB_lastBefore(l_, key_, ff_core_Ordering_Order$K)
+}
+}
+{
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+return ff_core_Option.Option_orElse(ff_core_RbMap.RB_lastBefore(r_, key_, ff_core_Ordering_Order$K), (() => {
+return ff_core_Option.Some(ff_core_Pair.Pair(k_, v_))
+}))
+return
+}
+}
+}
+
+export function RB_firstAfter(self_, key_, ff_core_Ordering_Order$K) {
+{
+const _1 = self_;
+if(_1.E) {
+return ff_core_Option.None()
+}
+if(_1.T) {
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+if(ff_core_Ordering.notAfter_(k_, key_, ff_core_Ordering_Order$K)) {
+return ff_core_RbMap.RB_firstAfter(r_, key_, ff_core_Ordering_Order$K)
+}
+}
+{
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+return ff_core_Option.Option_orElse(ff_core_RbMap.RB_firstAfter(l_, key_, ff_core_Ordering_Order$K), (() => {
+return ff_core_Option.Some(ff_core_Pair.Pair(k_, v_))
+}))
+return
+}
+}
+}
+
 export function RB_size(self_, ff_core_Ordering_Order$K) {
 {
 const _1 = self_;
@@ -1188,6 +1244,62 @@ return
 }
 }
 
+export async function RB_lastBefore$(self_, key_, ff_core_Ordering_Order$K, $task) {
+{
+const _1 = self_;
+if(_1.E) {
+return ff_core_Option.None()
+}
+if(_1.T) {
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+if(ff_core_Ordering.notBefore_(k_, key_, ff_core_Ordering_Order$K)) {
+return ff_core_RbMap.RB_lastBefore(l_, key_, ff_core_Ordering_Order$K)
+}
+}
+{
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+return ff_core_Option.Option_orElse(ff_core_RbMap.RB_lastBefore(r_, key_, ff_core_Ordering_Order$K), (() => {
+return ff_core_Option.Some(ff_core_Pair.Pair(k_, v_))
+}))
+return
+}
+}
+}
+
+export async function RB_firstAfter$(self_, key_, ff_core_Ordering_Order$K, $task) {
+{
+const _1 = self_;
+if(_1.E) {
+return ff_core_Option.None()
+}
+if(_1.T) {
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+if(ff_core_Ordering.notAfter_(k_, key_, ff_core_Ordering_Order$K)) {
+return ff_core_RbMap.RB_firstAfter(r_, key_, ff_core_Ordering_Order$K)
+}
+}
+{
+const l_ = _1.left_;
+const k_ = _1.key_;
+const v_ = _1.value_;
+const r_ = _1.right_;
+return ff_core_Option.Option_orElse(ff_core_RbMap.RB_firstAfter(l_, key_, ff_core_Ordering_Order$K), (() => {
+return ff_core_Option.Some(ff_core_Pair.Pair(k_, v_))
+}))
+return
+}
+}
+}
+
 export async function RB_size$(self_, ff_core_Ordering_Order$K, $task) {
 {
 const _1 = self_;

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

@@ -135,6 +135,18 @@ export function Set_contains(self_, value_, ff_core_Ordering_Order$T) {
 return ff_core_Map.Map_contains(self_, value_, ff_core_Ordering_Order$T)
 }
 
+export function Set_lastBefore(self_, key_, ff_core_Ordering_Order$T) {
+return ff_core_Option.Option_map(ff_core_Map.Map_lastBefore(self_, key_, ff_core_Ordering_Order$T), ((_w1) => {
+return _w1.first_
+}))
+}
+
+export function Set_firstAfter(self_, key_, ff_core_Ordering_Order$T) {
+return ff_core_Option.Option_map(ff_core_Map.Map_firstAfter(self_, key_, ff_core_Ordering_Order$T), ((_w1) => {
+return _w1.first_
+}))
+}
+
 export function Set_size(self_, ff_core_Ordering_Order$T) {
 return ff_core_Map.Map_size(self_, ff_core_Ordering_Order$T)
 }
@@ -200,6 +212,18 @@ export async function Set_contains$(self_, value_, ff_core_Ordering_Order$T, $ta
 return ff_core_Map.Map_contains(self_, value_, ff_core_Ordering_Order$T)
 }
 
+export async function Set_lastBefore$(self_, key_, ff_core_Ordering_Order$T, $task) {
+return ff_core_Option.Option_map(ff_core_Map.Map_lastBefore(self_, key_, ff_core_Ordering_Order$T), ((_w1) => {
+return _w1.first_
+}))
+}
+
+export async function Set_firstAfter$(self_, key_, ff_core_Ordering_Order$T, $task) {
+return ff_core_Option.Option_map(ff_core_Map.Map_firstAfter(self_, key_, ff_core_Ordering_Order$T), ((_w1) => {
+return _w1.first_
+}))
+}
+
 export async function Set_size$(self_, ff_core_Ordering_Order$T, $task) {
 return ff_core_Map.Map_size(self_, ff_core_Ordering_Order$T)
 }

package/package.json

@@ -4,7 +4,7 @@
     "description": "Firefly compiler",
     "author": "Firefly team",
     "license": "MIT",
-    "version": "0.5.47",
+    "version": "0.5.48",
     "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.5.47",
+    "version": "0.5.48",
     "repository": {
         "type": "git",
         "url": "https://github.com/Ahnfelt/firefly-boot"