functionalscript 0.0.457 → 0.0.458

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.458",
   "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 }
+        },
+    ]
 }