functionalscript 0.0.457 → 0.0.459

package/com/cpp/module.f.cjs

@@ -65,7 +65,7 @@ const cpp = name => lib => {
 
     /** @type {(m: types.Method) => text.Item} */
     const method = ([name, paramArray]) =>
-        `virtual ${cppResult(paramArray)} COM_STDCALL ${name}(${join(', ')(mapParam(paramList(paramArray)))}) = 0;`
+        `virtual ${cppResult(paramArray)} COM_STDCALL ${name}(${join(', ')(mapParam(paramList(paramArray)))}) noexcept = 0;`
 
     const mapMethod = map(method)
 

package/com/cpp/test.f.cjs

@@ -21,13 +21,13 @@ const f = () =>
         '    };\n' +
         '    struct IMy: ::com::IUnknown\n' +
         '    {\n' +
-        '        virtual Slice COM_STDCALL GetSlice() = 0;\n' +
-        '        virtual void COM_STDCALL SetSlice(Slice slice) = 0;\n' +
-        '        virtual ::com::BOOL* COM_STDCALL GetUnsafe() = 0;\n' +
-        '        virtual void COM_STDCALL SetUnsafe(Slice* p, uint32_t size) = 0;\n' +
-        '        virtual ::com::BOOL COM_STDCALL Some(IMy& p) = 0;\n' +
-        '        virtual ::com::ref<IMy> COM_STDCALL GetIMy() = 0;\n' +
-        '        virtual void COM_STDCALL SetManagedStruct(ManagedStruct a) = 0;\n' +
+        '        virtual Slice COM_STDCALL GetSlice() noexcept = 0;\n' +
+        '        virtual void COM_STDCALL SetSlice(Slice slice) noexcept = 0;\n' +
+        '        virtual ::com::BOOL* COM_STDCALL GetUnsafe() noexcept = 0;\n' +
+        '        virtual void COM_STDCALL SetUnsafe(Slice* p, uint32_t size) noexcept = 0;\n' +
+        '        virtual ::com::BOOL COM_STDCALL Some(IMy& p) noexcept = 0;\n' +
+        '        virtual ::com::ref<IMy> COM_STDCALL GetIMy() noexcept = 0;\n' +
+        '        virtual void COM_STDCALL SetManagedStruct(ManagedStruct a) noexcept = 0;\n' +
         '    };\n' +
         '}'
     if (cpp !== e) { throw cpp }

package/com/test/build.cjs

@@ -1,11 +1,12 @@
 const { writeFileSync } = require('node:fs')
 const { execSync } = require('node:child_process')
-const { platform } = require('node:process')
+const { platform, exit } = require('node:process')
 const build = require('./build.f.cjs')
 const { cpp, cs, rust } = build
 const { join } = require('../../types/string/module.f.cjs')
 const { log, error } = console
 const { bold, reset } = require('../../text/sgr/module.f.cjs')
+const { list } = require('../../types/module.f.cjs')
 
 const nodeJs = {
     dirname: __dirname,
@@ -17,13 +18,16 @@ const run = f => {
     const { file: { name, content }, line } = f(nodeJs)
     log(`${bold}writing: ${name}${reset}`)
     writeFileSync(name, content)
-    const cmd = join(' ')(line)
-    log(`${bold}running: ${cmd}${reset}`)
-    try {
-        log(execSync(cmd).toString())
-    } catch (e) {
-        // @ts-ignore
-        error(e.output.toString())
+    for (const i of list.iterable(line)) {
+        const cmd = join(' ')(i)
+        log(`${bold}running: ${cmd}${reset}`)
+        try {
+            log(execSync(cmd).toString())
+        } catch (e) {
+            // @ts-ignore
+            error(e.output.toString())
+            exit(-1)
+        }
     }
 }
 

package/com/test/build.f.cjs

@@ -34,7 +34,7 @@ const rustContent = require("../rust/testlib.f.cjs")
  *      readonly name: string
  *      readonly content: string
  *  }
- *  readonly line: list.List<string>
+ *  readonly line: list.List<list.List<string>>
  * }} Output
  */
 
@@ -52,18 +52,32 @@ const flags = platform => {
     }
 }
 
+/** @type {(platform: Platform) => (name: string) => string} */
+const output = platform => name => {
+    switch (platform) {
+        case 'win32': return `${name}.dll`
+        case 'darwin': return `lib${name}.dylib`
+        default: return `lib${name}.so`
+    }
+}
+
 /** @type {Func} */
-const cpp = ({dirname, platform}) => ({
-    file: {
-        name: `${dirname}/cpp/_result.hpp`,
-        content: cppContent,
-    },
-    line: flat([
-        ['clang'],
-        flags(platform),
-        [`${dirname}/cpp/main.cpp`]]
-    ),
-})
+const cpp = ({dirname, platform}) => {
+    const extension = platform === 'win32' ? 'dll' : 'so'
+    return {
+        file: {
+            name: `${dirname}/cpp/_result.hpp`,
+            content: cppContent,
+        },
+        line: [
+            flat([
+                ['clang', '-shared', '-o', output(platform)('main')],
+                flags(platform),
+                [`${dirname}/cpp/main.cpp`]]
+            ),
+        ],
+    }
+}
 
 /** @type {Func} */
 const cs = ({dirname}) => ({
@@ -71,7 +85,7 @@ const cs = ({dirname}) => ({
         name: `${dirname}/cs/_result.cs`,
         content: csContent,
     },
-    line: ['dotnet', 'build', `${dirname}/cs/cs.csproj`],
+    line: [['dotnet', 'build', `${dirname}/cs/cs.csproj`]],
 })
 
 /** @type {Func} */
@@ -80,7 +94,7 @@ const rust = ({dirname}) => ({
         name: `${dirname}/rust/src/_result.rs`,
         content: rustContent,
     },
-    line: ['cargo', 'build']
+    line: [['cargo', 'build']]
 })
 
 module.exports = {

package/com/test/cpp/main.cpp

@@ -1,9 +1,2 @@
 #include "../../cpp/com.hpp"
 #include "_result.hpp"
-
-#include <iostream>
-
-int main()
-{
-    std::cout << "Hello world!" << std::endl;
-}

package/fsm/README.md

@@ -39,16 +39,75 @@ const idNext = byteSet.union(idBegin)(digit)
 const dot = byteSet('.')
 
 const grammar = [
-  ['init', digit, 'int'],
+  ['', digit, 'int'],
   ['int', digit, 'int'],
   //
-  ['init', digit, 'floatBegin'],
+  ['', digit, 'floatBegin'],
   ['floatBegin', digit, 'floatBegin'],
   ['floatBegin', dot, 'floatDot'],
   ['floatDot', digit, 'float'],
   ['float', digit, 'float'],
   //
-  ['init', idBegin, 'id'],
+  ['', idBegin, 'id'],
   ['id', idNext, 'id'],
 ]
 ```
+
+```js
+const result = {
+  "['']": {
+    digit: "['floatBegin','int']",
+    idBegin: "['id']"
+  },
+  "['floatBegin','int']": {
+    digit: "['floatBegin','int']",
+    dot: "['floatDot']",
+  },
+  "['floatDot']": {
+    digit: "['float']"
+  },
+  "['float']": {
+    digit: "['float']"
+  },
+  "['id']": {
+    idNext: "['id']"
+  }
+}
+```
+
+```js
+const result = [
+  { // 0
+    digit: 1,
+    idBegin: 4
+  },
+  { // 1
+    digit: 1,
+    dot: 2,
+  },
+  { // 2
+    digit: 3
+  },
+  { // 3
+    digit: 3
+  },
+  { // 4
+    idNext: 4
+  }
+}
+```
+
+## How to Add a Property # 1
+
+```js
+const a = { x: 5, y: 6 }
+const b = { ...a, z: 7 }
+```
+
+## How to Add a Property # 2
+
+```js
+const map = reauire('./types/map/module.f.js')
+const a = map.fromEntries(Object.entries({ x: 5, y: 6 }))
+const b = map.setReplace('z')(7)(a)
+```

package/fsm/module.f.cjs

@@ -14,15 +14,10 @@ const byteSet = require('../types/byte_set/module.f.cjs')
  * }} Dfa
  */
 
-/** @type {(faId: string) => string} */
-const escape = faId => faId.replaceAll('\\', '\\\\').replaceAll('|', '\\|')
-
 /** @type {(grammar: Grammar) => Dfa} */
 const dfa = grammar => todo()
 
 module.exports = {
-    /** @readonly */
-    escape,
     /** @readonly */
     dfa,
 }

package/fsm/test.f.cjs

@@ -1,14 +1,5 @@
 const _ = require('./module.f.cjs')
 
 module.exports = {
-    escape: [
-        () => {
-            const result = _.escape('abc')
-            if (result !== 'abc') { throw result }
-        },
-        () => {
-            const result = _.escape('\\a|b|c\\')
-            if (result !== '\\\\a\\|b\\|c\\\\') { throw result }
-        }
-    ]
+
 }

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "functionalscript",
-  "version": "0.0.457",
+  "version": "0.0.459",
   "description": "FunctionalScript is a functional subset of JavaScript",
   "main": "module.f.cjs",
   "scripts": {

package/types/byte_set/module.f.cjs

@@ -1,4 +1,8 @@
 const { fn } = require('../function/module.f.cjs')
+const rangeMap = require('../range_map/module.f.cjs')
+const sortedSet = require('../sorted_set/module.f.cjs')
+const list = require('../list/module.f.cjs')
+const { reverse, countdown, flat, map } = list
 
 /** @typedef {bigint} ByteSet */
 /** @typedef {number} Byte */
@@ -42,6 +46,20 @@ const setRange = fn(range).then(union).result
 /** @type {(n: Byte) => (s: ByteSet) => ByteSet} */
 const unset = n => s => difference(s)(one(n))
 
+const counter = reverse(countdown(256))
+
+/** @type {(n: ByteSet) => (s: string) => (i: number) => rangeMap.RangeMap<sortedSet.SortedSet<string>>} */
+const toRangeMapOp = n => s => i =>
+{
+    const current = has(i + 1)(n)
+    const prev = has(i)(n)
+    if (current === prev) { return undefined }
+    return [[prev ? [s] : [], i]]
+}
+
+/** @type {(n: ByteSet) => (s: string) => rangeMap.RangeMap<sortedSet.SortedSet<string>>} */
+const toRangeMap = n => s => flat(map(toRangeMapOp(n)(s))(counter))
+
 module.exports = {
     /** @readonly */
     empty,
@@ -61,4 +79,6 @@ module.exports = {
     range,
     /** @readonly */
     complement,
+    /** @readonly */
+    toRangeMap,
 }

package/types/byte_set/test.f.cjs

@@ -1,5 +1,11 @@
 const _ = require('./module.f.cjs')
 const { every, countdown, map } = require('../list/module.f.cjs')
+const json = require('../../json/module.f.cjs')
+const { sort } = require('../object/module.f.cjs')
+const { toArray } = require('../list/module.f.cjs')
+
+/** @type {(a: readonly json.Unknown[]) => string} */
+const stringify = a => json.stringify(sort)(a)
 
 module.exports = {
     has: [
@@ -52,5 +58,25 @@ module.exports = {
             const r = _.complement(_.universe)
             if (r !== _.empty) { throw r }
         },
-    }
+    },
+    toRangeMap: [
+        () => {
+            const result = stringify(toArray(_.toRangeMap(_.empty)('a')))
+            if (result !== '[]') { throw result }
+        },
+        () => {
+            const s = _.set(0)(_.empty)
+            const result = stringify(toArray(_.toRangeMap(s)('a')))
+            if (result !== '[[["a"],0]]') { throw result }
+        },
+        () => {
+            const s = _.setRange([1,2])(_.empty)
+            const result = stringify(toArray(_.toRangeMap(s)('a')))
+            if (result !== '[[[],0],[["a"],2]]') { throw result }
+        },
+        () => {
+            const result = stringify(toArray(_.toRangeMap(_.universe)('a')))
+            if (result !== '[[["a"],255]]') { throw result }
+        },
+    ]
 }