nadesiko3 3.3.48 → 3.3.49

package/core/test/dncl_test.mjs

@@ -0,0 +1,94 @@
+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')
+  })
+})

package/core/test/error_message_test.mjs

@@ -0,0 +1,210 @@
+/* eslint-disable no-undef */
+import { NakoCompiler } from '../src/nako3.mjs'
+import { NakoSyntaxError, NakoRuntimeError, NakoIndentError, NakoLexerError } from '../src/nako_errors.mjs'
+import assert from 'assert'
+
+// eslint-disable-next-line no-undef
+describe('error_message', () => {
+  const nako = new NakoCompiler()
+  const cmp = (/** @type {string} */ code, /** @type {string[]} */ resArr, /** @type {typeof NakoLexerError} */ ErrorClass, _nako = nako) => {
+    _nako.reset()
+    _nako.logger.debug('code=' + code)
+    assert.rejects(
+      async () => await _nako.run(code, path.join(__dirname, 'main.nako3')),
+      (err) => {
+        assert(err instanceof ErrorClass)
+        for (const res of resArr) {
+          if (!err.message.includes(res)) {
+            throw new Error(`${JSON.stringify(err.message)} が ${JSON.stringify(res)} を含みません。`)
+          }
+        }
+        return true
+      }
+    )
+  }
+
+  describe('字句解析エラー', () => {
+    it('エラー位置の取得', () => {
+      cmp('\n「こんに{ちは」と表示する', [
+        '2行目',
+        'main.nako3'
+      ], NakoLexerError)
+    })
+  })
+
+  describe('構文エラー', () => {
+    it('比較', () => {
+      return cmp('「こんにち」はを表示', [
+        '不完全な文です。',
+        '演算子『＝』が解決していません。',
+        '演算子『＝』は『文字列『こんにち』と単語『を表示』が等しいかどうかの比較』として使われています。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('単項演算子', () => {
+      cmp('!(はい + 1)', [
+        '不完全な文です。',
+        '演算子『not』が解決していません。',
+        '演算子『not』は『演算子『+』に演算子『not』を適用した式』として使われています。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('2項演算子', () => {
+      cmp('1 + 2', [
+        '不完全な文です。',
+        '演算子『+』が解決していません。',
+        '演算子『+』は『数値1と数値2に演算子『+』を適用した式』として使われています。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('変数のみの式', () => {
+      cmp('A', [
+        '不完全な文です。',
+        '単語『A』が解決していません。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('複数のノードが使われていない場合', () => {
+      cmp('あ「こんにちは」はは表示', [
+        '不完全な文です。',
+        '単語『あ』、演算子『＝』が解決していません。',
+        '演算子『＝』は『文字列『こんにちは』と単語『は表示』が等しいかどうかの比較』として使われています。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('関数の宣言でエラー', () => {
+      cmp('●30とは', [
+        '関数30の宣言でエラー。',
+        'main.nako3'
+      ], NakoSyntaxError)
+    })
+    it('"_"がある場合', () => {
+      cmp(
+        'a = [ _\n' +
+        '    1, 2, 3\n' +
+        ']\n' +
+        '「こんにちは」」と表示する', [
+          '4行目',
+          'main.nako3'
+        ], NakoLexerError
+      )
+    })
+  })
+  describe('実行時エラー', () => {
+    it('「エラー発生」の場合', () => {
+      cmp(
+        '「エラーメッセージ」のエラー発生', [
+          '1行目'
+        ], NakoRuntimeError)
+    })
+    it('エラー位置をプロパティから取得 - 単純な例', () => {
+      assert.throws(
+        () => nako.run('1を表示\n1のエラー発生', 'main.nako3'),
+        err => {
+          assert.strictEqual(err.type, 'NakoRuntimeError')
+          assert.strictEqual(err.line, 1) // 2行目
+          assert.strictEqual(err.file, 'main.nako3')
+          return true
+        }
+      )
+    })
+    it('エラー位置をプロパティから取得 - 前後に文がある場合', () => {
+      assert.throws(
+        () => nako.run('1を表示\n1を表示。1のエラー発生。1を表示。', 'main.nako3'),
+        err => {
+          assert.strictEqual(err.type, 'NakoRuntimeError')
+          assert.strictEqual(err.line, 1) // 2行目
+          assert.strictEqual(err.file, 'main.nako3')
+          return true
+        }
+      )
+    })
+    it('エラー位置をプロパティから取得 - 1行目の場合', () => {
+      assert.throws(
+        () => nako.run('1のエラー発生', 'main.nako3'),
+        err => {
+          assert.strictEqual(err.type, 'NakoRuntimeError')
+          assert.strictEqual(err.line, 0) // 1行目
+          assert.strictEqual(err.file, 'main.nako3')
+          return true
+        }
+      )
+    })
+    it('エラー位置をプロパティから取得 - repeatTimes', () => {
+      const nako = new NakoCompiler()
+      assert.throws(
+        () => nako.run('3回\n1のエラー発生\nここまで', 'main.nako3'),
+        err => {
+          assert.strictEqual(err.type, 'NakoRuntimeError')
+          assert.strictEqual(err.line, 1) // 2行目
+          assert.strictEqual(err.file, 'main.nako3')
+          return true
+        }
+      )
+    })
+    it('「秒後」の中でエラーが発生した場合', async () => {
+      const nako = new NakoCompiler()
+      const logger = nako.getLogger()
+      logger.addListener('error', ({ level, noColor }) => {
+        const s = (noColor + '\n').split('\n')[0]
+        assert.strictEqual(level, 'error')
+        assert.strictEqual(s, '[実行時エラー]main.nako3(2行目): 1')
+      })
+      await nako.run('0.0001秒後には\n1のエラー発生\nここまで', 'main.nako3')
+    })
+  })
+  describe('インデント構文のエラー', () => {
+    it('『ここまで』を使用', () => {
+      cmp(
+        '！インデント構文\n' +
+        'もしはいならば\n' +
+        'ここまで\n', [
+          '3行目',
+          'main.nako3',
+          'インデント構文が有効化されているときに『ここまで』を使うことはできません。'
+        ], NakoIndentError)
+    })
+    it('『ここまで』を使用 - "_"を使った場合', () => {
+      cmp(
+        '！インデント構文\n' +
+        'A=[ _\n' +
+        ']\n' +
+        'ここまで\n', [
+          '4行目',
+          'main.nako3'
+        ], NakoIndentError)
+    })
+  })
+  describe('警告の表示', () => {
+    it('未定義の変数を参照したとき', () => {
+      const compiler = new NakoCompiler()
+      let log = ''
+      compiler.logger.addListener('warn', ({ noColor }) => { log += noColor })
+      compiler.run('xを表示', 'main.nako3')
+      assert.strictEqual(log.split('。')[0], '[警告]main.nako3(1行目): 変数『x』は定義されていません')
+    })
+    it('存在しない高速化オプションを指定したとき', () => {
+      const compiler = new NakoCompiler()
+      let log = ''
+      compiler.logger.addListener('warn', ({ noColor }) => { log += noColor })
+      compiler.run('「あ」で実行速度優先\nここまで', 'main.nako3')
+      assert.strictEqual(log, '[警告]main.nako3(1行目): 実行速度優先文のオプション『あ』は存在しません。')
+    })
+    it('ユーザー定義関数を上書きしたとき', () => {
+      const compiler = new NakoCompiler()
+      let log = ''
+      compiler.logger.addListener('warn', ({ noColor }) => { log += noColor }, false)
+      compiler.run('●Aとは\nここまで\n●Aとは\nここまで', 'main.nako3')
+      assert.strictEqual(log, '[警告]main.nako3(3行目): 関数『A』は既に定義されています。')
+    })
+    it('プラグイン関数を上書きしたとき', () => {
+      const compiler = new NakoCompiler()
+      let log = ''
+      compiler.logger.addListener('warn', ({ noColor }) => { log += noColor }, false)
+      compiler.run('●（Aを）足すとは\nここまで', 'main.nako3')
+      // 上記は「main::足す」という関数を定義したことになる
+      // assert.strictEqual(log, '[警告]main.nako3(1行目): 関数『足』は既に定義されています。')
+      assert.strictEqual(log, '')
+    })
+  })
+})

package/core/test/error_test.mjs

@@ -0,0 +1,16 @@
+import assert from 'assert'
+import { NakoCompiler } from '../src/nako3.mjs'
+
+describe('error_test', () => {
+  // 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)
+  }
+  // --- test ---
+  it('エラー処理 - 基本', async () => {
+    await cmp('123を表示', '123')
+    await cmp('エラー監視;「hoge」のエラー発生;エラーならば;「ERR」と表示;ここまで', 'ERR')
+  })
+})