nadesiko3 3.3.48 → 3.3.49

package/core/test/flow_test.mjs

@@ -0,0 +1,373 @@
+import assert from 'assert'
+import { NakoCompiler } from '../src/nako3.mjs'
+
+describe('flow_test', 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)
+  }
+  it('もし', async () => {
+    await cmp('もし3>1ならば「あ」と表示。', 'あ')
+    await cmp('もし3<1ならば「あ」と表示。違えば「い」と表示。', 'い')
+  })
+  it('もし - AがBならば', async () => {
+    await cmp('もし3が3ならば\n「OK」と表示。\n違えば\n「NG」と表示。\nここまで\n', 'OK')
+  })
+  it('もし - ネスト', async () => {
+    await cmp('A=5\n' +
+      'もしAが3以上ならば\n' +
+      '　　もしA=5ならば\n' +
+      '　　　　「OK」と表示。\n' +
+      '　　違えば\n' +
+      '　　　　「NG」と表示。\n' +
+      '　　ここまで。\n' +
+      '違えば\n' +
+      '　　「NG」と表示。\n' +
+      'ここまで。\n', 'OK')
+    await cmp('A=1\n' +
+      'もしAが3以上ならば\n' +
+      '　　もしA=5ならば\n' +
+      '　　　　「NG」と表示。\n' +
+      '　　違えば\n' +
+      '　　　　「NG」と表示。\n' +
+      '　　ここまで。\n' +
+      '違えば\n' +
+      '　　「OK」と表示。\n' +
+      'ここまで。\n', 'OK')
+  })
+  it('もし - ネスト - 違えばの一致', async () => {
+    await cmp('A=2\n' +
+      'もしAが3以上ならば\n' +
+      '　　もしA=5ならば\n' +
+      '　　　　「NG」と表示。\n' +
+      '　　ここまで\n' +
+      '違えば\n' +
+      '　　「OK」と表示。\n' +
+      'ここまで。\n' +
+      '', 'OK')
+  })
+  it('違えばもし', async () => {
+    // 「違えば」の次がeolではないときfalse_blockが単文扱いになり「ここまで」が不要。
+    await cmp('もし0ならば\n' +
+        '    「NG」を表示\n' +
+        '違えばもし0ならば\n' +
+        '    「NG」を表示\n' +
+        '違えばもし1ならば\n' +
+        '    「OK」を表示\n' +
+        '違えば\n' +
+        '    「NG」を表示\n' +
+        'ここまで\n', 'OK')
+
+    await cmp('もし0ならば\n' +
+        '    「NG」を表示\n' +
+        '違えば、もし0ならば\n' +
+        '    「NG」を表示\n' +
+        '違えば、もし1ならば\n' +
+        '    「OK」を表示\n' +
+        '違えば\n' +
+        '    「NG」を表示\n' +
+        'ここまで\n', 'OK')
+  })
+  it('回', async () => {
+    await cmp('3回「あ」と表示。', 'あ\nあ\nあ')
+    await cmp('A=3;(A)回、Aを表示。', '3\n3\n3')
+  })
+  it('回、ここから', async () => {
+    await cmp('A=3;(A)回、ここから\nAを表示。\nここまで\n', '3\n3\n3')
+    await cmp('A=3;(A)回ここから\nAを表示。\nここまで\n', '3\n3\n3')
+  })
+  it('回、繰り返す(#924)', async () => {
+    await cmp('A=3;(A)回、繰り返す\nAを表示。\nここまで\n', '3\n3\n3')
+    await cmp('A=3;(A)回ここから、繰り返す\nAを表示。\nここまで\n', '3\n3\n3')
+  })
+  it('回繰り返す(#924)', async () => {
+    await cmp('A=3;(A)回繰り返す\nAを表示。\nここまで\n', '3\n3\n3')
+    await cmp('A=3;(A)回繰り返す、ここから\nAを表示。\nここまで\n', '3\n3\n3')
+  })
+  it('回 - 「それ」の自動挿入', async () => {
+    await cmp('1と2を足す\n回\n1を表示\nここまで', '1\n1\n1')
+  })
+  it('の間', async () => {
+    await cmp('N=3;\n(N>0)の間\nNを表示\nN=N-1\nここまで', '3\n2\n1')
+  })
+  it('の間、ここから', async () => {
+    await cmp('N=3;\n(N>0)の間、ここから\nNを表示\nN=N-1\nここまで', '3\n2\n1')
+    await cmp('N=3;\n(N>0)の間ここから\nNを表示\nN=N-1\nここまで', '3\n2\n1')
+  })
+  it('の間、繰り返す #927', async () => {
+    await cmp('N=3;\n(N>0)の間、繰り返す\nNを表示\nN=N-1\nここまで', '3\n2\n1')
+    await cmp('N=3;\n(N>0)の間繰り返す\nNを表示\nN=N-1\nここまで', '3\n2\n1')
+  })
+  it('一致する間', async () => {
+    await cmp('●（AとBが）超一致するとは\n' +
+        '    それはAとBが等しい\n' +
+        'ここまで\n' +
+        'a=1\n' +
+        'i=0\n' +
+        'aと1が超一致する間\n' +
+        '    iを表示\n' +
+        '    i=i+1\n' +
+        '    もしiが3以上ならば\n' +
+        '        a=0\n' +
+        '    ここまで\n' +
+        'ここまで',
+    // ---
+    '0\n1\n2')
+  })
+  it('等しい間', async () => {
+    await cmp('a=1\n' +
+        'i=0\n' +
+        'aと1が等しい間\n' +
+        '    iを表示\n' +
+        '    i=i+1\n' +
+        '    もしiが3以上ならば\n' +
+        '        a=0\n' +
+        '    ここまで\n' +
+        'ここまで',
+    // ---
+    '0\n1\n2')
+  })
+  it('未満の間', async () => {
+    await cmp('i=0\n' +
+        'iが3未満の間\n' +
+        '    iを表示\n' +
+        '    i=i+1\n' +
+        'ここまで',
+    // ---
+    '0\n1\n2')
+  })
+  it('超えの間', async () => {
+    await cmp('i=0' +
+        'iが-3超えの間\n' +
+        '    iを表示\n' +
+        '    i=i-1\n' +
+        'ここまで',
+    // ---
+    '0\n-1\n-2')
+  })
+  it('範囲内の間', async () => {
+    await cmp('i=0' +
+        'iが-3から3の範囲内の間\n' +
+        '    iを表示\n' +
+        '    i=i+1\n' +
+        'ここまで',
+    // ---
+    '0\n1\n2\n3')
+  })
+  it('繰り返す', async () => {
+    await cmp('Nを1から3まで繰り返す\nNを表示\nここまで', '1\n2\n3')
+    await cmp('Nを１から３まで繰り返す\n　　Nを表示\nここまで', '1\n2\n3')
+  })
+  it('繰り返す2', async () => {
+    await cmp('1から3まで繰り返す\nそれを表示\nここまで', '1\n2\n3')
+  })
+  it('連続計算', async () => {
+    await cmp('3に5を足してNに代入;Nを表示', '8')
+    await cmp('3に5を足して2を掛けて表示', '16')
+  })
+  it('もし-日本語による比較', async () => {
+    await cmp('もし3が3と等しいならば「OK」と表示。', 'OK')
+    await cmp('もし(3+2)が5と等しいならば「OK」と表示。', 'OK')
+    await cmp('もし(3+2)が1以上ならば「OK」と表示。', 'OK')
+    await cmp('もし3が5未満ならば「OK」と表示。', 'OK')
+    await cmp('もし(3+10)が(5+10)以下ならば「OK」と表示。', 'OK')
+  })
+  it('もし--一行文。違えば', async () => {
+    await cmp('もし(3+10)が5以下ならば「ng」と表示。違えば「ok」と表示。', 'ok')
+  })
+  it('もし-しなければ', async () => {
+    await cmp('もし{ "a": 30 }に「b」がハッシュキー存在しなければ\n「ok」と表示\nここまで', 'ok')
+    await cmp('もし1と2が等しくなければ\n「ok」と表示\nここまで', 'ok')
+  })
+  it('回-break', async () => {
+    await cmp('3回\n\'a\'と表示。もし(回数=2)ならば、抜ける;\n;ここまで;', 'a\na')
+    await cmp('3回\n\'a\'と表示。もし、回数が2ならば、抜ける;\n;ここまで;', 'a\na')
+  })
+  it('反復 - 配列', async () => {
+    await cmp('[1,2,3]を反復\n対象を表示\nここまで\n', '1\n2\n3')
+  })
+  it('反復 - オブジェクト', async () => {
+    await cmp('{\'a\':1,\'b\':2,\'c\':3}を反復\n対象を表示\nここまで\n', '1\n2\n3')
+    await cmp('{\'a\':1,\'b\':2,\'c\':3}を反復\n対象キーを表示\nここまで\n', 'a\nb\nc')
+  })
+  it('反復 - 変数付き', async () => {
+    await cmp('A=[1,2,3];NでAを反復\nNを表示\nここまで\n', '1\n2\n3')
+    await cmp('Nで[1,2,3]を反復\nNを表示\nここまで\n', '1\n2\n3')
+  })
+  it('反復2 - 変数付き', async () => {
+    await cmp('A=[[3,30],[1,10],[2,20]];NでAを反復\nN[1]を表示\nここまで\n', '30\n10\n20')
+  })
+  it('反復 - prototypeを無視', async () => {
+    await cmp('f=『function F(){}; F.prototype.foo = 20; const f = new F(); f.p1 = 10; f』をJS実行。fを反復して表示', '10')
+  })
+  it('ここから反復', async () => {
+    await cmp('それは[1,2,3];ここから反復\n表示\nここまで\n', '1\n2\n3')
+  })
+  it('ここから繰り返し', async () => {
+    await cmp('ここから1から3まで繰り返し\n表示\nここまで\n', '1\n2\n3')
+  })
+  it('ここから3回', async () => {
+    await cmp('ここから3回\n表示\nここまで\n', '1\n2\n3')
+  })
+  it('不等号', async () => {
+    await cmp('もし、5≧5ならば、「あ」と表示。', 'あ')
+    await cmp('もし、5≧3ならば、「あ」と表示。', 'あ')
+    await cmp('もし、5≦5ならば、「あ」と表示。', 'あ')
+    await cmp('もし、3≦5ならば、「あ」と表示。', 'あ')
+    await cmp('もし、5＝5ならば、「あ」と表示。', 'あ')
+    await cmp('もし、3≠5ならば、「あ」と表示。', 'あ')
+  })
+  it('繰り返しのネスト', async () => {
+    await cmp('C=0;Iを0から3まで繰り返す\nJを0から3まで繰り返す\nC=C+1;ここまで;ここまで;Cを表示', '16')
+  })
+  it('繰り返し:AからBまででA>Bの時', async () => {
+    await cmp('Iを3から0まで繰り返す;Iを表示;ここまで', '3\n2\n1\n0')
+    await cmp('Iを11から9まで繰り返す;Iを表示;ここまで', '11\n10\n9')
+  })
+  it('繰り返し:AからBまででA>Bの時', async () => {
+    await cmp('Iを3から0まで繰り返す;Iを表示;ここまで', '3\n2\n1\n0')
+    await cmp('Iを11から9まで繰り返す;Iを表示;ここまで', '11\n10\n9')
+  })
+  it('もし、と戻るの組み合わせ', async () => {
+    await cmp('●テスト処理\n' +
+        '　　「あ」と表示\n' +
+        '　　もし、3=3ならば、戻る。\n' +
+        '　　「ここには来ない」と表示\n' +
+        'ここまで\n' +
+        'テスト処理。', 'あ')
+    await cmp('●(Sを)テスト処理\n' +
+        '　　Sを大文字変換して表示。\n' +
+        '　　もし、そうならば、戻る。\n' +
+        '　　「ここには来ない」と表示\n' +
+        'ここまで\n' +
+        '「a」をテスト処理。', 'A')
+  })
+  it('もしと抜けるの組み合わせ', async () => {
+    await cmp('Iを1から3まで繰り返す\n' +
+        '　　「あ」と表示\n' +
+        '　　もし、I=2ならば、抜ける。\n' +
+        '　　「い」と表示\n' +
+        'ここまで\n', 'あ\nい\nあ')
+    await cmp('Iを1から3まで繰り返す\n' +
+        '　　2回、「あ」と表示。\n' +
+        '　　もし、I=2ならば、抜ける。\n' +
+        '　　「い」と表示\n' +
+        'ここまで\n', 'あ\nあ\nい\nあ\nあ')
+    await cmp('Iを1から3まで繰り返す\n' +
+        '　　「あ」と表示\n' +
+        '　　もし、I=2ならば、「う」と表示して、抜ける。\n' +
+        '　　「い」と表示\n' +
+        'ここまで\n', 'あ\nい\nあ\nう')
+  })
+  it('もし文のエラー(#378)', async () => {
+    await cmp('●AAAとは\n' +
+        '　　列を1から3まで繰り返す。\n' +
+        '   　　列を表示。' +
+        '　　　　もし、列=2ならば、「*」と表示。\n' +
+        '　　ここまで。\n' +
+        'ここまで\n' +
+        'AAA', '1\n2\n*\n3')
+  })
+  it('条件分岐(#694)', async () => {
+    await cmp('2で条件分岐\n' +
+        '  1ならば\n「a」と表示\nここまで\n' +
+        '  2ならば\n「b」と表示\nここまで\n' +
+        '  3ならば\n「c」と表示\nここまで\n' +
+        '  違えば\n「d」と表示\nここまで\n' +
+        'ここまで\n',
+    'b')
+    await cmp('3で条件分岐\n' +
+    '  1ならば\n「a」と表示\nここまで\n' +
+    '  2ならば\n「b」と表示\nここまで\n' +
+    '  3ならば\n「c」と表示\nここまで\n' +
+    '  違えば\n「d」と表示\nここまで\n' +
+    'ここまで\n',
+    'c')
+    await cmp('5で条件分岐\n' +
+    '  1ならば\n「a」と表示\nここまで\n' +
+    '  2ならば\n「b」と表示\nここまで\n' +
+    '  3ならば\n「c」と表示\nここまで\n' +
+    '  違えば\n「d」と表示\nここまで\n' +
+    'ここまで\n',
+    'd')
+  })
+  it('条件分岐で違えばを省略', async () => {
+    await cmp('2で条件分岐\n' +
+        '  1ならば\n「a」と表示\nここまで\n' +
+        '  2ならば\n「b」と表示\nここまで\n' +
+        '  3ならば\n「c」と表示\nここまで\n' +
+        'ここまで\n',
+    'b')
+    await cmp('5で条件分岐\n' +
+    '  1ならば\n「a」と表示\nここまで\n' +
+    '  2ならば\n「b」と表示\nここまで\n' +
+    '  3ならば\n「c」と表示\nここまで\n' +
+    'ここまで\n',
+    '')
+  })
+  it('条件分岐で違えばの後にカンマがあってもエラーにならない #942', async () => {
+    await cmp('A=0;2で条件分岐\n' +
+        '  1ならば、A=A+1\nここまで\n' +
+        '  2ならば、A=A+2\nここまで\n' +
+        '  3ならば、A=A+3\nここまで\n' +
+        '  違えば、A=A+10\nここまで\n' +
+        'ここまで\nAを表示',
+    '2')
+  })
+  it('N回をN|回に分ける', async () => {
+    await cmp('S="";N=3;N回、S=S&"a";Sを表示。', 'aaa')
+    await cmp('S="";N=3;N回\nS=S&"a";💧;Sを表示。', 'aaa')
+  })
+  it('「、」と「，」の違いが分かりづらい #877', async () => {
+    await cmp('もし,0ならば,\n' +
+        '    「NG」を表示\n' +
+        '違えば,もし,0ならば\n' +
+        '    「NG」を表示\n' +
+        '違えば,もし,1ならば\n' +
+        '    「OK」を表示\n' +
+        '違えば,\n' +
+        '    「NG」を表示\n' +
+        'ここまで\n', 'OK')
+    await cmp('S="";[1,2,3]を,反復,\n' +
+        '    S=S&対象\n' +
+        'ここまで。Sを表示。\n', '123')
+    await cmp('S="";[1,2,3]を,反復,ここから,\n' +
+        '    S=S&対象\n' +
+        'ここまで。Sを表示。\n', '123')
+  })
+  it('「。。。」＝「ここまで」#925', async () => {
+    await cmp('S="";3回;S=S&"a";;;Sを表示。', 'aaa')
+    await cmp('A=0;3回\nA=A+1;;;Aを表示。', '3')
+    await cmp(
+      'A=0;3回\n' +
+      '  A=A+1;\n' +
+      '  A=A+1;\n' +
+      '。。。;Aを表示。', '6')
+    await cmp(
+      'S=「」。3回\n' +
+      '  S=S&「a」\n' +
+      '  S=S&「b」。。。\n' +
+      'Sを表示。\n', 'ababab')
+  })
+  it('「或いは」「あるいは」を追加#987', async () => {
+    await cmp('A=3;もし、A=3或いはA=5あるいはA=7ならば「OK」と表示。違えば「NG」と表示。', 'OK')
+    await cmp('A=3;もし、A=5あるいはA=3ならば「OK」と表示。違えば「NG」と表示。', 'OK')
+    await cmp('A=空;B=3;もし(A=空)あるいは(B=空)ならば、"OK"と表示;違えば「NG」と表示。', 'OK')
+  })
+  it('「増繰り返す」「減繰り返す」を追加#1140', async () => {
+    await cmp('Nを0から4まで2ずつ増やし繰り返す\nNを表示\nここまで\n', '0\n2\n4')
+    await cmp('A=2;Nを0から4までAずつ増やし繰り返す\nNを表示\nここまで\n', '0\n2\n4')
+    await cmp('Nを4から0まで2ずつ減らし繰り返す\nNを表示\nここまで\n', '4\n2\n0')
+  })
+  it('「増やして繰り返す」「減らして繰り返す」を追加#1140', async () => {
+    // トークンをスタックからポップして処理するので確認
+    await cmp('Nを0から4まで2ずつ増やして繰り返す\nNを表示\nここまで\n', '0\n2\n4')
+    await cmp('A=2;Nを0から4までAずつ増やして繰り返す\nNを表示\nここまで\n', '0\n2\n4')
+    await cmp('Nを4から0まで2ずつ減らして繰り返す\nNを表示\nここまで\n', '4\n2\n0')
+  })
+  it('ならばの直前に空白があるとエラー(#1141)', async () => {
+    await cmp('A=30。もし、A>5 ならば、「OK」と表示。', 'OK')
+  })
+})

package/core/test/func_call.mjs

@@ -0,0 +1,160 @@
+/* eslint-disable no-undef */
+import assert from 'assert'
+import { NakoCompiler } from '../src/nako3.mjs'
+import { NakoSyntaxError } from '../src/nako_errors.mjs'
+
+describe('関数呼び出しテスト', 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)
+  }
+  const cmd = (/** @type {string} */ code) => {
+    const nako = new NakoCompiler()
+    nako.logger.debug('code=' + code)
+    nako.run(code)
+  }
+  // --- test ---
+  it('関数式の呼び出し - 足す(2,3)を表示。', async () => {
+    await cmp('足す(2,3)を表示。', '5')
+  })
+  it('四則演算を連文で', async () => {
+    await cmp('1に2を足して3を掛けて3で割って2を引いて表示', '1')
+  })
+  it('「そう」のテスト', async () => {
+    await cmp('３が１以上。もしそうならば「真」と表示。', '真')
+  })
+  it('後方で定義した関数を前方で使う1', async () => {
+    await cmp('HOGE(3,4)を表示;●(A,B)HOGEとは;それはA+B;ここまで;', '7')
+    await cmp('「姫」と「殿」が出会って表示;●(AとBが)出会うとは;それはA&B;ここまで;', '姫殿')
+  })
+  it('後方で定義した関数を前方で使う2', async () => {
+    await cmp('Nとは変数=30;HOGE(3,4)を表示;●(A,B)HOGEとは;それはA+B+N;ここまで;', '37')
+  })
+  it('代入と表示', async () => {
+    await cmp('A=今日;もし(今日=A)ならば「1」と表示', '1')
+  })
+  it('代入1', async () => {
+    await cmp('A=今日の曜日番号取得;B=(今日)の曜日番号取得;もしA=Bならば「等しい」を表示。', '等しい')
+  })
+  it('代入2', async () => {
+    await cmp('Aは、今日の曜日番号取得;Bは、(今日)の曜日番号取得;もしA=Bならば「等しい」を表示。', '等しい')
+  })
+  it('代入3', async () => {
+    await cmp('A=(今日の曜日番号取得)+1;B=((今日)の曜日番号取得)+1;もしA=Bならば「等しい」を表示。', '等しい')
+  })
+  it('配列への代入', async () => {
+    await cmp('値段は空配列。値段[0]に3000を代入。値段[0]を表示。', '3000')
+  })
+  it('**には**構文 - 基本', async () => {
+    await cmp('実行には;「あ」と表示;ここまで', 'あ')
+  })
+  it('**には**構文 - 配列カスタムソート', async () => {
+    await cmp('A=[5,1,3];Aを配列カスタムソートするには(a,b);それはb-a;ここまで;Aを「:」で配列結合して表示', '5:3:1')
+  })
+  it('階乗計算 - 再帰', async () => {
+    await cmp('●(VをAのBで)階乗計算とは;' +
+      'もし、Bが0以下ならば、Vを戻す。;(V*A)をAの(B-1)で階乗計算して戻す。' +
+      'ここまで。;1を2の3で階乗計算して表示。', '8')
+  })
+  it('連続文後の代入', async () => {
+    await cmp('「2017/09/01T00:00:99」の「T」を「 」に置換して「 」まで切り取り、対象日に代入。対象日を表示。', '2017/09/01')
+  })
+  it('連続文後の=代入', async () => {
+    await cmp('対象日=「2017/09/01T00:00:99」の「T」を「 」に置換して「 」まで切り取る。対象日を表示。', '2017/09/01')
+  })
+  it('関数の引数に関数呼び出しがある場合', async () => {
+    await cmp('A=「ab」;「abcd」の1から(Aの文字数)だけ文字削除。それを表示。', 'cd')
+  })
+  it('配列カスタムソートの基本的な使い方例', async () => {
+    await cmp('●MYSORT(a,b)とは\n' +
+        '(INT(a) - INT(b))で戻る。\n' +
+        'ここまで。\n' +
+        'ARY=[8,3,4];' +
+        '「MYSORT」でARYを配列カスタムソートしてJSONエンコードして表示', '[3,4,8]')
+  })
+  it('引数の順番を入れ替えて呼び出す(#342)その1', async () => {
+    await cmp('『abc』の『a』を「*」に置換。表示', '*bc')
+    await cmp('『a』を「*」に『abc』の置換。表示', '*bc')
+    await cmp('「*」へ『a』から『abc』の置換。表示', '*bc')
+    await cmp('「abcdefg」の1から3だけ文字削除して表示。', 'defg')
+    await cmp('「abcdefg」の1から3を文字削除して表示。', 'defg')
+    await cmp('1から3を「abcdefg」の文字削除して表示。', 'defg')
+    await cmp('3を「abcdefg」の1から文字削除して表示。', 'defg')
+    await cmp('3だけ「abcdefg」の1から文字削除して表示。', 'defg')
+  })
+  it('引数の順番を入れ替えて呼び出す(#342)その2', async () => {
+    await cmp('[8,3,4]の配列カスタムソートには(a,b)\nそれは(a - b)\nここまで。それをJSONエンコードして表示', '[3,4,8]')
+    await cmp('[8,3,4]を配列カスタムソートには(a,b)\nそれは(a - b)\nここまで。それをJSONエンコードして表示', '[3,4,8]')
+    await cmp('[8,3,4]の配列カスタムソートには(a,b)\nそれは(INT(a) - INT(b))\nここまで。それをJSONエンコードして表示', '[3,4,8]')
+  })
+  it('引数の順番を入れ替えて呼び出す(#342)その3', async () => {
+    await cmp('ARY=[8,3,4];' +
+        'ARYの配列カスタムソートには(a,b)\n' +
+        'aと255のXORをAに代入。bと255のXORをBに代入。' +
+        'それは(INT(a) - INT(b))\n' +
+        'ここまで。\n' +
+        'ARYをJSONエンコードして表示', '[3,4,8]')
+  })
+  it('可変長引数 #729', async () => { // 経緯 #501 → #729
+    await cmp('連続加算(1,2,3)を表示。', '6')
+    await cmp('1と2と3を連続加算して表示。', '6')
+    await cmp('1に2と3を連続加算して表示。', '6')
+  })
+  // ---
+  it('関数呼び出し演算子に変更(1) #891', async () => {
+    await cmp('表示←3', '3')
+    await cmp('表示←3を', '3')
+    await cmp('表示←INT←3.14', '3')
+    await cmp('足す←2に3を;それを表示;', '5')
+    await cmp('割る←10を2で;それを表示;', '5')
+    await cmp('割る<--2で10を;それを表示', '5')
+  })
+  it('関数呼び出し演算子に変更(2) #891', async () => {
+    await cmp('A=(割る<--10を2で)+2;Aを表示;', '7')
+    await cmp('(割る←10を2で)を表示;', '5')
+    await cmp('割る<--2で(割る←100を10で)を;それを表示', '5')
+    await cmp('(割る←100を10で)を2で割って表示', '5')
+  })
+  it('関数呼び出し演算子に変更(ユーザー関数) #891', async () => {
+    await cmp('●(Aを)AAA;それはA*2;ここまで;AAA←30;それを表示', '60')
+    await cmp('●(AをBで)AAA;それはA/B;ここまで;AAA←30を3で;それを表示', '10')
+  })
+  it('エラー/関数の呼び出し演算子 #891/引数がない関数', async () => {
+    const funcName = 'AAA'
+    assert.throws(
+      () => cmd(`●${funcName};それは5;ここまで;${funcName}←`),
+      NakoSyntaxError, `引数がない関数『${funcName}』を関数呼び出し演算子で呼び出すことはできません。`
+    )
+  })
+  it('エラー/関数の呼び出し演算子 #891/引数が異なる', async () => {
+    const funcName = 'テスト'
+    assert.throws(
+      () => cmd(`●${funcName}(aとbを);それはa*b;ここまで;${funcName}<--8と`),
+      NakoSyntaxError, `関数『${funcName}』呼び出しで引数の数(1)が定義(2)と違います。`
+    )
+  })
+  it('ローカル変数が解決できない1 #1210', async () => {
+    await cmp('S＝「あいうえお」;A＝「かきくけこ」;AをFテスト;●(Sを)Fテストとは;Sを表示;ここまで', 'かきくけこ')
+  })
+  it('ローカル変数が解決できない2 #1210', async () => {
+    await cmp('S＝「あいうえお」;Fテスト;●Fテストとは;Sとは変数=30;Sを表示;ここまで', '30')
+    await cmp('S＝「あいうえお」;Fテスト;Sを表示;●Fテストとは;Sとは変数=30;ここまで', 'あいうえお')
+    await cmp('A=10;B=20;Aを三倍処理して表示;●(Bを)三倍処理とは;Aとは変数=3;A*Bを戻す;ここまで', '30')
+  })
+  it('ローカル変数の配列が解決できない2 #1213', async () => {
+    await cmp(`
+    変数 A＝空配列。
+    B＝[10,20,30]
+    BでAAテスト    
+    ●(Aで)AAテスト
+        もし(A[0]=10)かつ(A[1]=20)ならば「OK」を表示。
+        違えば,「NG」を表示。# （えっ！）
+    ここまで。
+    `, 'OK')
+  })
+  it('ひらがなだけの関数名がエラーになる #1214', async () => {
+    await cmp('あ。;●あとは;「A」と表示;ここまで', 'A')
+    await cmp('おくら。;●おくらとは;「O」と表示;ここまで', 'O')
+  })
+})