functionalscript 0.3.15 → 0.4.1

package/commonjs/build/test.f.js

@@ -1,92 +0,0 @@
-import * as _ from "./module.f.js";
-import * as map from "../../types/map/module.f.js";
-import { at } from "../../types/object/module.f.js";
-const compileMap = {
-    ':index.js': [
-        'ok',
-        require_ => m0 => {
-            let [r, m] = require_('./b')(m0);
-            if (r[0] === 'error') {
-                throw JSON.stringify(r);
-            }
-            [r, m] = require_('./a/')(m);
-            if (r[0] === 'error') {
-                throw JSON.stringify(r);
-            }
-            [r, m] = require_('x/r')(m);
-            if (r[0] === 'error') {
-                throw JSON.stringify(r);
-            }
-            return [['ok', ':index.js'], m];
-        }
-    ],
-    ':b.js': [
-        'ok',
-        () => m0 => [['ok', ':b.js'], m0]
-    ],
-    ':a/index.js': [
-        'ok',
-        () => m0 => [['ok', ':a/index.js'], m0]
-    ],
-    'x:r.js': [
-        'ok',
-        () => m0 => [['ok', 'x:r.js'], m0]
-    ],
-};
-const compile = source => compileMap[source] ?? ['error', 'invalid source'];
-const packageMap = {
-    '': {
-        dependencies: {
-            'x': '/node_modules/x'
-        },
-        files: {
-            'index.js': ':index.js',
-            'b.js': ':b.js',
-            'a/index.js': ':a/index.js',
-        }
-    },
-    '/node_modules/x': {
-        dependencies: {},
-        files: {
-            'r.js': 'x:r.js'
-        }
-    },
-};
-const packageGet = packageId => {
-    const p = at(packageId)(packageMap);
-    return p === null ? null :
-        {
-            dependency: dependency => at(dependency)(p.dependencies),
-            file: file => at(file)(p.files),
-        };
-};
-const getOrBuild = _.getOrBuild(compile)(packageGet)(map);
-export default () => {
-    let [r, m] = getOrBuild({ package: '', path: ['index.js'] })(map.empty);
-    {
-        if (r === null) {
-            throw 'r === null';
-        }
-        const x = JSON.stringify(r);
-        if (x !==
-            '["ok",{"exports":":index.js","requireMap":{"./a/":"/a/index.js","./b":"/b.js","x/r":"/node_modules/x/r.js"}}]') {
-            throw `0:${x}`;
-        }
-    }
-    {
-        [r, m] = getOrBuild({ package: '', path: ['b.js'] })(m);
-        const x = JSON.stringify(r);
-        if (x !==
-            '["ok",{"exports":":b.js","requireMap":{}}]') {
-            throw x;
-        }
-    }
-    {
-        [r, m] = getOrBuild({ package: '', path: ['c.js'] })(m);
-        const x = JSON.stringify(r);
-        if (x !==
-            '["error",["file not found"]]') {
-            throw x;
-        }
-    }
-};

package/commonjs/module/function/module.f.d.ts

@@ -1,8 +0,0 @@
-/**
- * An IO interface for creating and running module functions.
- */
-import type * as TypesResult from '../../../types/result/module.f.ts';
-export type Function_ = <M>(require: Require<M>) => (prior: M) => Result<M>;
-export type Result<M> = readonly [TypesResult.Result<unknown, unknown>, M];
-export type Require<M> = (path: string) => (prior: M) => Result<M>;
-export type Compile = (source: string) => TypesResult.Result<Function_, unknown>;

package/commonjs/module/function/module.f.js

@@ -1,4 +0,0 @@
-/**
- * An IO interface for creating and running module functions.
- */
-export {};

package/commonjs/module/module.f.d.ts

@@ -1,18 +0,0 @@
-import type * as O from '../../types/object/module.f.ts';
-export type MapInterface<M> = {
-    readonly at: (moduleId: string) => (moduleMap: M) => State | null;
-    readonly setReplace: (moduleId: string) => (moduleState: State) => (moduleMap: M) => M;
-};
-export type State = readonly ['ok', Module] | readonly ['error', Error];
-type Module = {
-    readonly exports: unknown;
-    readonly requireMap: O.Map<string>;
-};
-export type Error = ['file not found'] | ['compilation error', unknown] | ['runtime error', unknown] | ['circular reference'];
-export type Id = {
-    readonly package: string;
-    readonly path: readonly string[];
-};
-export declare const dir: (id: Id) => Id | null;
-export declare const idToString: (id: Id) => string;
-export {};

package/commonjs/module/module.f.js

@@ -1,11 +0,0 @@
-export const dir = (id) => {
-    const len = id.path.length;
-    if (len < 1) {
-        return null;
-    }
-    return {
-        package: id.package,
-        path: id.path.slice(0, len - 1)
-    };
-};
-export const idToString = (id) => `${id.package}/${id.path.join('/')}`;

package/commonjs/module.f.d.ts

@@ -1,6 +0,0 @@
-type PackageMap = (packageName: string) => PackageMap | Package | null;
-type Package = readonly [
-    string,
-    PackageMap,
-    (fileName: string) => string | null
-];

package/commonjs/module.f.js

@@ -1 +0,0 @@
-"use strict";

package/commonjs/package/dependencies/module.f.d.ts

@@ -1,7 +0,0 @@
-import { type Unknown } from '../../../json/module.f.ts';
-type DependencyMapJson = {
-    readonly [k in string]: string;
-};
-export type DependenciesJson = DependencyMapJson | null;
-export declare const isDependenciesJson: (j: Unknown) => j is DependenciesJson;
-export {};

package/commonjs/package/dependencies/module.f.js

@@ -1,13 +0,0 @@
-import { isObject } from "../../../json/module.f.js";
-import { map, every } from "../../../types/list/module.f.js";
-const { entries } = Object;
-const isDependencyJson = ([, v]) => typeof v === 'string';
-export const isDependenciesJson = (j) => {
-    if (j === null) {
-        return true;
-    }
-    if (!isObject(j)) {
-        return false;
-    }
-    return every(map(isDependencyJson)(entries(j)));
-};

package/commonjs/package/dependencies/test.f.d.ts

@@ -1,2 +0,0 @@
-declare const _default: () => void;
-export default _default;

package/commonjs/package/dependencies/test.f.js

@@ -1,15 +0,0 @@
-import * as _ from "./module.f.js";
-export default () => {
-    if (!_.isDependenciesJson(null)) {
-        throw 'error';
-    }
-    if (!_.isDependenciesJson({})) {
-        throw 'error';
-    }
-    if (!_.isDependenciesJson({ 'a': 'b' })) {
-        throw 'error';
-    }
-    if (_.isDependenciesJson({ 'a': 12 })) {
-        throw 'error';
-    }
-};

package/commonjs/package/module.f.d.ts

@@ -1,17 +0,0 @@
-import { type Unknown } from '../../json/module.f.ts';
-import { type DependenciesJson } from './dependencies/module.f.ts';
-type PackageJson = {
-    readonly name: string;
-    readonly version: string;
-    readonly dependencies?: DependenciesJson;
-};
-export declare const isPackageJson: (j: Unknown) => j is PackageJson;
-export type Package = {
-    readonly dependency: (localPackageId: string) => string | null;
-    readonly file: (localFileId: string) => string | null;
-};
-/**
- * @note Current package has an empty string '' as a packageId.
- */
-export type Get = (packageId: string) => Package | null;
-export {};

package/commonjs/package/module.f.js

@@ -1,18 +0,0 @@
-import { isObject } from "../../json/module.f.js";
-import { isDependenciesJson } from "./dependencies/module.f.js";
-import { at } from "../../types/object/module.f.js";
-export const isPackageJson = (j) => {
-    if (!isObject(j)) {
-        return false;
-    }
-    if (typeof j.name !== 'string') {
-        return false;
-    }
-    if (typeof j.version !== 'string') {
-        return false;
-    }
-    if (!isDependenciesJson(at('dependencies')(j))) {
-        return false;
-    }
-    return true;
-};

package/commonjs/package/test.f.d.ts

@@ -1,2 +0,0 @@
-declare const _default: () => void;
-export default _default;

package/commonjs/package/test.f.js

@@ -1,27 +0,0 @@
-import * as _ from "./module.f.js";
-export default () => {
-    if (_.isPackageJson(null)) {
-        throw 'error';
-    }
-    if (_.isPackageJson({})) {
-        throw 'error';
-    }
-    if (_.isPackageJson({ name: 'x', version: 12 })) {
-        throw 'error';
-    }
-    if (!_.isPackageJson({ name: 'x', version: "12" })) {
-        throw 'error';
-    }
-    if (_.isPackageJson({ version: "", dependencies: [] })) {
-        throw 'error';
-    }
-    if (!_.isPackageJson({ name: 'a', version: "", dependencies: {} })) {
-        throw 'error';
-    }
-    if (_.isPackageJson({ name: 'b', version: "", dependencies: { x: 12 } })) {
-        throw 'error';
-    }
-    if (!_.isPackageJson({ name: 'c', version: "", dependencies: { x: "12" } })) {
-        throw 'error';
-    }
-};

package/commonjs/path/module.f.d.ts

@@ -1,24 +0,0 @@
-import { type List } from '../../types/list/module.f.ts';
-import type * as Package from '../package/module.f.ts';
-import type * as Module from '../module/module.f.ts';
-type Items = readonly string[];
-type LocalPath = {
-    readonly external: boolean;
-    readonly dir: boolean;
-    readonly items: Items;
-};
-export declare const parseLocal: (local: string) => (path: string) => LocalPath | null;
-export type Path = {
-    readonly package: string;
-    readonly items: Items;
-    readonly dir: boolean;
-};
-export declare const parseGlobal: (d: (local: string) => string | null) => (dir: boolean) => (items: List<string>) => Path | null;
-export declare const parse: (packageId: string) => (dependencies: (local: string) => string | null) => (local: string) => (path: string) => Path | null;
-export type FoundResult = {
-    readonly id: Module.Id;
-    readonly source: string;
-};
-export type Result = FoundResult | null;
-export declare const parseAndFind: (packageGet: Package.Get) => (moduleId: Module.Id) => (path: string) => Result;
-export {};

package/commonjs/path/module.f.js

@@ -1,112 +0,0 @@
-import { next, fold, reverse, first, flat, toArray, filterMap, isEmpty, concat, empty } from "../../types/list/module.f.js";
-import { join } from "../../types/string/module.f.js";
-const split = path => path.split('/');
-const normItemsOp = (first) => (prior) => {
-    if (prior === null) {
-        return null;
-    }
-    const tail = prior[0];
-    switch (first) {
-        case '':
-        case '.': {
-            return prior;
-        }
-        case '..': {
-            const result = next(tail);
-            if (result === null) {
-                return null;
-            }
-            return [result.tail];
-        }
-        default: {
-            return [{ first, tail }];
-        }
-    }
-};
-const normItems = (items) => {
-    const result = fold(normItemsOp)([empty])(items);
-    return result === null ? result : [reverse(result[0])];
-};
-const firstNull = first(null);
-export const parseLocal = (local) => {
-    const fSeq = (path) => {
-        const pathSeq = split(path);
-        const dir = [null, '', '.', '..'].includes(pathSeq[pathSeq.length - 1]);
-        return ['.', '..'].includes(firstNull(pathSeq)) ?
-            [false, dir, flat([split(local), pathSeq])] :
-            [true, dir, pathSeq];
-    };
-    return path => {
-        const [external, dir, items] = fSeq(path);
-        const n = normItems(items);
-        if (n === null) {
-            return null;
-        }
-        return {
-            external,
-            dir,
-            items: toArray(n[0])
-        };
-    };
-};
-const variants = (prior) => () => {
-    const [a, b] = prior;
-    const r = next(b);
-    if (r === empty) {
-        return empty;
-    }
-    const { first, tail } = r;
-    const n = [a === null ? first : `${a}/${first}`, tail];
-    return { first: n, tail: variants(n) };
-};
-const mapDependency = (d) => ([external, internal]) => {
-    const id = d(external);
-    return id === null ? null : [id, internal];
-};
-export const parseGlobal = dependencies => {
-    const fMap = filterMap(mapDependency(dependencies));
-    return dir => items => {
-        const v = variants([null, items]);
-        const r = firstNull(fMap(v));
-        if (r === null) {
-            return null;
-        }
-        return { package: r[0], items: toArray(r[1]), dir };
-    };
-};
-export const parse = packageId => dependencies => {
-    const pg = parseGlobal(dependencies);
-    return local => path => {
-        const parsed = parseLocal(local)(path);
-        if (parsed === null) {
-            return null;
-        }
-        const { external, dir, items } = parsed;
-        if (!external) {
-            return { package: packageId, items, dir };
-        }
-        return pg(dir)(items);
-    };
-};
-export const parseAndFind = packageGet => moduleId => path => {
-    const currentPack = packageGet(moduleId.package);
-    if (currentPack === null) {
-        return null;
-    }
-    const p = parse(moduleId.package)(currentPack.dependency)(moduleId.path.join('/'))(path);
-    if (p === null) {
-        return null;
-    }
-    const pack = packageGet(p.package);
-    if (pack === null) {
-        return null;
-    }
-    const tryFile = file => {
-        const source = pack.file(file);
-        return source === null ? null : { id: { package: p.package, path: file.split('/') }, source };
-    };
-    const file = p.items.join('/');
-    const indexJs = join('/')(concat(p.items)(['index.js']));
-    const fileList = p.dir || isEmpty(p.items) ? [indexJs] : [file, `${file}.js`, indexJs];
-    return firstNull(filterMap(tryFile)(fileList));
-};

package/commonjs/path/test.f.d.ts

@@ -1,25 +0,0 @@
-declare const _default: {
-    0: () => void;
-    1: () => void;
-    2: () => void;
-    3: () => void;
-    4: () => void;
-    5: () => void;
-    6: () => void;
-    7: () => void;
-    8: {
-        0: () => void;
-        1: () => void;
-        2: () => void;
-        3: () => void;
-        4: () => void;
-        5: () => void;
-        6: () => void;
-        7: () => void;
-    };
-    9: () => void;
-    10: () => void;
-    11: () => void;
-    12: () => void;
-};
-export default _default;

package/commonjs/path/test.f.js

@@ -1,221 +0,0 @@
-import * as _ from "./module.f.js";
-import { todo } from "../../dev/module.f.js";
-import * as json from "../../json/module.f.js";
-import { identity } from "../../types/function/module.f.js";
-import { at } from "../../types/object/module.f.js";
-const i = (o) => (s) => at(s)(o);
-const stringify = json.stringify(identity);
-export default {
-    0: () => {
-        const result = _.parseLocal('')('./a');
-        if (stringify(result) !== '{"external":false,"dir":false,"items":["a"]}') {
-            throw result;
-        }
-    },
-    1: () => {
-        const result = _.parseLocal('')('./a/');
-        if (stringify(result) !== '{"external":false,"dir":true,"items":["a"]}') {
-            throw result;
-        }
-    },
-    2: () => {
-        const result = _.parseLocal('')('..');
-        if (result !== null) {
-            throw result;
-        }
-    },
-    3: () => {
-        const result = _.parseLocal('a')('');
-        if (stringify(result) !== '{"external":true,"dir":true,"items":[]}') {
-            throw result;
-        }
-    },
-    4: () => {
-        const result = _.parseLocal('')('./a/b/.././c');
-        if (stringify(result) !== '{"external":false,"dir":false,"items":["a","c"]}') {
-            throw result;
-        }
-    },
-    5: () => {
-        const result = _.parseLocal('x/r')('./a/b/.././c');
-        if (stringify(result) !== '{"external":false,"dir":false,"items":["x","r","a","c"]}') {
-            throw result;
-        }
-    },
-    6: () => {
-        const result = _.parseLocal('a')('a/b/.././c');
-        if (stringify(result) !== '{"external":true,"dir":false,"items":["a","c"]}') {
-            throw result;
-        }
-    },
-    7: () => {
-        const result = _.parseLocal('')('./x/..');
-        if (stringify(result) !== '{"external":false,"dir":true,"items":[]}') {
-            throw result;
-        }
-    },
-    8: {
-        0: () => { if (_.parseGlobal(() => null)(false)(['a', 'b']) !== null) {
-            throw 'error';
-        } },
-        1: () => { if (_.parseGlobal(() => null)(false)(['b']) !== null) {
-            throw 'error';
-        } },
-        2: () => { if (_.parseGlobal(i({ b: 'x' }))(false)(['d']) !== null) {
-            throw 'error';
-        } },
-        3: () => {
-            const result = stringify(_.parseGlobal(i({ b: 'x' }))(false)(['b']));
-            if (result !== '{"package":"x","items":[],"dir":false}') {
-                throw result;
-            }
-        },
-        4: () => { if (_.parseGlobal(i({ 'b/r': 'x' }))(false)(['b']) !== null) {
-            throw 'error';
-        } },
-        5: () => {
-            const result = stringify(_.parseGlobal(i({ 'b/r': 'x' }))(false)(['b', 'r']));
-            if (result !== '{"package":"x","items":[],"dir":false}') {
-                throw result;
-            }
-        },
-        6: () => {
-            const result = stringify(_.parseGlobal(i({ 'b/r': 'x' }))(false)(['b', 'r', 'd', 't']));
-            if (result !== '{"package":"x","items":["d","t"],"dir":false}') {
-                throw result;
-            }
-        },
-        7: () => {
-            const result = stringify(_.parseGlobal(i({ 'b/r': 'x' }))(true)(['b', 'r', 'd', 't']));
-            if (result !== '{"package":"x","items":["d","t"],"dir":true}') {
-                throw result;
-            }
-        },
-    },
-    9: () => {
-        const packages = {
-            '': {
-                dependency: () => todo(),
-                file: i({ 'a/c': 'return "a/c"' }),
-            }
-        };
-        const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('../c'));
-        if (result !== '{"id":{"package":"","path":["a","c"]},"source":"return \\"a/c\\""}') {
-            throw result;
-        }
-    },
-    10: () => {
-        const packages = {
-            '': {
-                dependency: x => {
-                    const path = `node_modules/${x}`;
-                    return at(path)(packages) !== null ? path : null;
-                },
-                file: i({
-                    'index.js': 'return "index.js"',
-                    'x/index.js': 'return "x/index.js"',
-                    'x.js': 'return "x.js"',
-                })
-            },
-            'node_modules/z': {
-                dependency: () => todo(),
-                file: i({ 'a/c/index.js': 'return "a/c"' }),
-            }
-        };
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('z/a/c'));
-            if (result !== '{"id":{"package":"node_modules/z","path":["a","c","index.js"]},"source":"return \\"a/c\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('../..'));
-            if (result !== '{"id":{"package":"","path":["index.js"]},"source":"return \\"index.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: [] })('./x'));
-            if (result !== '{"id":{"package":"","path":["x.js"]},"source":"return \\"x.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: [] })('./x.js'));
-            if (result !== '{"id":{"package":"","path":["x.js"]},"source":"return \\"x.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: [] })('./x/'));
-            if (result !== '{"id":{"package":"","path":["x","index.js"]},"source":"return \\"x/index.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['x', 'a'] })('../'));
-            if (result !== '{"id":{"package":"","path":["x","index.js"]},"source":"return \\"x/index.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['x', 'a'] })('..'));
-            if (result !== '{"id":{"package":"","path":["x","index.js"]},"source":"return \\"x/index.js\\""}') {
-                throw result;
-            }
-        }
-    },
-    11: () => {
-        const packages = {
-            '': {
-                dependency: x => {
-                    const path = `node_modules/${x}`;
-                    return at(path)(packages) !== null ? path : null;
-                },
-                file: todo
-            },
-            'node_modules/z/a': {
-                dependency: () => todo(),
-                file: i({
-                    'c/index.js': 'return "c/index.js"',
-                    'c.js': 'return "c.js"'
-                }),
-            }
-        };
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('z/a/c'));
-            if (result !== '{"id":{"package":"node_modules/z/a","path":["c.js"]},"source":"return \\"c.js\\""}') {
-                throw result;
-            }
-        }
-        {
-            const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('z/a/c/'));
-            if (result !== '{"id":{"package":"node_modules/z/a","path":["c","index.js"]},"source":"return \\"c/index.js\\""}') {
-                throw result;
-            }
-        }
-    },
-    12: () => {
-        const packages = {
-            '': {
-                dependency: x => {
-                    const path = `node_modules/${x}`;
-                    return at(path)(packages) !== null ? path : null;
-                },
-                file: todo
-            },
-            'node_modules/z/a/c': {
-                dependency: () => todo(),
-                file: i({
-                    '': 'throw',
-                    '.js': 'throw',
-                    'index.js': 'return "a/c"'
-                }),
-            }
-        };
-        const result = stringify(_.parseAndFind(i(packages))({ package: '', path: ['a', 'b'] })('z/a/c'));
-        if (result !== '{"id":{"package":"node_modules/z/a/c","path":["index.js"]},"source":"return \\"a/c\\""}') {
-            throw result;
-        }
-    }
-};