starlight-fsharp-oracle 0.1.0 → 0.1.2

package/dist/fable_modules/Fable.Promise.3.2.0/AsyncIterable.fs

@@ -0,0 +1,57 @@
+[<RequireQualifiedAccess>]
+module AsyncIterable
+
+open Fable.Core
+open Fable.Core.JsInterop
+
+[<Emit("""{
+    [Symbol.asyncIterator]() {
+        return {
+            next: $0,
+            return: $1
+        }
+    }
+}""")>]
+let private createAsyncIterator (onNext: unit -> JS.Promise<obj>) (onCancel: unit -> obj): JS.AsyncIterable<'T> = jsNative
+
+/// Creates AsyncIterable. See https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Statements/for-await...of#specifications
+let create (onNext: unit -> JS.Promise<'T option>): JS.AsyncIterable<'T> =
+    createAsyncIterator
+        (fun () ->
+            onNext() |> Promise.map (function
+                | Some value -> createObj ["value" ==> value; "done" ==> false]
+                | None -> createObj ["done" ==> true]
+            ))
+        (fun () -> createObj [ "done" ==> true ])
+
+/// Creates AsyncIterable with a cleaning function for cancellation (JS caller invokes `break` or `return` during iteration)
+let createCancellable (onCancel: unit -> unit) (onNext: unit -> JS.Promise<'T option>): JS.AsyncIterable<'T> =
+    createAsyncIterator
+        (fun () ->
+            onNext() |> Promise.map (function
+                | Some value -> createObj ["value" ==> value; "done" ==> false]
+                | None -> createObj ["done" ==> true]
+            ))
+        (fun () ->
+            onCancel()
+            createObj [ "done" ==> true ])
+
+type CancellationToken() =
+    member this.Cancel(): unit =
+        raise !!this
+
+/// Iterates AsyncIterable. See https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Statements/for-await...of
+let iter (action: CancellationToken -> 'T -> unit) (iterable: JS.AsyncIterable<'T>): JS.Promise<unit> =
+    let token = CancellationToken()
+    emitJsExpr () """(async () => {
+    for await (const value of iterable) {
+        try {
+            action(token, value)
+        } catch (err) {
+            if (err instanceof token.constructor) {
+                break;
+            }
+            throw(err);
+        }
+    }
+})()"""

package/dist/fable_modules/Fable.Promise.3.2.0/AsyncIterable.fs.js

@@ -0,0 +1,105 @@
+
+import { value as value_1 } from "../fable-library-js.5.0.0-rc.7/Option.js";
+import { class_type } from "../fable-library-js.5.0.0-rc.7/Reflection.js";
+
+/**
+ * Creates AsyncIterable. See https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Statements/for-await...of#specifications
+ */
+export function create(onNext) {
+    return {
+    [Symbol.asyncIterator]() {
+        return {
+            next: (() => {
+        const pr = onNext();
+        return pr.then((_arg) => {
+            if (_arg == null) {
+                return {
+                    done: true,
+                };
+            }
+            else {
+                return {
+                    value: value_1(_arg),
+                    done: false,
+                };
+            }
+        });
+    }),
+            return: (() => ({
+        done: true,
+    }))
+        }
+    }
+};
+}
+
+/**
+ * Creates AsyncIterable with a cleaning function for cancellation (JS caller invokes `break` or `return` during iteration)
+ */
+export function createCancellable(onCancel, onNext) {
+    return {
+    [Symbol.asyncIterator]() {
+        return {
+            next: (() => {
+        const pr = onNext();
+        return pr.then((_arg) => {
+            if (_arg == null) {
+                return {
+                    done: true,
+                };
+            }
+            else {
+                return {
+                    value: value_1(_arg),
+                    done: false,
+                };
+            }
+        });
+    }),
+            return: (() => {
+        onCancel();
+        return {
+            done: true,
+        };
+    })
+        }
+    }
+};
+}
+
+export class CancellationToken {
+    constructor() {
+    }
+}
+
+export function CancellationToken_$reflection() {
+    return class_type("AsyncIterable.CancellationToken", undefined, CancellationToken);
+}
+
+export function CancellationToken_$ctor() {
+    return new CancellationToken();
+}
+
+export function CancellationToken__Cancel(this$) {
+    throw this$;
+}
+
+/**
+ * Iterates AsyncIterable. See https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Statements/for-await...of
+ */
+export function iter(action, iterable) {
+    const token = CancellationToken_$ctor();
+    return (async () => {
+    for await (const value of iterable) {
+        try {
+            action(token, value)
+        } catch (err) {
+            if (err instanceof token.constructor) {
+                break;
+            }
+            throw(err);
+        }
+    }
+})();
+}
+

package/dist/fable_modules/Fable.Promise.3.2.0/Fable.Promise.fableproj

@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project Sdk="Microsoft.NET.Sdk">
+  <PropertyGroup>
+    <Version>3.2.0</Version>
+    <PackageVersion>3.2.0</PackageVersion>
+    <TargetFramework>netstandard2.0</TargetFramework>
+  </PropertyGroup>
+  <ItemGroup>
+    <Compile Include="Promise.fs" />
+    <Compile Include="PromiseImpl.fs" />
+    <Compile Include="AsyncIterable.fs" />
+  </ItemGroup>
+  <ItemGroup>
+    <Content Include="*.fsproj; *.fs" PackagePath="fable\" />
+  </ItemGroup>
+  <ItemGroup>
+    <PackageReference Include="Fable.Core" Version="3.7.1" />
+    <PackageReference Update="FSharp.Core" Version="4.7.2" />
+  </ItemGroup>
+</Project>