starlight-fsharp-oracle 0.1.0 → 0.1.1

package/dist/Helpers.js

@@ -61,8 +61,7 @@ export function collectErrors(results) {
             return undefined;
         }
         else {
-            const msg = _arg.fields[0];
-            return msg;
+            return _arg.fields[0];
         }
     }, results);
 }

package/dist/Plugin.js

@@ -6,22 +6,22 @@ import * as child_process from "child_process";
 import { map, defaultArg, some } from "./fable_modules/fable-library-js.5.0.0-rc.7/Option.js";
 import { stringHash, Exception } from "./fable_modules/fable-library-js.5.0.0-rc.7/Util.js";
 import { join, concat, interpolate } from "./fable_modules/fable-library-js.5.0.0-rc.7/String.js";
+import { unsafeFromString } from "./fable_modules/Thoth.Json.JavaScript.0.5.0/Decode.fs.js";
+import { generateDecoder } from "./fable_modules/Thoth.Json.Core.Auto.0.1.0/Decode.fs.js";
 import { Extra_empty } from "./fable_modules/Thoth.Json.Core.Auto.0.1.0/Domain.fs.js";
 import { Root_$reflection } from "./FSharp.Oracle.Schema/Schema.js";
-import { generateDecoder } from "./fable_modules/Thoth.Json.Core.Auto.0.1.0/Decode.fs.js";
-import { unsafeFromString } from "./fable_modules/Thoth.Json.JavaScript.0.5.0/Decode.fs.js";
 import { PromiseBuilder__Delay_62FBFDE1, PromiseBuilder__Run_212F1D4B } from "./fable_modules/Fable.Promise.3.2.0/Promise.fs.js";
 import { promise } from "./fable_modules/Fable.Promise.3.2.0/PromiseImpl.fs.js";
 import { createRenderer } from "astro-expressive-code";
 import { generateCss } from "./Themes.js";
 import { length, isEmpty, contains, filter, map as map_1, collect } from "./fable_modules/fable-library-js.5.0.0-rc.7/List.js";
 import { entityPages, rootIndexPage, namespacePages as namespacePages_1, modulePages as modulePages_1, sidebarTree, sidebarLabelInitScript } from "./Generate.js";
-import { collectErrors, FileOperationResult$1, writeSync, mkdirSync } from "./Helpers.js";
+import { FileOperationResult$1, collectErrors, writeSync, mkdirSync } from "./Helpers.js";
 
 function runExtractor(logger, outputBase, dllPaths) {
     const maxBuffer = ((50 * 1024) * 1024) | 0;
-    const oracleProject = path.join(path.dirname(fileURLToPath(import.meta.url)), "..", "packages", "FSharp.Oracle");
-    const args = toList(delay(() => append(singleton("run"), delay(() => append(singleton("--project"), delay(() => append(singleton(oracleProject), delay(() => append(singleton("--"), delay(() => append(singleton("--output-base"), delay(() => append(singleton(outputBase), delay(() => dllPaths))))))))))))));
+    const oracleDll = path.join(path.dirname(fileURLToPath(import.meta.url)), "..", "oracle-bin", "Oracle.dll");
+    const args = toList(delay(() => append(singleton(oracleDll), delay(() => append(singleton("--output-base"), delay(() => append(singleton(outputBase), delay(() => dllPaths))))))));
     const result = child_process.spawnSync("dotnet", Array.from(args), some({
         encoding: "utf-8",
         maxBuffer: maxBuffer,
@@ -35,13 +35,7 @@ ${interpolate("%A%P()", [result.stderr])}`);
     }
     else {
         const json = result.stdout;
-        let decoder_1;
-        const extra_1 = Extra_empty;
-        const losslessOption_1 = true;
-        const ty = Root_$reflection();
-        const decoder = generateDecoder(undefined, extra_1.DecoderOverrides, false, losslessOption_1, ty);
-        decoder_1 = decoder;
-        return unsafeFromString(decoder_1, json);
+        return unsafeFromString(generateDecoder(undefined, Extra_empty.DecoderOverrides, false, true, Root_$reflection()), json);
     }
 }
 
@@ -63,9 +57,8 @@ function starlightFSharpDoc(pluginOptions) {
                             clo(arg);
                         });
                         return createRenderer({}).then((_arg) => {
-                            let matchValue, matchValue_1, msg_1, msg;
-                            const ecRenderer = _arg;
-                            const themesCss = generateCss(ecRenderer);
+                            let matchValue, matchValue_1, msg;
+                            const themesCss = generateCss(_arg);
                             const outputBase = defaultArg(pluginOptions.output, "api");
                             const root = runExtractor(logger, outputBase, toList(pluginOptions.assemblies));
                             const modules = collect((_arg_1) => _arg_1.Modules, root.Assemblies);
@@ -82,25 +75,19 @@ function starlightFSharpDoc(pluginOptions) {
                                 sidebar: toArray(delay(() => append(existingSidebar, delay(() => singleton(sidebarTree(outputBase, sidebarLabel, modules)))))),
                             });
                             const outputDir = path.join(astroConfig.root.pathname, "src", "pages", outputBase);
-                            return ((matchValue = mkdirSync(outputDir), (matchValue.tag === 0) ? ((matchValue_1 = writeSync(path.join(outputDir, ".gitignore"), "# Autogenerated by starlight-fsharp-oracle\n**/*\n"), (matchValue_1.tag === 0) ? (Promise.resolve()) : ((msg_1 = matchValue_1.fields[0], (logger.warn(concat("Failed to write .gitignore: ", ...msg_1)), Promise.resolve()))))) : ((msg = matchValue.fields[0], (logger.error(msg), ((() => {
+                            return ((matchValue = mkdirSync(outputDir), (matchValue.tag === 0) ? ((matchValue_1 = writeSync(path.join(outputDir, ".gitignore"), "# Autogenerated by starlight-fsharp-oracle\n**/*\n"), (matchValue_1.tag === 0) ? (Promise.resolve()) : ((logger.warn(concat("Failed to write .gitignore: ", ...matchValue_1.fields[0])), Promise.resolve())))) : ((msg = matchValue.fields[0], (logger.error(msg), ((() => {
                                 throw new Exception(msg);
                             })(), Promise.resolve())))))).then(() => PromiseBuilder__Delay_62FBFDE1(promise, () => {
                                 const modulePages = modulePages_1(outputBase, modules);
                                 const namespacePages = namespacePages_1(outputBase, modules);
                                 const moduleSlugs = map_1((tuple) => tuple[0], modulePages);
-                                const dedupedNamespacePages = filter((tupledArg) => {
-                                    const slug = tupledArg[0];
-                                    return !contains(slug, moduleSlugs, {
-                                        Equals: (x, y) => (x === y),
-                                        GetHashCode: (x) => (stringHash(x) | 0),
-                                    });
-                                }, namespacePages);
-                                const pages = toList(delay(() => append(singleton(rootIndexPage(outputBase, root.Assemblies, modules)), delay(() => append(dedupedNamespacePages, delay(() => append(modulePages, delay(() => entityPages(outputBase, modules)))))))));
-                                const writeResults = map_1((tupledArg_1) => {
-                                    const slug_1 = tupledArg_1[0];
-                                    const content = tupledArg_1[1];
-                                    const filePath = path.join(outputDir, slug_1 + ".mdx");
-                                    const matchValue_2 = writeSync(filePath, content);
+                                const dedupedNamespacePages = filter((tupledArg) => !contains(tupledArg[0], moduleSlugs, {
+                                    Equals: (x, y) => (x === y),
+                                    GetHashCode: (x) => (stringHash(x) | 0),
+                                }), namespacePages);
+                                const errors = collectErrors(map_1((tupledArg_1) => {
+                                    const filePath = path.join(outputDir, tupledArg_1[0] + ".mdx");
+                                    const matchValue_2 = writeSync(filePath, tupledArg_1[1]);
                                     if (matchValue_2.tag === 0) {
                                         logger.info(concat("  wrote ", ...filePath));
                                         return new FileOperationResult$1(0, [undefined]);
@@ -110,8 +97,7 @@ function starlightFSharpDoc(pluginOptions) {
                                         logger.error(msg_2);
                                         return new FileOperationResult$1(1, [msg_2]);
                                     }
-                                }, pages);
-                                const errors = collectErrors(writeResults);
+                                }, toList(delay(() => append(singleton(rootIndexPage(outputBase, root.Assemblies, modules)), delay(() => append(dedupedNamespacePages, delay(() => append(modulePages, delay(() => entityPages(outputBase, modules)))))))))));
                                 if (!isEmpty(errors)) {
                                     const errorMsg = (`Failed to write ${length(errors)} file(s):
 `) + join("\n", errors);

package/dist/Render/Documentation.js

@@ -13,8 +13,7 @@ export function renderSummary(sb, xmlDoc) {
     if (matchValue == null) {
     }
     else {
-        const summary = matchValue;
-        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(summary));
+        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(matchValue));
         System_Text_StringBuilder__StringBuilder_NewLine(sb);
     }
 }

package/dist/Render/Entries.js

@@ -1,50 +1,46 @@
 
+import { tocH3, h2, escapeMdxText, renderDocEntry } from "./Primitives.js";
+import { FSharp_Oracle_Schema_TextNode__TextNode_ToHtml_Static_Z3A0E64B3, FSharp_Oracle_Schema_TextNode__TextNode_get_Html } from "../Extensions/TextNode.js";
+import { MemberKind, TextNode, ObsoleteInfo } from "../FSharp.Oracle.Schema/Schema.js";
+import { renderXmlDocBody, renderDocumentationBlock } from "./Documentation.js";
 import { collect, map, ofArray, isEmpty, filter } from "../fable_modules/fable-library-js.5.0.0-rc.7/List.js";
 import { System_Text_StringBuilder__StringBuilder_NewLine, System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5 } from "../Extensions/StringBuilder.js";
 import { equals, disposeSafe, getEnumerator } from "../fable_modules/fable-library-js.5.0.0-rc.7/Util.js";
-import { FSharp_Oracle_Schema_TextNode__TextNode_get_Html, FSharp_Oracle_Schema_TextNode__TextNode_ToHtml_Static_Z3A0E64B3 } from "../Extensions/TextNode.js";
-import { MemberKind, ObsoleteInfo, TextNode } from "../FSharp.Oracle.Schema/Schema.js";
-import { tocH3, h2, renderDocEntry, escapeMdxText } from "./Primitives.js";
 import { value as value_1 } from "../fable_modules/fable-library-js.5.0.0-rc.7/Option.js";
-import { renderXmlDocBody, renderDocumentationBlock } from "./Documentation.js";
 import { join } from "../fable_modules/fable-library-js.5.0.0-rc.7/String.js";
 import { map as map_1, singleton, append, delay, toList } from "../fable_modules/fable-library-js.5.0.0-rc.7/Seq.js";
 
 export function renderUnionCaseEntry(sb, case$) {
-    const renderFields = () => {
-        const documentedFields = filter((f) => (f.XmlDoc.Summary != null), case$.Fields);
-        if (!isEmpty(documentedFields)) {
-            System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<strong>Fields</strong>");
-            const enumerator = getEnumerator(documentedFields);
-            try {
-                while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
-                    const f_1 = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-                    const fieldDeclaration = FSharp_Oracle_Schema_TextNode__TextNode_ToHtml_Static_Z3A0E64B3(ofArray([new TextNode(23, ["div", "fs-parameter__signature"]), new TextNode(20, []), new TextNode(0, [f_1.Name]), new TextNode(9, []), new TextNode(12, []), new TextNode(9, []), f_1.Type, new TextNode(20, []), new TextNode(22, ["div"]), new TextNode(20, [])]));
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, fieldDeclaration);
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<div class=\'fs-parameter__documentation\'>");
-                    System_Text_StringBuilder__StringBuilder_NewLine(sb);
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(value_1(f_1.XmlDoc.Summary)));
-                    System_Text_StringBuilder__StringBuilder_NewLine(sb);
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "</div>");
+    renderDocEntry(sb, case$.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(case$.Declaration), new ObsoleteInfo(0, []), () => {
+        renderDocumentationBlock(sb, case$.XmlDoc, () => {
+            const documentedFields = filter((f) => (f.XmlDoc.Summary != null), case$.Fields);
+            if (!isEmpty(documentedFields)) {
+                System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<strong>Fields</strong>");
+                const enumerator = getEnumerator(documentedFields);
+                try {
+                    while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
+                        const f_1 = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
+                        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, FSharp_Oracle_Schema_TextNode__TextNode_ToHtml_Static_Z3A0E64B3(ofArray([new TextNode(23, ["div", "fs-parameter__signature"]), new TextNode(20, []), new TextNode(0, [f_1.Name]), new TextNode(9, []), new TextNode(12, []), new TextNode(9, []), f_1.Type, new TextNode(20, []), new TextNode(22, ["div"]), new TextNode(20, [])])));
+                        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<div class=\'fs-parameter__documentation\'>");
+                        System_Text_StringBuilder__StringBuilder_NewLine(sb);
+                        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(value_1(f_1.XmlDoc.Summary)));
+                        System_Text_StringBuilder__StringBuilder_NewLine(sb);
+                        System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "</div>");
+                    }
+                }
+                finally {
+                    disposeSafe(enumerator);
                 }
             }
-            finally {
-                disposeSafe(enumerator);
-            }
-        }
-    };
-    const renderDocumentation = () => {
-        renderDocumentationBlock(sb, case$.XmlDoc, renderFields);
-    };
-    renderDocEntry(sb, case$.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(case$.Declaration), new ObsoleteInfo(0, []), renderDocumentation);
+        });
+    });
 }
 
 export function renderRecordField(sb, field) {
-    const renderDocumentation = () => {
+    renderDocEntry(sb, field.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(field.Declaration), new ObsoleteInfo(0, []), () => {
         renderDocumentationBlock(sb, field.XmlDoc, () => {
         });
-    };
-    renderDocEntry(sb, field.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(field.Declaration), new ObsoleteInfo(0, []), renderDocumentation);
+    });
 }
 
 export function renderMemberEntry(sb, m) {
@@ -139,10 +135,9 @@ export function renderFunctionEntry(sb, f) {
 }
 
 export function renderValueEntry(sb, v) {
-    const renderDocumentation = () => {
+    renderDocEntry(sb, v.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(v.Declaration), v.ObsoleteInfo, () => {
         renderDocumentationBlock(sb, v.XmlDoc, () => {
         });
-    };
-    renderDocEntry(sb, v.Name, FSharp_Oracle_Schema_TextNode__TextNode_get_Html(v.Declaration), v.ObsoleteInfo, renderDocumentation);
+    });
 }
 

package/dist/Render/Pages.js

@@ -26,8 +26,7 @@ export function renderDeclaredModules(sb, toc, htmlLinkGen, modules) {
                 if (matchValue == null) {
                 }
                 else {
-                    const doc = matchValue;
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(doc), ..."</dd>"));
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(matchValue), ..."</dd>"));
                 }
             }
         }
@@ -55,9 +54,8 @@ export function renderEntityPage(htmlLinkGen, entity, parentModule) {
     renderXmlDocSummaryAndRemarks(sb, toc, Entity__get_XmlDoc(entity));
     switch (entity.tag) {
         case 1: {
-            const e = entity.fields[0];
             System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<div class=\"collapsible-group\">");
-            const enumerator = getEnumerator(e.Cases);
+            const enumerator = getEnumerator(entity.fields[0].Cases);
             try {
                 while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
                     const c = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
@@ -95,13 +93,11 @@ export function renderEntityPage(htmlLinkGen, entity, parentModule) {
             break;
         }
         case 3: {
-            const e_1 = entity.fields[0];
-            renderMemberSections(sb, toc, e_1.Members);
+            renderMemberSections(sb, toc, entity.fields[0].Members);
             break;
         }
         case 4: {
-            const e_2 = entity.fields[0];
-            renderMemberSections(sb, toc, e_2.Members);
+            renderMemberSections(sb, toc, entity.fields[0].Members);
             break;
         }
         case 7: {
@@ -140,11 +136,9 @@ export function renderNamespacePage(htmlLinkGen, ns, subNamespaces, entities, mo
         const enumerator = getEnumerator(subNamespaces);
         try {
             while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
+                let lastDot;
                 const subNs = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-                let shortName;
-                const lastDot = subNs.lastIndexOf(".") | 0;
-                shortName = ((lastDot < 0) ? subNs : subNs.slice(lastDot + 1, subNs.length));
-                System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dt>", htmlLinkGen(shortName, subNs), ..."</dt>"));
+                System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dt>", htmlLinkGen((lastDot = (subNs.lastIndexOf(".") | 0), (lastDot < 0) ? subNs : subNs.slice(lastDot + 1, subNs.length)), subNs), ..."</dt>"));
             }
         }
         finally {
@@ -165,8 +159,7 @@ export function renderNamespacePage(htmlLinkGen, ns, subNamespaces, entities, mo
                 if (matchValue == null) {
                 }
                 else {
-                    const summary = matchValue;
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(summary), ..."</dd>"));
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(matchValue), ..."</dd>"));
                 }
             }
         }
@@ -197,8 +190,7 @@ export function renderModulePage(htmlLinkGen, m, subModules) {
                 if (matchValue == null) {
                 }
                 else {
-                    const summary = matchValue;
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(summary), ..."</dd>"));
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(matchValue), ..."</dd>"));
                 }
             }
         }
@@ -260,8 +252,7 @@ export function renderRootIndexPage(htmlLinkGen, assemblies, globalModules) {
                 if (matchValue == null) {
                 }
                 else {
-                    const doc = matchValue;
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(doc), ..."</dd>"));
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<dd>", escapeMdxText(matchValue), ..."</dd>"));
                 }
             }
         }

package/dist/Render/Primitives.js

@@ -24,24 +24,8 @@ export function tocH3(toc, slug, text) {
 }
 
 export function renderDocEntry(sb, name, signatureHtml, obsoleteInfo, renderDocumentation) {
-    let patternInput;
-    switch (obsoleteInfo.tag) {
-        case 1: {
-            patternInput = [" obsolete", ""];
-            break;
-        }
-        case 2: {
-            const msg = obsoleteInfo.fields[0];
-            const escaped = replace(msg, "\"", """);
-            patternInput = [" obsolete", concat(" obsoleteMessage=\"", escaped, ..."\"")];
-            break;
-        }
-        default:
-            patternInput = ["", ""];
-    }
-    const obsoleteMessageAttr = patternInput[1];
-    const obsoleteAttr = patternInput[0];
-    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, `<DocEntry name="${name}"${obsoleteAttr}${obsoleteMessageAttr}>`);
+    const patternInput = (obsoleteInfo.tag === 1) ? [" obsolete", ""] : ((obsoleteInfo.tag === 2) ? [" obsolete", concat(" obsoleteMessage=\"", replace(obsoleteInfo.fields[0], "\"", "&quot;"), ..."\"")] : ["", ""]);
+    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, `<DocEntry name="${name}"${patternInput[0]}${patternInput[1]}>`);
     System_Text_StringBuilder__StringBuilder_Write_Z721C83C5(sb, "<div class=\"fsharp-doc-sig\" slot=\"signature\">");
     System_Text_StringBuilder__StringBuilder_Write_Z721C83C5(sb, signatureHtml);
     System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "</div>");
@@ -59,8 +43,7 @@ export function renderObsoleteBanner(sb, obsoleteInfo) {
             break;
         }
         case 2: {
-            const msg = obsoleteInfo.fields[0];
-            System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<Aside type=\"caution\" title=\"Deprecated\">", escapeMdxText(msg), ..."</Aside>"));
+            System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, concat("<Aside type=\"caution\" title=\"Deprecated\">", escapeMdxText(obsoleteInfo.fields[0]), ..."</Aside>"));
             System_Text_StringBuilder__StringBuilder_NewLine(sb);
             break;
         }
@@ -73,10 +56,8 @@ export function obsoleteInlineHtml(obsoleteInfo) {
     switch (obsoleteInfo.tag) {
         case 1:
             return " <span class=\"fsharp-doc-obsolete-inline\">Deprecated</span>";
-        case 2: {
-            const msg = obsoleteInfo.fields[0];
-            return concat(" <span class=\"fsharp-doc-obsolete-inline\" title=\"", msg, ..."\">Deprecated</span>");
-        }
+        case 2:
+            return concat(" <span class=\"fsharp-doc-obsolete-inline\" title=\"", obsoleteInfo.fields[0], ..."\">Deprecated</span>");
         default:
             return "";
     }
@@ -85,23 +66,19 @@ export function obsoleteInlineHtml(obsoleteInfo) {
 export function renderExamples(sb, examples) {
     if (!isEmpty(examples)) {
         if (isEmpty(tail(examples))) {
-            const single = head(examples);
             System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, "<strong>Example</strong>");
             System_Text_StringBuilder__StringBuilder_NewLine(sb);
-            System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(single));
+            System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(head(examples)));
             System_Text_StringBuilder__StringBuilder_NewLine(sb);
         }
         else {
-            const multiple = examples;
-            const enumerator = getEnumerator(indexed(multiple));
+            const enumerator = getEnumerator(indexed(examples));
             try {
                 while (enumerator["System.Collections.IEnumerator.MoveNext"]()) {
                     const forLoopVar = enumerator["System.Collections.Generic.IEnumerator`1.get_Current"]();
-                    const i = forLoopVar[0] | 0;
-                    const example = forLoopVar[1];
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, `<strong>Example ${i + 1}</strong>`);
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, `<strong>Example ${forLoopVar[0] + 1}</strong>`);
                     System_Text_StringBuilder__StringBuilder_NewLine(sb);
-                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(example));
+                    System_Text_StringBuilder__StringBuilder_WriteLine_Z721C83C5(sb, escapeMdxText(forLoopVar[1]));
                     System_Text_StringBuilder__StringBuilder_NewLine(sb);
                 }
             }

package/dist/Themes.js

@@ -26,15 +26,14 @@ function colorFor(theme, targetScopes) {
     const fg = theme.fg;
     return defaultArg(tryPick((rule) => {
         const ruleScopes = scopesOf(rule);
-        const matches = exists((target) => ruleScopes.some((rs) => {
+        if (!exists((target) => ruleScopes.some((rs) => {
             if (target === rs) {
                 return true;
             }
             else {
                 return target.startsWith(rs + ".");
             }
-        }), targetScopes);
-        if (!matches) {
+        }), targetScopes)) {
             return undefined;
         }
         else {
@@ -60,8 +59,7 @@ export function generateCss(ecRenderer) {
     const sb = StringBuilder_$ctor();
     for (let idx = 0; idx <= (themes.length - 1); idx++) {
         const theme = item(idx, themes);
-        const themeType = theme.type;
-        const selector = (themeType === "dark") ? ":root[data-theme=\'dark\']" : ":root";
+        const selector = (theme.type === "dark") ? ":root[data-theme=\'dark\']" : ":root";
         const kw = colorFor(theme, ofArray(["keyword", "storage.type", "keyword.operator"]));
         const fn_ = colorFor(theme, ofArray(["variable", "entity.name.function"]));
         const type_ = colorFor(theme, ofArray(["entity", "entity.name"]));

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>