nadesiko3 3.8.7 → 3.8.9

package/core/src/nako_core_version.mts

@@ -11,9 +11,9 @@ export interface NakoCoreVersion {
 }
 // 実際のバージョン定義 (自動生成されるので以下を編集しない)
 const coreVersion: NakoCoreVersion = {
-  version: '3.8.7',
+  version: '3.8.9',
   major: 3,
   minor: 8,
-  patch: 7
+  patch: 9
 }
 export default coreVersion

package/core/src/nako_csv.mjs

@@ -3,10 +3,19 @@ export const options = {
     eol: '\r\n',
     auto_convert_number: true
 };
+// delimiter が明示的に設定されたかどうかを追跡するフラグ
+let delimiterExplicitlySet = false;
 export function resetEnv() {
     options.delimiter = ',';
     options.eol = '\r\n';
     options.auto_convert_number = true;
+    delimiterExplicitlySet = false;
+}
+export function isDelimiterExplicitlySet() {
+    return delimiterExplicitlySet;
+}
+export function setDelimiterExplicitlySet(value) {
+    delimiterExplicitlySet = value;
 }
 /** 文字列が数値かどうか判定する関数
  * @param str 判定する文字列

package/core/src/nako_csv.mts

@@ -11,10 +11,22 @@ export const options: CSVOptions = {
   auto_convert_number: true
 }
 
+// delimiter が明示的に設定されたかどうかを追跡するフラグ
+let delimiterExplicitlySet = false
+
 export function resetEnv(): void {
   options.delimiter = ','
   options.eol = '\r\n'
   options.auto_convert_number = true
+  delimiterExplicitlySet = false
+}
+
+export function isDelimiterExplicitlySet(): boolean {
+  return delimiterExplicitlySet
+}
+
+export function setDelimiterExplicitlySet(value: boolean): void {
+  delimiterExplicitlySet = value
 }
 
 /** 文字列が数値かどうか判定する関数

package/core/src/nako_gen.mjs

@@ -5,6 +5,7 @@
 import { NakoSyntaxError } from './nako_errors.mjs';
 import { incValue } from './nako_inc_value.mjs';
 import { dnclEnsureArray } from './nako_dncl_ensure_array.mjs';
+import { createReadIndex } from './nako_read_index.mjs';
 // なでしこで定義した関数の開始コードと終了コード
 const topOfFunction = '(function(){\n';
 const endOfFunction = '})';
@@ -1097,7 +1098,7 @@ export class NakoGen {
                 code = `__self.__dncl_ensure_array(${code},${idx})`;
             }
             else {
-                code += '[' + idx + ']';
+                code = `__self.__readIndex(${code},${idx})`;
             }
         }
         return code;
@@ -1179,7 +1180,7 @@ export class NakoGen {
         if (op === '@' || op === '[') {
             for (let i = 0; i < list.length; i++) {
                 const idx = this._convGen(list[i], true);
-                code += '[' + idx + ']';
+                code = `__self.__readIndex(${code},${idx})`;
             }
             return code;
         }
@@ -2330,6 +2331,8 @@ self.version = '__version__'
 self.__incValue = __incValueCode__
 // DNCLモードの多次元配列の中間要素の自動初期化。コア実行環境(NakoGlobal)と同じ実装を埋め込む (#1140)
 self.__dncl_ensure_array = __dnclEnsureArrayCode__
+// 文字列・配列・辞書の添字による読み取り (#2590)
+self.__readIndex = (__readIndexCode__)()
 self.logger = {
   error: (message) => { console.error(message) },
   warn: (message) => { console.warn(message) },
@@ -2538,7 +2541,8 @@ ${runtimeResult}
             'codeJS': js,
             jsInit,
             incValueCode: String(incValue),
-            dnclEnsureArrayCode: String(dnclEnsureArray)
+            dnclEnsureArrayCode: String(dnclEnsureArray),
+            readIndexCode: String(createReadIndex)
         }),
         // コード生成に使ったNakoGenのインスタンス
         gen

package/core/src/nako_gen.mts

@@ -11,6 +11,7 @@ import { Ast, AstEol, AstStrValue, AstBlocks, AstOperator, AstConst, AstInc, Ast
 import { NakoCompiler } from './nako3.mjs'
 import { incValue } from './nako_inc_value.mjs'
 import { dnclEnsureArray } from './nako_dncl_ensure_array.mjs'
+import { createReadIndex } from './nako_read_index.mjs'
 
 // なでしこで定義した関数の開始コードと終了コード
 const topOfFunction = '(function(){\n'
@@ -1195,7 +1196,7 @@ export class NakoGen {
         //  配列・添字の式を一度だけ評価するようランタイムヘルパーに委譲する)
         code = `__self.__dncl_ensure_array(${code},${idx})`
       } else {
-        code += '[' + idx + ']'
+        code = `__self.__readIndex(${code},${idx})`
       }
     }
     return code
@@ -1266,7 +1267,7 @@ export class NakoGen {
     if (op === '@' || op === '[') {
       for (let i = 0; i < list.length; i++) {
         const idx = this._convGen(list[i], true)
-        code += '[' + idx + ']'
+        code = `__self.__readIndex(${code},${idx})`
       }
       return code
     }
@@ -2423,6 +2424,8 @@ self.version = '__version__'
 self.__incValue = __incValueCode__
 // DNCLモードの多次元配列の中間要素の自動初期化。コア実行環境(NakoGlobal)と同じ実装を埋め込む (#1140)
 self.__dncl_ensure_array = __dnclEnsureArrayCode__
+// 文字列・配列・辞書の添字による読み取り (#2590)
+self.__readIndex = (__readIndexCode__)()
 self.logger = {
   error: (message) => { console.error(message) },
   warn: (message) => { console.warn(message) },
@@ -2634,7 +2637,8 @@ ${runtimeResult}
       'codeJS': js,
       jsInit,
       incValueCode: String(incValue),
-      dnclEnsureArrayCode: String(dnclEnsureArray)
+      dnclEnsureArrayCode: String(dnclEnsureArray),
+      readIndexCode: String(createReadIndex)
     }),
     // コード生成に使ったNakoGenのインスタンス
     gen

package/core/src/nako_global.mjs

@@ -1,6 +1,7 @@
 import { NakoColors } from './nako_colors.mjs';
 import { incValue } from './nako_inc_value.mjs';
 import { dnclEnsureArray } from './nako_dncl_ensure_array.mjs';
+import { createReadIndex } from './nako_read_index.mjs';
 /**
  * コンパイルされたなでしこのプログラムで、グローバル空間のthisが指すオブジェクト
  */
@@ -45,6 +46,7 @@ export class NakoGlobal {
         // DNCLモードの多次元配列の中間要素の自動初期化。
         // 単体JavaScript(standalone)にも同じ実装を埋め込む (#1140)
         this.__dncl_ensure_array = dnclEnsureArray;
+        this.__readIndex = createReadIndex();
     }
     clearLog() {
         this.__varslist[0].set('表示ログ', '');

package/core/src/nako_global.mts

@@ -6,6 +6,7 @@ import { CompilerOptions, NakoVars } from './nako_types.mjs'
 import { NakoValue } from './plugin_api.mjs'
 import { incValue } from './nako_inc_value.mjs'
 import { dnclEnsureArray } from './nako_dncl_ensure_array.mjs'
+import { createReadIndex } from './nako_read_index.mjs'
 
 /**
  * コンパイルされたなでしこのプログラムで、グローバル空間のthisが指すオブジェクト
@@ -36,6 +37,8 @@ export class NakoGlobal {
   __incValue: (a: NakoValue, b: NakoValue, isDec: boolean) => number | bigint
   // DNCLモードの多次元配列の中間要素の自動初期化 (#1140)
   __dncl_ensure_array: (base: any, idx: any) => any
+  // 文字列・配列・辞書の添字による読み取り (#2590)
+  __readIndex: (base: any, index: any) => any
   /**
    * @param compiler
    * @param gen
@@ -80,6 +83,7 @@ export class NakoGlobal {
     // DNCLモードの多次元配列の中間要素の自動初期化。
     // 単体JavaScript(standalone)にも同じ実装を埋め込む (#1140)
     this.__dncl_ensure_array = dnclEnsureArray
+    this.__readIndex = createReadIndex()
   }
 
   clearLog() {

package/core/src/nako_parser3.mjs

@@ -1415,7 +1415,8 @@ export class NakoParser extends NakoParserBase {
             return null;
         }
         const value = this.popStack(['を']) || { type: 'word', value: 'それ', josi: 'を', ...map };
-        const word = this.popStack(['へ', 'に']);
+        const dest = this.popStack(['へ', 'に']);
+        const word = dest ? (this.normalizeArrayAssignmentTarget(dest) || dest) : null;
         if (!word || (word.type !== 'word' && word.type !== 'func' && word.type !== 'ref_array')) {
             throw NakoSyntaxError.fromNode('代入文で代入先の変数が見当たりません。『(変数名)に(値)を代入』のように使います。', dainyu);
         }
@@ -1784,6 +1785,32 @@ export class NakoParser extends NakoParserBase {
     /** @returns {Ast | null} */
     yLet() {
         const map = this.peekSourceMap();
+        // 括弧付きの配列要素への代入。式の中の比較は従来どおり yCalc で読む。(#2583)
+        if (this.check('(') && this.hasParenthesizedAssignment()) {
+            const value = this.yValue();
+            const target = value ? this.normalizeArrayAssignmentTarget(value) : null;
+            if (target?.type === 'ref_array' && this.check('eq')) {
+                this.get(); // skip '=' / 'は'
+                const astValue = this.yCalc();
+                if (!astValue) {
+                    throw NakoSyntaxError.fromNode('配列への代入文で値がありません。', map);
+                }
+                const resolved = this.getAssignmentVarName(target);
+                if (this.check('comma')) {
+                    this.get();
+                }
+                return {
+                    type: 'let_array',
+                    name: resolved.name.value,
+                    blocks: [astValue, ...(resolved.index || [])],
+                    josi: '',
+                    checkInit: target.checkInit,
+                    ...map,
+                    end: this.peekSourceMap()
+                };
+            }
+            throw NakoSyntaxError.fromNode('括弧付きの代入先は、変数を起点とする配列要素で指定してください。', map);
+        }
         // 通常の変数
         if (this.check2(['word', 'eq'])) {
             const word = this.peek();
@@ -2876,6 +2903,72 @@ export class NakoParser extends NakoParserBase {
         }
         return word;
     }
+    /** 括弧付き代入の候補をトークンだけで確認する。(#2583)
+     * yValue の先読みは変数名や関数の使用記録も更新するため、解析後の巻き戻しはしない。
+     * 括弧内の比較は無視し、外側の助詞・演算子・文末で探索を終了する。
+     */
+    hasParenthesizedAssignment() {
+        const closings = [];
+        for (let i = this.index; i < this.tokens.length; i++) {
+            const token = this.tokens[i];
+            if (closings.length === 0) {
+                if (token.type === 'eq') {
+                    return true;
+                }
+                // @直後の単項演算子は添字の一部。値の後ろの二項演算子とは区別する。
+                const unaryIndex = ['-', 'not'].includes(token.type) && ['@', 'not'].includes(this.tokens[i - 1]?.type);
+                if (!unaryIndex && !['(', '[', '{', '@', 'word', 'func', 'func_pointer', 'number', 'bigint', 'string'].includes(token.type)) {
+                    return false;
+                }
+            }
+            if (token.type === '(') {
+                closings.push(')');
+            }
+            else if (token.type === '[') {
+                closings.push(']');
+            }
+            else if (token.type === '{') {
+                closings.push('}');
+            }
+            else if ([')', ']', '}'].includes(token.type)) {
+                if (closings.pop() !== token.type) {
+                    return false;
+                }
+            }
+            if (closings.length === 0 && token.josi !== '') {
+                return false;
+            }
+        }
+        return false;
+    }
+    /** 括弧付きの配列参照を、変数を起点とする代入先へ変換する。(#2583)
+     * 添字は内側から順に連結し、参照用のASTは書き換えない。
+     * 関数の戻り値やリテラルなど、変数を起点としない参照は対象外。
+     */
+    normalizeArrayAssignmentTarget(node) {
+        if (node.type === 'word') {
+            return node;
+        }
+        // ref_array の name は文字列の場合もあるが、ここでは変数トークンを持つ参照だけを扱う。
+        if (node.type === 'ref_array' && typeof node.name !== 'string' && node.name?.type === 'word') {
+            return { ...node, index: [...(node.index || [])] };
+        }
+        if (node.type !== 'ref_array_value' || (node.name !== '@' && node.name !== '[')) {
+            return null;
+        }
+        const [base, ...indexes] = node.index || [];
+        const target = base ? this.normalizeArrayAssignmentTarget(base) : null;
+        if (!target) {
+            return null;
+        }
+        return {
+            ...node,
+            type: 'ref_array',
+            name: target.type === 'word' ? target : target.name,
+            index: [...(target.index || []), ...indexes],
+            checkInit: this.flagCheckArrayInit
+        };
+    }
     /** 代入・増減対象の変数名を、元の無修飾名を考慮して解決する */
     getAssignmentVarName(word) {
         if (word.type === 'word') {

package/core/src/nako_parser3.mts

@@ -1249,7 +1249,8 @@ export class NakoParser extends NakoParserBase {
     const dainyu = this.get() // 代入
     if (dainyu === null) { return null }
     const value = this.popStack(['を']) || { type: 'word', value: 'それ', josi: 'を', ...map } as AstStrValue
-    const word: Ast|null = this.popStack(['へ', 'に'])
+    const dest = this.popStack(['へ', 'に'])
+    const word = dest ? (this.normalizeArrayAssignmentTarget(dest) || dest) : null
     if (!word || (word.type !== 'word' && word.type !== 'func' && word.type !== 'ref_array')) {
       throw NakoSyntaxError.fromNode('代入文で代入先の変数が見当たりません。『(変数名)に(値)を代入』のように使います。', dainyu)
     }
@@ -1580,6 +1581,28 @@ export class NakoParser extends NakoParserBase {
   /** @returns {Ast | null} */
   yLet(): AstBlocks | null {
     const map = this.peekSourceMap()
+    // 括弧付きの配列要素への代入。式の中の比較は従来どおり yCalc で読む。(#2583)
+    if (this.check('(') && this.hasParenthesizedAssignment()) {
+      const value = this.yValue()
+      const target = value ? this.normalizeArrayAssignmentTarget(value) : null
+      if (target?.type === 'ref_array' && this.check('eq')) {
+        this.get() // skip '=' / 'は'
+        const astValue = this.yCalc()
+        if (!astValue) { throw NakoSyntaxError.fromNode('配列への代入文で値がありません。', map) }
+        const resolved = this.getAssignmentVarName(target)
+        if (this.check('comma')) { this.get() }
+        return {
+          type: 'let_array',
+          name: (resolved.name as AstStrValue).value,
+          blocks: [astValue, ...(resolved.index || [])],
+          josi: '',
+          checkInit: target.checkInit,
+          ...map,
+          end: this.peekSourceMap()
+        } as AstLetArray
+      }
+      throw NakoSyntaxError.fromNode('括弧付きの代入先は、変数を起点とする配列要素で指定してください。', map)
+    }
     // 通常の変数
     if (this.check2(['word', 'eq'])) {
       const word = this.peek()
@@ -2577,6 +2600,51 @@ export class NakoParser extends NakoParserBase {
     return word
   }
 
+  /** 括弧付き代入の候補をトークンだけで確認する。(#2583)
+   * yValue の先読みは変数名や関数の使用記録も更新するため、解析後の巻き戻しはしない。
+   * 括弧内の比較は無視し、外側の助詞・演算子・文末で探索を終了する。
+   */
+  private hasParenthesizedAssignment(): boolean {
+    const closings: string[] = []
+    for (let i = this.index; i < this.tokens.length; i++) {
+      const token = this.tokens[i]
+      if (closings.length === 0) {
+        if (token.type === 'eq') { return true }
+        // @直後の単項演算子は添字の一部。値の後ろの二項演算子とは区別する。
+        const unaryIndex = ['-', 'not'].includes(token.type) && ['@', 'not'].includes(this.tokens[i - 1]?.type)
+        if (!unaryIndex && !['(', '[', '{', '@', 'word', 'func', 'func_pointer', 'number', 'bigint', 'string'].includes(token.type)) { return false }
+      }
+      if (token.type === '(') { closings.push(')') } else if (token.type === '[') { closings.push(']') } else if (token.type === '{') { closings.push('}') } else if ([')', ']', '}'].includes(token.type)) {
+        if (closings.pop() !== token.type) { return false }
+      }
+      if (closings.length === 0 && token.josi !== '') { return false }
+    }
+    return false
+  }
+
+  /** 括弧付きの配列参照を、変数を起点とする代入先へ変換する。(#2583)
+   * 添字は内側から順に連結し、参照用のASTは書き換えない。
+   * 関数の戻り値やリテラルなど、変数を起点としない参照は対象外。
+   */
+  private normalizeArrayAssignmentTarget(node: Ast): Ast | null {
+    if (node.type === 'word') { return node }
+    // ref_array の name は文字列の場合もあるが、ここでは変数トークンを持つ参照だけを扱う。
+    if (node.type === 'ref_array' && typeof node.name !== 'string' && node.name?.type === 'word') {
+      return { ...node, index: [...(node.index || [])] }
+    }
+    if (node.type !== 'ref_array_value' || (node.name !== '@' && node.name !== '[')) { return null }
+    const [base, ...indexes] = node.index || []
+    const target = base ? this.normalizeArrayAssignmentTarget(base) : null
+    if (!target) { return null }
+    return {
+      ...node,
+      type: 'ref_array',
+      name: target.type === 'word' ? target : target.name,
+      index: [...(target.index || []), ...indexes],
+      checkInit: this.flagCheckArrayInit
+    }
+  }
+
   /** 代入・増減対象の変数名を、元の無修飾名を考慮して解決する */
   getAssignmentVarName(word: Ast): Ast {
     if (word.type === 'word') {

package/core/src/nako_read_index.mjs

@@ -0,0 +1,43 @@
+/**
+ * 添字による読み取り (#2590, #2599)。文字列はUnicodeコードポイント単位で扱い、
+ * 文字列・配列の範囲の末尾は含めない。通常の配列・辞書・プロパティはJavaScriptの参照を使う。
+ * 単体JavaScriptにも埋め込むため、外部の関数には依存しない。
+ */
+export function createReadIndex() {
+    // 実行環境ごとに最近使った文字列を最大4件保持する。複数の文字列を
+    // 交互に読む場合も全文の走査・配列化を繰り返さず、無制限に蓄積しない。
+    const cache = new Map();
+    return function readIndex(base, index) {
+        const isRange = index !== null && typeof index === 'object' &&
+            typeof index['先頭'] === 'number' && typeof index['末尾'] === 'number';
+        if (Array.isArray(base) && isRange) {
+            return base.slice(index['先頭'], index['末尾']);
+        }
+        if (typeof base === 'string') {
+            // 数字の文字列による添字も受け付ける。lengthなどのプロパティは通常の参照に戻す。
+            const numberIndex = typeof index === 'string' && /^-?(0|[1-9]\d*)$/.test(index)
+                ? Number(index) : index;
+            if (isRange || (typeof numberIndex === 'number' && Number.isInteger(numberIndex))) {
+                let cachedChars = cache.get(base);
+                if (cachedChars === undefined) {
+                    // サロゲートを含まなければ文字列を直接読む。判定も同じ文字列では一度だけ。
+                    cachedChars = /[\uD800-\uDFFF]/.test(base) ? Array.from(base) : null;
+                    if (cache.size >= 4) {
+                        cache.delete(cache.keys().next().value);
+                    }
+                }
+                // ヒットした文字列も末尾へ移し、長く使われていないものから破棄する。
+                cache.delete(base);
+                cache.set(base, cachedChars);
+                const chars = cachedChars ?? base;
+                if (isRange) {
+                    return cachedChars === null
+                        ? base.slice(index['先頭'], index['末尾'])
+                        : cachedChars.slice(index['先頭'], index['末尾']).join('');
+                }
+                return chars[numberIndex < 0 ? chars.length + numberIndex : numberIndex];
+            }
+        }
+        return base[index];
+    };
+}

package/core/src/nako_read_index.mts

@@ -0,0 +1,43 @@
+/**
+ * 添字による読み取り (#2590, #2599)。文字列はUnicodeコードポイント単位で扱い、
+ * 文字列・配列の範囲の末尾は含めない。通常の配列・辞書・プロパティはJavaScriptの参照を使う。
+ * 単体JavaScriptにも埋め込むため、外部の関数には依存しない。
+ */
+export function createReadIndex (): (base: any, index: any) => any {
+  // 実行環境ごとに最近使った文字列を最大4件保持する。複数の文字列を
+  // 交互に読む場合も全文の走査・配列化を繰り返さず、無制限に蓄積しない。
+  const cache = new Map<string, string[] | null>()
+  return function readIndex (base: any, index: any): any {
+    const isRange = index !== null && typeof index === 'object' &&
+      typeof index['先頭'] === 'number' && typeof index['末尾'] === 'number'
+    if (Array.isArray(base) && isRange) {
+      return base.slice(index['先頭'], index['末尾'])
+    }
+    if (typeof base === 'string') {
+      // 数字の文字列による添字も受け付ける。lengthなどのプロパティは通常の参照に戻す。
+      const numberIndex = typeof index === 'string' && /^-?(0|[1-9]\d*)$/.test(index)
+        ? Number(index) : index
+      if (isRange || (typeof numberIndex === 'number' && Number.isInteger(numberIndex))) {
+        let cachedChars = cache.get(base)
+        if (cachedChars === undefined) {
+          // サロゲートを含まなければ文字列を直接読む。判定も同じ文字列では一度だけ。
+          cachedChars = /[\uD800-\uDFFF]/.test(base) ? Array.from(base) : null
+          if (cache.size >= 4) {
+            cache.delete(cache.keys().next().value!)
+          }
+        }
+        // ヒットした文字列も末尾へ移し、長く使われていないものから破棄する。
+        cache.delete(base)
+        cache.set(base, cachedChars)
+        const chars = cachedChars ?? base
+        if (isRange) {
+          return cachedChars === null
+            ? base.slice(index['先頭'], index['末尾'])
+            : cachedChars.slice(index['先頭'], index['末尾']).join('')
+        }
+        return chars[numberIndex < 0 ? chars.length + numberIndex : numberIndex]
+      }
+    }
+    return base[index]
+  }
+}

package/core/src/plugin_csv.mjs

@@ -1,4 +1,4 @@
-import { options, parse, stringify } from './nako_csv.mjs';
+import { options, parse, stringify, isDelimiterExplicitlySet, setDelimiterExplicitlySet } from './nako_csv.mjs';
 const PluginCSV = {
     'meta': {
         type: 'const',
@@ -24,7 +24,9 @@ const PluginCSV = {
         josi: [['を', 'の', 'で']],
         pure: true,
         fn: function (str) {
-            options.delimiter = ',';
+            if (!isDelimiterExplicitlySet()) {
+                options.delimiter = ',';
+            }
             return parse(str);
         }
     },
@@ -33,8 +35,7 @@ const PluginCSV = {
         josi: [['を', 'の', 'で']],
         pure: true,
         fn: function (str) {
-            options.delimiter = '\t';
-            return parse(str);
+            return parse(str, '\t');
         }
     },
     '表CSV変換': {
@@ -42,7 +43,9 @@ const PluginCSV = {
         josi: [['を']],
         pure: true,
         fn: function (a) {
-            options.delimiter = ',';
+            if (!isDelimiterExplicitlySet()) {
+                options.delimiter = ',';
+            }
             return stringify(a);
         }
     },
@@ -51,7 +54,9 @@ const PluginCSV = {
         josi: [['を']],
         pure: true,
         fn: function (a) {
-            options.delimiter = ',';
+            if (!isDelimiterExplicitlySet()) {
+                options.delimiter = ',';
+            }
             return stringify(a);
         }
     },
@@ -60,8 +65,7 @@ const PluginCSV = {
         josi: [['を']],
         pure: true,
         fn: function (a) {
-            options.delimiter = '\t';
-            return stringify(a);
+            return stringify(a, '\t');
         }
     },
     'TSV変換': {
@@ -69,8 +73,7 @@ const PluginCSV = {
         josi: [['を']],
         pure: true,
         fn: function (a) {
-            options.delimiter = '\t';
-            return stringify(a);
+            return stringify(a, '\t');
         }
     },
     'CSVオプション設定': {
@@ -82,6 +85,7 @@ const PluginCSV = {
                 const value = obj[key];
                 if (key === 'delimiter' || key === '区切文字') {
                     options.delimiter = value;
+                    setDelimiterExplicitlySet(true);
                 }
                 else if (key === 'eol') {
                     options.eol = value;

package/core/src/plugin_csv.mts

@@ -1,5 +1,5 @@
  
-import { options, parse, stringify } from './nako_csv.mjs'
+import { options, parse, stringify, isDelimiterExplicitlySet, setDelimiterExplicitlySet } from './nako_csv.mjs'
 
 const PluginCSV = {
   'meta': {
@@ -26,7 +26,9 @@ const PluginCSV = {
     josi: [['を', 'の', 'で']],
     pure: true,
     fn: function(str: string): (string | number)[][] {
-      options.delimiter = ','
+      if (!isDelimiterExplicitlySet()) {
+        options.delimiter = ','
+      }
       return parse(str)
     }
   },
@@ -35,8 +37,7 @@ const PluginCSV = {
     josi: [['を', 'の', 'で']],
     pure: true,
     fn: function(str: string): (string|number)[][] {
-      options.delimiter = '\t'
-      return parse(str)
+      return parse(str, '\t')
     }
   },
   '表CSV変換': { // @二次元配列AをCSV形式に変換して返す // @ひょうCSVへんかん
@@ -44,7 +45,9 @@ const PluginCSV = {
     josi: [['を']],
     pure: true,
     fn: function(a: string[][]): string {
-      options.delimiter = ','
+      if (!isDelimiterExplicitlySet()) {
+        options.delimiter = ','
+      }
       return stringify(a)
     }
   },
@@ -53,7 +56,9 @@ const PluginCSV = {
     josi: [['を']],
     pure: true,
     fn: function(a: string[][]): string {
-      options.delimiter = ','
+      if (!isDelimiterExplicitlySet()) {
+        options.delimiter = ','
+      }
       return stringify(a)
     }
   },
@@ -62,8 +67,7 @@ const PluginCSV = {
     josi: [['を']],
     pure: true,
     fn: function(a: string[][]): string {
-      options.delimiter = '\t'
-      return stringify(a)
+      return stringify(a, '\t')
     }
   },
   'TSV変換': { // @二次元配列AをTSV形式に変換して返す // @TSVへんかん
@@ -71,8 +75,7 @@ const PluginCSV = {
     josi: [['を']],
     pure: true,
     fn: function(a: string[][]): string {
-      options.delimiter = '\t'
-      return stringify(a)
+      return stringify(a, '\t')
     }
   },
   'CSVオプション設定': { // @「CSV取得」「表CSV変換」命令のオプションOBJ{delimiter,eol,auto_convert_number}をオブジェクトで指定 // @CSVおぷしょんせってい
@@ -84,6 +87,7 @@ const PluginCSV = {
         const value: unknown = obj[key]
         if (key === 'delimiter' || key === '区切文字') {
           options.delimiter = value as string
+          setDelimiterExplicitlySet(true)
         } else if (key === 'eol') {
           options.eol = value as string
         } else if (key === 'auto_convert_number') {

package/core/src/plugin_toml.mjs

@@ -1,5 +1,5 @@
 // TOMLを読むためのプラグイン
-import TOML from 'smol-toml';
+import { parse as tomlParse, stringify as tomlStringify } from 'tomlite';
 const PluginTOML = {
     'meta': {
         type: 'const',
@@ -24,7 +24,7 @@ const PluginTOML = {
         josi: [['を', 'の', 'から']],
         pure: true,
         fn: function (s, _sys) {
-            return TOML.parse(s);
+            return tomlParse(s);
         }
     },
     'TOML変換': {
@@ -32,7 +32,7 @@ const PluginTOML = {
         josi: [['を', 'から', 'の']],
         pure: true,
         fn: function (s, _sys) {
-            return TOML.stringify(s);
+            return tomlStringify(s);
         }
     }
 };