nadesiko3 3.3.49 → 3.3.52

package/core/test/array_test.mjs

@@ -1,34 +0,0 @@
-import assert from 'assert'
-import { NakoCompiler } from '../src/nako3.mjs'
-
-describe('array_test', async () => {
-  const cmp = async (/** @type {string} */code, /** @type {string} */res) => {
-    const nako = new NakoCompiler()
-    nako.logger.debug('code=' + code)
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-  // --- test ---
-  it('配列の基本テスト', async () => {
-    await cmp('A=[0,1,2];A[0]を表示', '0')
-    await cmp('A=[0,1,2];A@1を表示', '1')
-  })
-  it('二次元配列の参照 A[1][1]', async () => {
-    await cmp('A=[[0,1,2],[3,4,5]];A[1][1]を表示', '4')
-  })
-  it('二次元配列の参照 A@1,1 #976 #1000', async () => {
-    await cmp('A=[[0,1,2],[3,4,5]];A@1,1を表示', '4')
-  })
-  it('二次元配列@の参照 #976', async () => {
-    await cmp('A=[[0,1,2],[3,4,5]];A@1@1を表示', '4')
-    await cmp('A=[[0,1,2],[3,4,5]];A@1,1を表示', '4')
-    await cmp('A=[[0,1,2],[3,4,5]];N,M=[1,1];A@N,Mを表示', '4')
-  })
-  it('二次元配列の代入 #976', async () => {
-    await cmp('A=[[0,1,2],[3,4,5]];A[1][1]=100;A[1][1]を表示', '100')
-    await cmp('A=[[0,1,2],[3,4,5]];N=1;M=1;A@N,M=100;A@N,Mを表示', '100')
-    await cmp('A=[[0,1,2],[3,4,5]];A[1][1]を表示', '4')
-  })
-  it('要素から配列を記述する際に明示的な()が必要になる不具合 #1000', async () => {
-    await cmp('Aは[0,1,2];Bは[A[1], A[1], A[2]];B[1]を表示', '1')
-  })
-})

package/core/test/basic_test.mjs

@@ -1,344 +0,0 @@
-/* eslint-disable no-undef */
-import assert from 'assert'
-import { NakoCompiler } from '../src/nako3.mjs'
-import { expect } from 'chai'
-
-describe('basic', async () => {
-  // nako.logger.addListener('trace', ({ browserConsole }) => { console.log(...browserConsole) })
-  const cmp = async (/** @type {string} */code, /** @type {string} */res) => {
-    const nako = new NakoCompiler()
-    nako.logger.debug('code=' + code)
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-  const cmpNakoFuncs = (/** @type {string} */code, /** @type {Set<string>} */res) => {
-    const nako = new NakoCompiler()
-    nako.logger.debug('code=' + code)
-    nako.parse(code, 'main.nako3')
-    assert.deepStrictEqual(nako.usedFuncs, res)
-  }
-  // --- test ---
-  it('print simple', async () => {
-    await cmp('3を表示', '3')
-  })
-  it('print', async () => {
-    await cmp('3を表示', '3')
-    await cmp('100を表示', '100')
-    await cmp('0xFFを表示', '255')
-  })
-  it('string', async () => {
-    await cmp('「abc」を表示', 'abc')
-    await cmp('"abc"を表示', 'abc')
-    await cmp('“あいう”を表示', 'あいう')
-  })
-  it('rawstring', async () => {
-    await cmp('『abc』を表示', 'abc')
-    await cmp('\'abc\'を表示', 'abc')
-    await cmp('『abc{30}abc』を表示', 'abc{30}abc')
-  })
-  it('exstring', async () => {
-    await cmp('a=30;「abc{a}abc」を表示', 'abc30abc')
-    await cmp('a=30;「abc｛a｝abc」を表示', 'abc30abc')
-  })
-  it('raw string - 🌿 .. 🌿', async () => {
-    await cmp('a=🌿abc🌿;aを表示', 'abc')
-  })
-  it('EX string - 🌴 .. 🌴', async () => {
-    await cmp('v=30;a=🌴abc{v}abc🌴;aを表示', 'abc30abc')
-  })
-  it('string - LF', async () => {
-    await cmp('a=30;「abc\nabc」を表示', 'abc\nabc')
-  })
-  it('space 「・」', async () => {
-    await cmp('・a=30;・b=50「{a}-{b}」を表示', '30-50')
-  })
-  it('string - 🌴 ... 🌴', async () => {
-    await cmp('🌴aaa🌴を表示', 'aaa')
-    await cmp('a=30;🌴aaa{a}bbb🌴を表示', 'aaa30bbb')
-    await cmp('a=30;🌿aaa{a}bbb🌿を表示', 'aaa{a}bbb')
-  })
-  it('システム定数', async () => {
-    await cmp('ナデシコエンジンを表示', 'nadesi.com/v3')
-  })
-  it('助詞の後に句読点', async () => {
-    await cmp('「こんにちは」と、表示。', 'こんにちは')
-  })
-  it('代入文', async () => {
-    await cmp('3000を値段に代入。値段を表示', '3000')
-    await cmp('値段に3000を代入。値段を表示', '3000')
-    await cmp('々=3000。々を表示', '3000')
-    await cmp('々に3000を代入。々を表示', '3000')
-  })
-  it('連文後の代入文', async () => {
-    await cmp('「aabbcc」の「aa」を「」に置換してFに代入。Fを表示', 'bbcc')
-    await cmp('「aabbcc」の「aa」を「」に置換して「bb」を「」に置換してFに代入。Fを表示', 'cc')
-  })
-  it('〜を〜に定める', async () => {
-    await cmp('Aを0.8に定めてAを表示', '0.8')
-  })
-  it('文字列 - &と改行', async () => {
-    await cmp('「aaa」& _\n「bbb」を表示。', 'aaabbb')
-    await cmp('A= 1 + 1 + 1 + 1 + 1 + _\n1 + 1\nAを表示', '7')
-    await cmp('A= 1 + 1 + 1 + 1 + 1 + _\r\n1 + 1 + 1\r\nAを表示', '8')
-    await cmp('A= 1 + 1 + 1 + 1 + 1 + _  \r\n1 + 3  \r\nAを表示', '9')
-    await cmp('A = 1 + _\n' +
-      '    5 + _\n' +
-      '    10\n' +
-      'Aを表示。', '16')
-  })
-  it('名前に数字を持つ変数を使う', async () => {
-    await cmp('A1=30;B1=20;「{A1}{B1}」を表示。', '3020')
-  })
-  it('名前に絵文字を持つ変数を使う', async () => {
-    await cmp('\u1F60=30;\u1F60を表示。', '30')
-    await cmp('😄=30;😄を表示。', '30')
-  })
-  it('ラインコメントが正しく処理されない問題 (#112)', async () => {
-    await cmp('A=50 # hogehoge\nAを表示', '50')
-    await cmp('A=50 ＃ hogehoge\nAを表示', '50')
-    await cmp('A=50 ※ hogehoge\nAを表示', '50')
-    await cmp('A=50 // hogehoge\nAを表示', '50')
-    await cmp('A=50 ／／ hogehoge\nAを表示', '50')
-    await cmp('A=50\nもしA=50ならば # hogehoge\nAを表示\nここまで\n', '50')
-    await cmp('A=50\nもしA=50ならば ＃ hogehoge\nAを表示\nここまで\n', '50')
-    await cmp('A=50\nもしA=50ならば ※ hogehoge\nAを表示\nここまで\n', '50')
-    await cmp('A=50\nもしA=50ならば // hogehoge\nAを表示\nここまで\n', '50')
-    await cmp('A=50\nもしA=50ならば ／／ hogehoge\nAを表示\nここまで\n', '50')
-  })
-  it('ラインコメントに文字列記号があり閉じていないとエラーになる(#725)', async () => {
-    await cmp('A=50 # "hogehoge\nAを表示', '50')
-  })
-  it('範囲コメントに文字列記号があり閉じていないとエラーになる(#731)', async () => {
-    await cmp('A=50 /* " */Aを表示', '50')
-    await cmp('A=50 /* \' */Aを表示', '50')
-  })
-  /*
-  // #1229
-  it('usedFuncs', async () => {
-    cmpNakoFuncs('●({関数}fでaを)演算処理とは;それは、f(a);ここまで;●(aを)二倍処理とは;それはa*2;ここまで;二倍処理で2を演算処理して表示', new Set(['表示']))
-  })
-  */
-  it('論文などで使われる句読点「，」を「、」(#735)', async () => {
-    await cmp('A1=30;B1=20;(A1+B1)を，表示', '50')
-    await cmp('A=３．１４;Aを，表示', '3.14')
-  })
-  it('条件分岐のインデント構文', async () => {
-    await cmp(
-      '！インデント構文\n' +
-      '3で条件分岐\n' +
-      '    2ならば\n' +
-      '        1を表示\n' +
-      '    3ならば\n' +
-      '        2を表示\n' +
-      '    違えば\n' +
-      '        3を表示\n',
-      '2'
-    )
-  })
-  it('💡のインデント構文 #1184', async () => {
-    await cmp(
-      '💡インデント構文\n' +
-      '3で条件分岐\n' +
-      '    2ならば\n' +
-      '        2を表示\n' +
-      '    3ならば\n' +
-      '        3を表示\n' +
-      '    違えば\n' +
-      '        5を表示\n',
-      '3'
-    )
-  })
-  it('独立した助詞『ならば』の位置の取得', async () => {
-    const nako = new NakoCompiler()
-    const out = nako.lex('もし存在するならば\nここまで', '')
-    const sonzai = out.tokens.find((t) => t.value === '存在')
-    const naraba = out.tokens.find((t) => t.type === 'ならば')
-
-    // 「存在する」
-    expect(sonzai).to.have.property('startOffset').and.to.equal(2)
-    expect(sonzai).to.have.property('endOffset').and.to.equal(6)
-
-    // ならば
-    expect(naraba).to.have.property('startOffset').and.to.equal(6)
-    expect(naraba).to.have.property('endOffset').and.to.equal(9)
-  })
-  it('preCodeを考慮したソースマップ', async () => {
-    const nako = new NakoCompiler()
-    const preCode = '1を表示\n2を表示\n3を'
-    const tokens = nako.lex(preCode + '表示', 'main.nako3', preCode).tokens
-
-    // '3' は-2から0文字目
-    const three = tokens.findIndex((t) => t.value === 3)
-    assert.strictEqual(tokens[three].startOffset, -2)
-    assert.strictEqual(tokens[three].endOffset, 0)
-    assert.strictEqual(tokens[three].line, 0)
-    assert.strictEqual(tokens[three].column, -2)
-
-    // '表示' は0~1文字目
-    assert.strictEqual(tokens[three + 1].startOffset, 0)
-    assert.strictEqual(tokens[three + 1].endOffset, 2)
-    assert.strictEqual(tokens[three + 1].line, 0)
-    assert.strictEqual(tokens[three + 1].column, 0)
-  })
-  it('実行速度優先 - 1行のみ', async () => {
-    const nako = new NakoCompiler()
-    nako.reset()
-    await cmp(`
-「全て」で実行速度優先して1を表示
-「全て」で実行速度優先して2を表示
-`, '1\n2')
-  })
-  it('実行速度優先 - ブロック内に適用', async () => {
-    // エラーが起きなければ、「実行速度優先」が無い場合と同じ動作をする。
-    await cmp(`\
-「全て」で実行速度優先
-    ●Fとは
-        2を表示
-        3を表示
-    ここまで
-    1を表示
-    F
-ここまで
-4を表示
-`, '1\n2\n3\n4')
-  })
-  it('実行速度優先 - 関数宣言の上方下方参照', async () => {
-    // エラーが起きなければ、「実行速度優先」が無い場合と同じ動作をする。
-    await cmp(`\
-「全て」で実行速度優先
-    ●Gとは
-        2を表示
-        3を表示
-    ここまで
-    ●Fとは
-        Eする
-    ここまで
-    ●Eとは
-        Gする
-    ここまで
-    1を表示
-    F
-ここまで
-4を表示
-`, '1\n2\n3\n4')
-  })
-  it('空白で区切って文をつなげた場合', async () => {
-    await cmp('1と2を足す 1と2を足す', '')
-  })
-  it('return_none: true のaddFuncで定義した関数が「それ」に値を代入しないことを確認する', async () => {
-    const nako = new NakoCompiler()
-    nako.addFunc('hoge', [], () => { return 0 }, true)
-    const g = await nako.run('1と2を足す\nhoge\nそれを表示')
-    assert.strictEqual(g.log, '3')
-  })
-  it('制御構文で一語関数を使う', async () => {
-    await cmp('●一とは\n1を戻す\nここまで\nもし一ならば\n1を表示\nここまで', '1') // if
-    await cmp('●一とは\n1を戻す\nここまで\n一回\n1を表示\nここまで', '1') // times
-    await cmp('●一とは\n1を戻す\nここまで\n一の間\n1を表示\n抜ける\nここまで', '1') // while
-    await cmp('●一とは\n[1]を戻す\nここまで\n一を反復\n1を表示\nここまで', '1') // foreach
-    await cmp('●一とは\n1を戻す\nここまで\n一で条件分岐\n1ならば\n1を表示\nここまで\nここまで', '1') // switch
-  })
-  it('そう', async () => {
-    // 「そう」は「それ」のエイリアス
-    await cmp('それ＝1;そうを表示', '1')
-    await cmp('1に3を足す;そうを表示', '4')
-  })
-  it('「〜時間」の「間」を制御構文として認識させない #831', async () => {
-    await cmp('時間=1\n（時間）を表示', '1')
-  })
-  it('「もしFが存在するならば」がFと「存在する」の比較になる問題の修正 #830', async () => {
-    await cmp('●（Aが）hogeとは\n' +
-        '    1を戻す\n' +
-        'ここまで\n' +
-        'もし、Fがhogeならば\n' +
-        '    1を表示\n' +
-        'ここまで',
-    // ---
-    '1')
-  })
-  it('無名関数が警告を出す問題の修正 #841', async () => {
-    let log = ''
-    const nako = new NakoCompiler()
-    nako.logger.addListener('warn', ({ noColor }) => { log += noColor })
-    nako.parse(
-      'f = 関数(x) それは、x。ここまで。\n' +
-      'g = 関数(x) それは、x。ここまで。\n'
-      , 'main.nako3')
-    assert.strictEqual(log, '')
-  })
-  /*
-  it('resetされた後に関数名を取得できない問題の修正 #849', (done) => {
-    const nako = new NakoCompiler()
-    nako.getLogger().addListener('stdout', (data) => {
-      const { noColor } = data
-      assert(noColor.includes('function')) // JavaScriptのコード function() { var ... } が表示されるはず
-      done()
-    })
-    nako.run(`
-●Aとは
-ここまで
-0.0001秒後には
-    「A」のJSオブジェクト取得して表示
-ここまで。
-`, '')
-    nako.reset()
-    console.log(nako.compile(`\
-●テスト:足すとは
-    1と2を足す
-    それと3がASSERT等しい
-ここまで
-
-●テスト:引くとは
-    1と2を足す
-    それと3がASSERT等しい
-ここまで
-`, 'main.nako3', true))
-  })
-  */
-  //
-  it('「AはBである」構文 #939', async () => {
-    await cmp('Aは9である。Aを表示', '9')
-    await cmp('Bは「あ」である。Bを表示', 'あ')
-    await cmp('Cは[1,2,3]である;C[2]を表示', '3')
-  })
-  it('「AはBです」構文 #974', async () => {
-    await cmp('Aは9です。Aを表示', '9')
-    await cmp('Bは「あ」でした。Bを表示してください。', 'あ')
-    await cmp('Cは[1,2,3]である;C[2]を表示', '3')
-  })
-  it('複数変数代入構文 #563', async () => {
-    await cmp('A,B=[1,2];Aを表示;Bを表示', '1\n2')
-    await cmp('A,B,C=[1,2,3];Aを表示;Bを表示;Cを表示', '1\n2\n3')
-    await cmp('A,B=[1];Aを表示;Bを表示;', '1\nundefined')
-    await cmp('A,B,C,D=[1,2,3,4];Dを表示;', '4')
-  })
-  it('複数定数代入構文 #563', async () => {
-    await cmp('定数[A,B]=[1,2];Aを表示;Bを表示', '1\n2')
-    await cmp('定数[A,B,C]=[1,2,3];Aを表示;Bを表示;Cを表示', '1\n2\n3')
-    await cmp('定数[A,B]=[1];Aを表示;Bを表示;', '1\nundefined')
-    await cmp('定数[A,B,C,D]=[1,2,3,4];Dを表示;', '4')
-  })
-  it('複数定数代入構文その2 #563', async () => {
-    await cmp('変数[A,B]=[1,2];Aを表示;Bを表示', '1\n2')
-    await cmp('変数[A,B,C]=[1,2,3];Aを表示;Bを表示;Cを表示', '1\n2\n3')
-    await cmp('変数[A,B]=[1];Aを表示;Bを表示;', '1\nundefined')
-    await cmp('変数[A,B,C,D]=[1,2,3,4];Dを表示;', '4')
-  })
-  it('複数代入文の問題 #1027', async () => {
-    await cmp('塊=[[0,0],[1,1]];塊を反復\nx,y=対象;💧;塊をJSONエンコードして表示。', '[[0,0],[1,1]]')
-    await cmp('x=1;y=2;x,y=[y,x];xを表示', '2')
-  })
-  it('もし文で「ならば」の前の空行でエラー #1079', async () => {
-    await cmp('A=5;もし、A > 3　ならば「OK」と表示;', 'OK')
-  })
-  it('『増やす』『減らす』文の追加 #1145', async () => {
-    // 増やす
-    await cmp('A=0;Aを1増やす。Aと表示;', '1')
-    await cmp('A=0;Aを123だけ増やす。Aと表示;', '123')
-    // 減らす
-    await cmp('A=10;Aを1減らす。Aと表示;', '9')
-    await cmp('A=10;Aを5だけ減らす。Aと表示;', '5')
-    // 初期化しないで使うと0になる
-    await cmp('Aを3増やす;Aと表示;', '3')
-    await cmp('Aを3減らす;Aと表示;', '-3')
-  })
-})

package/core/test/calc_test.mjs

@@ -1,140 +0,0 @@
-import assert from 'assert'
-import { NakoCompiler } from '../src/nako3.mjs'
-
-describe('calc_test.js', async () => {
-  const cmp = async (/** @type {string} */ code, /** @type {string} */ res) => {
-    const nako = new NakoCompiler()
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-  it('basic', async () => {
-    await cmp('3を表示', '3')
-    await cmp('3.14を表示', '3.14')
-    await cmp('0.5e+3を表示', '500')
-  })
-  it('足し算', async () => {
-    await cmp('3+5を表示', '8')
-  })
-  it('引き算', async () => {
-    await cmp('10-5を表示。', '5')
-    await cmp('１０－５を表示。', '5')
-  })
-  it('掛け算', async () => {
-    await cmp('1+2*3を表示', '7')
-  })
-  it('連続演算：して', async () => {
-    await cmp('3に5を足して表示', '8')
-  })
-  it('連続演算：て-3に5を掛けて表示', async () => {
-    await cmp('3に5を掛けて表示', '15')
-  })
-  it('配列', async () => {
-    await cmp('a=[];a[1]=30;a[1]を表示', '30')
-    await cmp('a=[];a【1】=30;a[1]を表示', '30')
-  })
-  it('ネスト配列', async () => {
-    await cmp('a=[[1,2,3], [4,5,6]];a[1][1]を表示', '5')
-  })
-  it('ネスト配列で、マイナスを含むときのバグ修正 (#276)', async () => {
-    await cmp('a=[-1, -2, -3];a[0]を表示', '-1')
-    await cmp('a=[-1, -2, -3];a[2]を表示', '-3')
-    await cmp('a=[[-1, -1], [1, -1]];a[0][0]を表示', '-1')
-  })
-  it('オブジェクト', async () => {
-    await cmp('a={};a[\'a\']=30;a[\'a\']を表示', '30')
-  })
-  it('階乗', async () => {
-    await cmp('2^3を表示', '8')
-  })
-  it('否定', async () => {
-    await cmp('(!1)を表示', '0')
-    await cmp('(!0)を表示', '1')
-    await cmp('(!オン)を表示', '0')
-    await cmp('(!オフ)を表示', '1')
-  })
-  it('配列簡易記号', async () => {
-    await cmp('A=[];A@0=5;A@0を表示', '5')
-    await cmp('A=[];A＠0=5;A＠1=6;AをJSONエンコードして表示', '[5,6]')
-  })
-  it('JSON配列-改行あり', async () => {
-    await cmp('A=[\n0,\n1,\n2,\n3];A@2を表示', '2')
-  })
-  it('JSON配列-カンマ省略', async () => {
-    await cmp('A=[1 2 3 4 5];AをJSONエンコードして表示', '[1,2,3,4,5]')
-  })
-  it('JSON配列-ネスト', async () => {
-    await cmp('A=[[1,2,3],[4,5,6]];AをJSONエンコードして表示', '[[1,2,3],[4,5,6]]')
-  })
-  it('JSONオブジェクト-改行あり', async () => {
-    await cmp('A={\n"殿":"男","姫":"女"\n};A@"殿"を表示', '男')
-  })
-  it('JSONオブジェクト-値を省略した場合', async () => {
-    await cmp('N={"hoge"};N["hoge"]を表示。', 'hoge')
-    await cmp('N={"hoge","fuga","bar"};N["bar"]を表示。', 'bar')
-    await cmp('N={32,45,66};N[45]を表示。', '45')
-  })
-  it('JSONオブジェクト-キーを文字列で囲わなかった場合', async () => {
-    await cmp('N={hoge:30};N["hoge"]を表示。', '30')
-  })
-  it('文字列→数値への暗黙的変換', async () => {
-    await cmp('A="5";B="50";A+Bを表示', '55')
-    await cmp('"100"/"2"を表示', '50')
-    await cmp('"2"*"3"を表示', '6')
-    await cmp('"100"%"10"を表示', '0')
-  })
-  it('空配列テスト', async () => {
-    await cmp('A=空配列;A@0=30;A@1=50;Aを「:」で配列結合して表示', '30:50')
-    await cmp('A=空配列;B=空配列;A@0=30;A@1=50;B@0=1;Bを「:」で配列結合して表示', '1')
-  })
-  it('単項演算子 minus number', async () => {
-    await cmp('-1*5を表示', '-5')
-    await cmp('5*-1を表示', '-5')
-  })
-  it('単項演算子 minus word', async () => {
-    await cmp('A=1;5*-Aを表示', '-5')
-  })
-  it('論理演算', async () => {
-    await cmp('BMI=25;A=((25 ≦ BMI) かつ (BMI < 30));Aを表示', 'true')
-    await cmp('BMI=25;A=((18.5 > BMI) または (BMI > 30));Aを表示', 'false')
-  })
-  it('カッコ内の関数呼び出し', async () => {
-    await cmp('N=("ABC"の文字数);Nを表示。', '3')
-  })
-  it('文字列の埋め込み変数加算', async () => {
-    await cmp('N1=30;「--{N1+1}--」を表示', '--31--')
-  })
-  it('文字列の埋め込み変数減算', async () => {
-    await cmp('N1=30;「--{N1-1}--」を表示', '--29--')
-  })
-  it('文字列の埋め込み変数乗算', async () => {
-    await cmp('N1=30;「--{N1*2}--」を表示', '--60--')
-  })
-  it('文字列の埋め込み変数除算', async () => {
-    await cmp('N1=30;「--{N1/2}--」を表示', '--15--')
-  })
-  it('文字列の埋め込み変数剰余', async () => {
-    await cmp('N1=30;「--{N1%2}--」を表示', '--0--')
-  })
-  it('文字列の埋め込み変数冪乗', async () => {
-    await cmp('N1=2;「--{N1^3}--」を表示', '--8--')
-  })
-  it('比較演算子', async () => {
-    await cmp('A=1>5;Aを表示', 'false')
-  })
-  it('ビット演算', async () => {
-    await cmp('A=0xF0>>4;Aを表示', '15')
-    await cmp('A=0xF<<4;Aを表示', '240')
-  })
-  it('連文で計算 (#729)', async () => {
-    await cmp('1に2を足して3を足して4を引いて5を掛けて2で割って表示', '5')
-    await cmp('2に3を掛けて4を足して5で割って表示', '2')
-  })
-  it('厳格な比較 (#999)', async () => {
-    await cmp('N=「」;もし、N=0ならば「OK」と表示。', 'OK')
-    await cmp('N=「」;もし、N===0ならば「NG」と表示。違えば「OK」と表示。', 'OK')
-  })
-  it('なでしこ式関数呼び出しで、途中に四則演算がある場合の処理 (#1188)', async () => {
-    await cmp('3.14のINT+2を表示。', '5')
-    await cmp('3の5倍×2を表示', '30')
-    await cmp('1+3の2倍×2を表示', '16')
-  })
-})

package/core/test/core_module_test.mjs

@@ -1,23 +0,0 @@
-/* eslint-disable no-undef */
-import assert from 'assert'
-import core from '../index.mjs'
-// eslint-disable-next-line no-undef
-describe('core_module_test', () => {
-  const cmp = async (code, res) => {
-    const nako = new core.NakoCompiler()
-    nako.getLogger().debug('code=' + code)
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-  it('hello', async () => {
-    await cmp('「こんにちは」と表示', 'こんにちは')
-  })
-  it('calc', async () => {
-    await cmp('3+5*2と表示', '13')
-  })
-  it('funccall', async () => {
-    await cmp('MID("123456789",3,2)を表示', '34')
-  })
-  it('ナデシコバージョン', async () => {
-    await cmp('ナデシコバージョンを表示', core.version.version)
-  })
-})

package/core/test/debug_test.mjs

@@ -1,16 +0,0 @@
-import assert from 'assert'
-import { NakoCompiler } from '../src/nako3.mjs'
-
-describe('debug', () => {
-  const nako = new NakoCompiler()
-  // nako.logger.addListener('trace', ({ browserConsole }) => { console.log(...browserConsole) })
-  const cmp = async (/** @type {string} */ code, /** @type {string} */ res) => {
-    nako.logger.debug('code=' + code)
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-  // --- test ---
-  it('print simple', async () => {
-    await cmp('/* aaa */\n3を表示\n2*3を表示', '3\n6')
-    // cmp("/* a\n */\n3を表示\n「テスト」でエラー発生。", "3\n6");
-  })
-})

package/core/test/dncl_test.mjs

@@ -1,94 +0,0 @@
-import assert from 'assert'
-import { NakoCompiler } from '../src/nako3.mjs'
-import { NakoDncl } from '../src/nako_from_dncl.mjs'
-
-describe('dncl (#1140)', () => {
-  const cmp = (/** @type {string} */ src, /** @type {string} */ expected) => {
-    src = NakoDncl.convert(src, 'main.nako3')
-    src = src.replace(/\s+$/, '')
-    expected = expected.replace(/\s+$/, '')
-    assert.strictEqual(src, expected)
-  }
-  const cmpNako = async (/** @type {string} */ code, /** @type {string} */ res) => {
-    const nako = new NakoCompiler()
-    nako.logger.debug('code=' + code)
-    assert.strictEqual((await nako.runAsync(code)).log, res)
-  }
-
-  it('代入文', () => {
-    cmp('!DNCLモード\n' +
-            'A←3\n',
-    // ---
-    '!DNCLモード\n' +
-            'A=3\n')
-    cmp('!DNCLモード\n' +
-            'A←3, B←5\n',
-    // ---
-    '!DNCLモード\n' +
-            'A=3, B=5\n')
-  })
-  it('もし文', () => {
-    cmp('!DNCLモード\n' +
-            'もしA=5ならば\n「OK」と表示\nを実行する',
-    // ---
-    '!DNCLモード\n' +
-            'もしA=5ならば\n「OK」と表示\nここまで')
-  })
-  // 実行テスト
-  it('簡単な実行テスト', async () => {
-    await cmpNako('!DNCLモード\nA←5,B←6,C←7。Cを表示する', '7')
-    await cmpNako('!DNCLモード\nA=[]。A[1]=3;A[2]=3;Aの要素数を表示する', '2')
-  })
-  it('配列の入れ替え', async () => {
-    await cmpNako('!DNCLモード\nA={{11,12,13},{21,22,23}}。A[1,2]を表示する', '21')
-    await cmpNako('!DNCLモード\nA={}。A[1]={11,12,13}, A[2]={21,22,23};A[2,1]を表示する', '12')
-    await cmpNako('!DNCLモード\nA={{11,12,13},{21,22,23}}。B=A[3,2];Bを表示する', '23')
-    await cmpNako('!DNCLモード\nA={{11,12,13},{21,22,23}}。C=2;AA=A[1+C,1];AAを表示', '13')
-    await cmpNako('!DNCLモード\nA={{11,12,13},{21,22,23}}。X=2;Y=1;AA=A[X,Y+1];AAを表示', '22')
-  })
-  it('配列の自動初期化(#1143)', async () => {
-    await cmpNako('!DNCLモード\nA[1]←111。A[1]を表示する', '111')
-    await cmpNako('!DNCLモード\nA[3,3]=3;A[3,3]を表示する', '3')
-    await cmpNako('!DNCLモード\nA[3,2,1]=30;A[3,2,1]を表示する', '30')
-    await cmpNako('!DNCLモード\nA[1,1]=11,A[1,2]=12;A[1,2]を表示する', '12')
-  })
-  it('インデントを｜で表現する', async () => {
-    await cmpNako('!DNCLモード\nA=3;もしA>1ならば\n｜A←A+1\nを実行する。\nAを表示する。', '4')
-  })
-  it('表示エミュレート', async () => {
-    await cmpNako('!DNCLモード\nx←10,y←20\nxと"-"とyを表示する。', '10-20')
-    await cmpNako('!DNCLモード\nx←10,y←20\n"("とxと","とyと")"を表示する。', '(10,20)')
-    await cmpNako('!DNCLモード\nx←10,y←20,z←30\n"("とxと","とyと","とzと")"を表示する。', '(10,20,30)')
-    await cmpNako('!DNCLモード\nx←10,y←20\n「<」とxと","とyと「>」を表示する。', '<10,20>')
-    // #1079
-    await cmpNako('!DNCLモード\nx←10,y←20\n「<」 と x と "," と y と 「>」 を 表示する。', '<10,20>')
-  })
-  it('乱数エミュレート #1146', async () => {
-    await cmpNako('!DNCLモード\nr ← 乱数 (5，10)\nもし(rが5以上)かつ(rが10以下)ならば「OK」と表示する。', 'OK')
-    await cmpNako('!DNCLモード\nr ← 乱数 (1，6)\nもし(rが1以上)かつ(rが6以下)ならば「OK」と表示する。', 'OK')
-  })
-  it('二進 #1146', async () => {
-    await cmpNako('!DNCLモード\nA← 二進 (9)\nAを表示する。', '1001')
-    await cmpNako('!DNCLモード\nA← 二進 (255)\nAを表示する。', '11111111')
-    await cmpNako('!DNCLモード\n二進で表示 (255)', '11111111')
-  })
-  it('減らす・増やす #1149', async () => {
-    await cmpNako('!DNCLモード\nsaihu←1000。syuppi←500。saihuをsyuppi減らす。saihuを表示する。', '500')
-    await cmpNako('!DNCLモード\nsaihu←1000。syuppi←500。saihuをsyuppi増やす。saihuを表示する。', '1500')
-  })
-  it('DNCLで「もし」文の否定形が動かない #1148', async () => {
-    await cmpNako('!DNCLモード\nkosu←1\nもし、kosu>27でないならば\n|「OK」を表示する。\nを実行する。\n', 'OK')
-  })
-  it('DNCLで後判定のループが動かない #1147', async () => {
-    await cmpNako('!DNCLモード\nA←1\n繰り返し，\nAを表示する\nAを1増やす\nを，A>3になるまで実行する\n', '1\n2\n3')
-    await cmpNako('!DNCLモード\nA←1\n繰り返し，\nAを表示する\nAを1だけ増やす\nを，A>3になるまで実行する\n', '1\n2\n3')
-  })
-  it('DNCLで÷は整数の割り算 #1152', async () => {
-    await cmpNako('!DNCLモード\n7/2を表示する', '3.5')
-    await cmpNako('!DNCLモード\n7÷2を表示する', '3')
-  })
-  it('「!」を💡で書けるようにする #1184', async () => {
-    await cmpNako('💡DNCLモード\n7/2を表示する', '3.5')
-    await cmpNako('💡DNCLモード\n7÷2を表示する', '3')
-  })
-})