@mojir/lits 2.0.15 → 2.0.16

package/dist/cli/reference/api.d.ts

@@ -8,7 +8,7 @@ export declare const api: {
     readonly object: readonly ["dissoc", "object", "keys", "vals", "entries", "find", "merge", "merge_with", "zipmap", "select_keys"];
     readonly predicate: readonly ["boolean?", "nil?", "number?", "string?", "function?", "integer?", "array?", "object?", "coll?", "seq?", "regexp?", "zero?", "pos?", "neg?", "even?", "odd?", "finite?", "nan?", "negative_infinity?", "positive_infinity?", "false?", "true?", "empty?", "not_empty?"];
     readonly regularExpression: readonly ["regexp", "match", "replace"];
-    readonly specialExpressions: readonly ["&&", "||", "def", "defs", "let", "if_let", "when_let", "when_first", "fn", "defn", "defns", "try", "throw", "if", "if_not", "cond", "switch", "when", "when_not", "comment", "do", "recur", "loop", "doseq", "for", "declared?", "??"];
+    readonly specialExpressions: readonly ["&&", "||", "def", "defs", "let", "fn", "defn", "defns", "try", "throw", "if", "unless", "cond", "switch", "comment", "do", "recur", "loop", "doseq", "for", "defined?", "??"];
     readonly string: readonly ["subs", "string_repeat", "str", "number", "lower_case", "upper_case", "trim", "trim_left", "trim_right", "pad_left", "pad_right", "split", "template", "to_char_code", "from_char_code", "encode_base64", "decode_base64", "encode_uri_component", "decode_uri_component", "join", "++"];
     readonly bitwise: readonly ["<<", ">>", ">>>", "~", "&", "&!", "|", "^", "bit_flip", "bit_clear", "bit_set", "bit_test"];
     readonly assert: readonly ["assert", "assert=", "assert!=", "assert_equal", "assert_not_equal", "assert_gt", "assert_lt", "assert_gte", "assert_lte", "assert_true", "assert_false", "assert_truthy", "assert_falsy", "assert_null", "assert_throws", "assert_throws_error", "assert_not_throws"];
@@ -31,7 +31,7 @@ export type AssertApiName = typeof api.assert[number];
 export type FunctionName = CollectionApiName | ArrayApiName | SequenceApiName | MathApiName | FunctionalApiName | MiscApiName | ObjectApiName | PredicateApiName | RegularExpressionApiName | SpecialExpressionsApiName | StringApiName | BitwiseApiName | AssertApiName;
 export type ShorthandName = typeof api.shorthand[number];
 export type DatatypeName = typeof api.datatype[number];
-declare const apiNames: readonly ["count", "get", "get_in", "contains?", "has?", "has_some?", "has_every?", "assoc", "assoc_in", "concat", "not_empty", "every?", "not_every?", "any?", "not_any?", "update", "update_in", "array", "range", "repeat", "flatten", "mapcat", "nth", "push", "pop", "unshift", "shift", "slice", "reductions", "reduce", "reduce_right", "map", "filter", "position", "index_of", "some", "reverse", "first", "second", "last", "rest", "nthrest", "next", "nthnext", "take", "take_last", "take_while", "drop", "drop_last", "drop_while", "sort", "sort_by", "distinct", "remove", "remove_at", "split_at", "split_with", "frequencies", "group_by", "partition", "partition_all", "partition_by", "+", "-", "*", "/", "mod", "%", "quot", "inc", "dec", "sqrt", "cbrt", "**", "exp", "round", "trunc", "floor", "ceil", "min", "max", "abs", "sign", "positive_infinity", "negative_infinity", "max_safe_integer", "min_safe_integer", "max_value", "min_value", "epsilon", "nan", "e", "pi", "log", "log2", "log10", "sin", "cos", "tan", "asin", "acos", "atan", "sinh", "cosh", "tanh", "asinh", "acosh", "atanh", "apply", "identity", "partial", "comp", "constantly", "juxt", "complement", "every_pred", "some_pred", "fnil", "!=", "==", "<", ">", "<=", ">=", "!", "write!", "iso_date>epoch", "epoch>iso_date", "boolean", "compare", "equal?", "json_parse", "json_stringify", "dissoc", "object", "keys", "vals", "entries", "find", "merge", "merge_with", "zipmap", "select_keys", "boolean?", "nil?", "number?", "string?", "function?", "integer?", "array?", "object?", "coll?", "seq?", "regexp?", "zero?", "pos?", "neg?", "even?", "odd?", "finite?", "nan?", "negative_infinity?", "positive_infinity?", "false?", "true?", "empty?", "not_empty?", "regexp", "match", "replace", "&&", "||", "def", "defs", "let", "if_let", "when_let", "when_first", "fn", "defn", "defns", "try", "throw", "if", "if_not", "cond", "switch", "when", "when_not", "comment", "do", "recur", "loop", "doseq", "for", "declared?", "??", "subs", "string_repeat", "str", "number", "lower_case", "upper_case", "trim", "trim_left", "trim_right", "pad_left", "pad_right", "split", "template", "to_char_code", "from_char_code", "encode_base64", "decode_base64", "encode_uri_component", "decode_uri_component", "join", "++", "<<", ">>", ">>>", "~", "&", "&!", "|", "^", "bit_flip", "bit_clear", "bit_set", "bit_test", "assert", "assert=", "assert!=", "assert_equal", "assert_not_equal", "assert_gt", "assert_lt", "assert_gte", "assert_lte", "assert_true", "assert_false", "assert_truthy", "assert_falsy", "assert_null", "assert_throws", "assert_throws_error", "assert_not_throws", "-short-regexp", "-short-fn", "-short-string", "-short-dot", "-short-hash", "-type-number", "-type-string", "-type-object", "-type-array", "-type-boolean", "-type-function", "-type-integer", "-type-any", "-type-nil", "-type-collection", "-type-sequence", "-type-regexp", "-type-never"];
+declare const apiNames: readonly ["count", "get", "get_in", "contains?", "has?", "has_some?", "has_every?", "assoc", "assoc_in", "concat", "not_empty", "every?", "not_every?", "any?", "not_any?", "update", "update_in", "array", "range", "repeat", "flatten", "mapcat", "nth", "push", "pop", "unshift", "shift", "slice", "reductions", "reduce", "reduce_right", "map", "filter", "position", "index_of", "some", "reverse", "first", "second", "last", "rest", "nthrest", "next", "nthnext", "take", "take_last", "take_while", "drop", "drop_last", "drop_while", "sort", "sort_by", "distinct", "remove", "remove_at", "split_at", "split_with", "frequencies", "group_by", "partition", "partition_all", "partition_by", "+", "-", "*", "/", "mod", "%", "quot", "inc", "dec", "sqrt", "cbrt", "**", "exp", "round", "trunc", "floor", "ceil", "min", "max", "abs", "sign", "positive_infinity", "negative_infinity", "max_safe_integer", "min_safe_integer", "max_value", "min_value", "epsilon", "nan", "e", "pi", "log", "log2", "log10", "sin", "cos", "tan", "asin", "acos", "atan", "sinh", "cosh", "tanh", "asinh", "acosh", "atanh", "apply", "identity", "partial", "comp", "constantly", "juxt", "complement", "every_pred", "some_pred", "fnil", "!=", "==", "<", ">", "<=", ">=", "!", "write!", "iso_date>epoch", "epoch>iso_date", "boolean", "compare", "equal?", "json_parse", "json_stringify", "dissoc", "object", "keys", "vals", "entries", "find", "merge", "merge_with", "zipmap", "select_keys", "boolean?", "nil?", "number?", "string?", "function?", "integer?", "array?", "object?", "coll?", "seq?", "regexp?", "zero?", "pos?", "neg?", "even?", "odd?", "finite?", "nan?", "negative_infinity?", "positive_infinity?", "false?", "true?", "empty?", "not_empty?", "regexp", "match", "replace", "&&", "||", "def", "defs", "let", "fn", "defn", "defns", "try", "throw", "if", "unless", "cond", "switch", "comment", "do", "recur", "loop", "doseq", "for", "defined?", "??", "subs", "string_repeat", "str", "number", "lower_case", "upper_case", "trim", "trim_left", "trim_right", "pad_left", "pad_right", "split", "template", "to_char_code", "from_char_code", "encode_base64", "decode_base64", "encode_uri_component", "decode_uri_component", "join", "++", "<<", ">>", ">>>", "~", "&", "&!", "|", "^", "bit_flip", "bit_clear", "bit_set", "bit_test", "assert", "assert=", "assert!=", "assert_equal", "assert_not_equal", "assert_gt", "assert_lt", "assert_gte", "assert_lte", "assert_true", "assert_false", "assert_truthy", "assert_falsy", "assert_null", "assert_throws", "assert_throws_error", "assert_not_throws", "-short-regexp", "-short-fn", "-short-string", "-short-dot", "-short-hash", "-type-number", "-type-string", "-type-object", "-type-array", "-type-boolean", "-type-function", "-type-integer", "-type-any", "-type-nil", "-type-collection", "-type-sequence", "-type-regexp", "-type-never"];
 export type ApiName = typeof apiNames[number];
 export declare function isApiName(arg: string): arg is ApiName;
 export declare const categoryRecord: {

package/dist/cli/src/analyze/index.d.ts

@@ -8,10 +8,8 @@ export interface UnresolvedIdentifier {
     token: Token | undefined;
 }
 export type UnresolvedIdentifiers = Set<UnresolvedIdentifier>;
-export type Outcomes = unknown[];
 export interface Analysis {
     unresolvedIdentifiers: UnresolvedIdentifiers;
-    outcomes: Outcomes | null;
 }
 export type FindUnresolvedIdentifiers = (ast: Ast | AstNode[], contextStack: ContextStack, builtin: Builtin) => UnresolvedIdentifiers;
 export declare function analyze(ast: Ast, params: LitsParams): Analysis;

package/dist/cli/src/builtin/index.d.ts

@@ -13,23 +13,18 @@ declare const specialExpressions: {
     readonly for: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/loops").ForNode>;
     readonly fn: import("./interface").BuiltinSpecialExpression<import("..").LitsFunction, import("./specialExpressions/functions").FnNode>;
     readonly if: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/if").IfNode>;
-    readonly if_let: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/if_let").IfLetNode>;
-    readonly if_not: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/if_not").IfNotNode>;
+    readonly unless: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/unless").UnlessNode>;
     readonly let: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/let").LetNode>;
     readonly loop: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/loop").LoopNode>;
     readonly '||': import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/or").OrNode>;
     readonly recur: import("./interface").BuiltinSpecialExpression<null, import("./specialExpressions/recur").RecurNode>;
     readonly throw: import("./interface").BuiltinSpecialExpression<null, import("./specialExpressions/throw").ThrowNode>;
     readonly try: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/try").TryNode>;
-    readonly when: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/when").WhenNode>;
-    readonly when_first: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/when_first").WhenFirstNode>;
-    readonly when_let: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/when_let").WhenLetNode>;
-    readonly when_not: import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/when_not").WhenNotNode>;
-    readonly 'declared?': import("./interface").BuiltinSpecialExpression<boolean, import("./specialExpressions/declared").DeclaredNode>;
+    readonly 'defined?': import("./interface").BuiltinSpecialExpression<boolean, import("./specialExpressions/declared").DeclaredNode>;
     readonly '??': import("./interface").BuiltinSpecialExpression<import("../interface").Any, import("./specialExpressions/qq").QqNode>;
 };
 export type SpecialExpressionName = keyof typeof specialExpressions;
-export type CommonSpecialExpressionName = keyof Pick<typeof specialExpressions, '??' | '&&' | 'comment' | 'cond' | 'switch' | 'declared?' | 'do' | 'if' | 'if_not' | '||' | 'when' | 'when_not' | 'throw'>;
+export type CommonSpecialExpressionName = keyof Pick<typeof specialExpressions, '??' | '&&' | 'comment' | 'cond' | 'switch' | 'defined?' | 'do' | 'if' | 'unless' | '||' | 'throw'>;
 export type BuiltinSpecialExpressions = typeof specialExpressions;
 export type BuiltinSpecialExpression = typeof specialExpressions[SpecialExpressionName];
 export type BuiltinCommonSpecialExpression = typeof specialExpressions[CommonSpecialExpressionName];

package/dist/cli/src/builtin/specialExpressions/declared.d.ts

@@ -1,5 +1,5 @@
 import type { CommonSpecialExpressionNode } from '../../parser/interface';
 import type { BuiltinSpecialExpression } from '../interface';
-export interface DeclaredNode extends CommonSpecialExpressionNode<'declared?'> {
+export interface DeclaredNode extends CommonSpecialExpressionNode<'defined?'> {
 }
 export declare const declaredSpecialExpression: BuiltinSpecialExpression<boolean, DeclaredNode>;

package/dist/cli/src/builtin/specialExpressions/try.d.ts

@@ -2,7 +2,7 @@ import type { Any } from '../../interface';
 import type { AstNode, CommonSpecialExpressionNode, SymbolNode } from '../../parser/interface';
 import type { BuiltinSpecialExpression } from '../interface';
 export interface TryNode extends CommonSpecialExpressionNode<'try'> {
-    e: SymbolNode;
+    e: SymbolNode | undefined;
     ce: AstNode;
 }
 export declare const trySpecialExpression: BuiltinSpecialExpression<Any, TryNode>;

package/dist/{src/builtin/specialExpressions/if_not.d.ts → cli/src/builtin/specialExpressions/unless.d.ts}

@@ -1,6 +1,6 @@
 import type { Any } from '../../interface';
 import type { CommonSpecialExpressionNode } from '../../parser/interface';
 import type { BuiltinSpecialExpression } from '../interface';
-export interface IfNotNode extends CommonSpecialExpressionNode<'if_not'> {
+export interface UnlessNode extends CommonSpecialExpressionNode<'unless'> {
 }
-export declare const ifNotSpecialExpression: BuiltinSpecialExpression<Any, IfNotNode>;
+export declare const unlessSpecialExpression: BuiltinSpecialExpression<Any, UnlessNode>;

package/dist/cli/src/evaluator/ContextStack.d.ts

@@ -16,6 +16,8 @@ export declare class ContextStackImpl {
         nativeJsFunctions?: Record<string, NativeJsFunction>;
     });
     create(context: Context, extraData?: ExtraData): ContextStack;
+    exportValue(name: string, value: Any): void;
+    addValue(name: string, value: Any): void;
     clone(): ContextStack;
     getValue(name: string): unknown;
     lookUp(node: SymbolNode): LookUpResult;

package/dist/cli/src/parser/AlgebraicParser.d.ts

@@ -3,6 +3,7 @@ import type { DefNode } from '../builtin/specialExpressions/def';
 import type { DefnNode } from '../builtin/specialExpressions/functions';
 import type { IfNode } from '../builtin/specialExpressions/if';
 import type { SwitchNode } from '../builtin/specialExpressions/switch';
+import type { UnlessNode } from '../builtin/specialExpressions/unless';
 import type { Arity, FunctionArguments } from '../builtin/utils';
 import type { A_SymbolToken } from '../tokenizer/algebraic/algebraicTokens';
 import type { TokenStream } from '../tokenizer/interface';
@@ -26,14 +27,18 @@ export declare class AlgebraicParser {
     };
     private parseShorthandLamdaFunction;
     private parseLet;
-    private parseFor;
+    private parseDo;
+    private parseLoop;
+    private parseTry;
+    private parseForOrDoseq;
     private parseForLoopBinding;
     private parseBinding;
-    parseIf(token: A_SymbolToken): IfNode;
+    parseIfOrUnless(token: A_SymbolToken): IfNode | UnlessNode;
     parseCond(token: A_SymbolToken): CondNode;
     parseSwitch(token: A_SymbolToken): SwitchNode;
     parseDef(token: A_SymbolToken): DefNode;
     parseDefn(token: A_SymbolToken): DefnNode;
     private isAtEnd;
+    private isAtExpressionEnd;
     private peek;
 }

package/dist/cli/src/tokenizer/algebraic/algebraicReservedNames.d.ts

@@ -31,20 +31,16 @@ declare const validAlgebraicReservedNamesRecord: {
         readonly value: null;
         readonly forbidden: false;
     };
-};
-export declare const algebraicReservedNamesRecord: {
-    readonly if_let: {
-        readonly value: null;
-        readonly forbidden: true;
-    };
-    readonly when_let: {
+    readonly when: {
         readonly value: null;
-        readonly forbidden: true;
+        readonly forbidden: false;
     };
-    readonly when_first: {
+    readonly while: {
         readonly value: null;
-        readonly forbidden: true;
+        readonly forbidden: false;
     };
+};
+export declare const algebraicReservedNamesRecord: {
     readonly fn: {
         readonly value: null;
         readonly forbidden: true;
@@ -53,22 +49,6 @@ export declare const algebraicReservedNamesRecord: {
         readonly value: null;
         readonly forbidden: true;
     };
-    readonly try: {
-        readonly value: null;
-        readonly forbidden: true;
-    };
-    readonly recur: {
-        readonly value: null;
-        readonly forbidden: true;
-    };
-    readonly loop: {
-        readonly value: null;
-        readonly forbidden: true;
-    };
-    readonly doseq: {
-        readonly value: null;
-        readonly forbidden: true;
-    };
     readonly true: {
         readonly value: true;
         readonly forbidden: false;
@@ -101,6 +81,14 @@ export declare const algebraicReservedNamesRecord: {
         readonly value: null;
         readonly forbidden: false;
     };
+    readonly when: {
+        readonly value: null;
+        readonly forbidden: false;
+    };
+    readonly while: {
+        readonly value: null;
+        readonly forbidden: false;
+    };
 };
 export type ValidAlgebraicReservedName = keyof typeof validAlgebraicReservedNamesRecord;
 export type AlgebraicReservedName = keyof typeof algebraicReservedNamesRecord;

package/dist/cli/src/tokenizer/algebraic/algebraicTokens.d.ts

@@ -36,9 +36,9 @@ export type A_SingleLineCommentToken = GenericAlgebraicValueToken<'A_SingleLineC
 export type A_MultiLineCommentToken = GenericAlgebraicValueToken<'A_MultiLineComment'>;
 export type AlgebraicOnlyValueToken = A_WhitespaceToken | A_NumberToken | A_BasePrefixedNumberToken | A_OperatorToken | A_SymbolToken | A_ReservedSymbolToken | A_SingleLineCommentToken | A_MultiLineCommentToken;
 export type AlgebraicToken = AlgebraicOnlyValueToken | CommonSimpleToken | CommonValueToken;
-export declare function isA_SymbolToken(token: Token | undefined): token is A_SymbolToken;
-export declare function assertA_SymbolToken(token: Token | undefined): asserts token is A_SymbolToken;
-export declare function asA_SymbolToken(token: Token | undefined): A_SymbolToken;
+export declare function isA_SymbolToken<T extends string>(token: Token | undefined, symbolName?: T): token is A_SymbolToken<T>;
+export declare function assertA_SymbolToken<T extends string>(token: Token | undefined, symbolName?: T): asserts token is A_SymbolToken<T>;
+export declare function asA_SymbolToken<T extends string>(token: Token | undefined, symbolName?: T): A_SymbolToken<T>;
 export declare function isA_BinaryOperatorToken(token: Token | undefined): token is A_OperatorToken<SymbolicBinaryOperator>;
 export declare function assertA_BinaryOperatorToken(token: Token | undefined): asserts token is A_OperatorToken<SymbolicBinaryOperator>;
 export declare function asA_BinaryOperatorToken(token: Token | undefined): A_OperatorToken<SymbolicBinaryOperator>;