nadesiko3 3.2.27

package/test/bundled/test_base/basic_ajax_test.js

@@ -0,0 +1,56 @@
+const TestEnv = require('./test_utils').TestEnv
+
+describe('basic ajax', () => {
+  const env = new TestEnv()
+  before( function () {
+    env.getEnv()
+  })
+
+  it('POSTデータ生成', () => {
+    const code = `
+パラメータは空オブジェクト。
+パラメータ["KEY"]は、「VALUE」。
+パラメータ["_X"]は、「XE^ZA」。
+パラメータ["SPACE"]は、「 」。
+パラメータをPOSTデータ生成して報告する。
+`
+    env.cmpReport(code, ["KEY=VALUE&_X=XE%5EZA&SPACE=%20"])
+  })
+
+  it('AJAXオプション設定', () => {
+    const code = `
+パラメータは空オブジェクト。
+パラメータ["KEY"]は、「VALUE」。
+パラメータにAJAXオプション設定する。
+AJAXオプションを報告する。
+`
+    env.cmpReport(code, [{"KEY":"VALUE"}])
+  })
+
+  it('AJAX送信時', (done) => {
+    const code = '「/resources/ok.txt」へAJAX送信時には;対象を報告する;ここまで'
+    env.waitCmpReport(done ,code, ["OK"])
+  })
+
+  it('POST送信時', (done) => {
+    const code = `
+パラメータは空オブジェクト。
+パラメータ["param1"]は、「data1^」。
+パラメータ["param2"]は、「data2^^」。
+パラメータを「/resources/ok.txt」へPOST送信時には
+対象を報告する。
+ここまで
+`
+    env.waitCmpReport(done ,code, ["OK"])
+  }).timeout(10000)
+
+  it('AJAX送信', (done) => {
+    const code = `
+逐次実行
+次に、「/resources/ok.txt」へAJAX送信する。
+次に、対象を報告する。
+ここまで
+`
+    env.waitCmpReport(done ,code, ["OK"])
+  })
+})

package/test/bundled/test_base/basic_async_test.js

@@ -0,0 +1,18 @@
+const TestEnv = require('./test_utils').TestEnv
+
+describe('basic async', () => {
+  const env = new TestEnv()
+  before( function () {
+    env.getEnv()
+  })
+
+  it('同期タイマー', (done) => {
+    const code = '' +
+      '逐次実行\n' +
+      '先に、0.01秒待機\n' +
+      '次に、30を報告\n' +
+      'ここまで。\n'
+    env.waitCmpReport(done ,code, [30])
+  })
+
+})

package/test/bundled/test_base/basic_test.js

@@ -0,0 +1,153 @@
+const TestEnv = require('./test_utils').TestEnv
+
+describe('basic', () => {
+  const env = new TestEnv()
+  before( function () {
+    env.getEnv()
+  })
+
+  const cmp = (code, res) => {
+    env.cmpInfo(code, res)
+  }
+  // --- test ---
+  it('print simple', () => {
+    cmp('3を表示', '3')
+  })
+  it('print', () => {
+    cmp('3を表示', '3')
+    cmp('100を表示', '100')
+    cmp('0xFFを表示', '255')
+  })
+  it('string', () => {
+    cmp('「abc」を表示', 'abc')
+    cmp('"abc"を表示', 'abc')
+    cmp('“あいう”を表示', 'あいう')
+  })
+  it('rawstring', () => {
+    cmp('『abc』を表示', 'abc')
+    cmp('\'abc\'を表示', 'abc')
+    cmp('『abc{30}abc』を表示', 'abc{30}abc')
+  })
+  it('exstring', () => {
+    cmp('a=30;「abc{a}abc」を表示', 'abc30abc')
+    cmp('a=30;「abc｛a｝abc」を表示', 'abc30abc')
+  })
+  it('raw string - 🌿 .. 🌿', () => {
+    cmp('a=🌿abc🌿;aを表示', 'abc')
+  })
+  it('EX string - 🌴 .. 🌴', () => {
+    cmp('v=30;a=🌴abc{v}abc🌴;aを表示', 'abc30abc')
+  })
+  it('string - LF', () => {
+    cmp('a=30;「abc\nabc」を表示', 'abc\nabc')
+  })
+  it('space 「・」', () => {
+    cmp('・a=30;・b=50「{a}-{b}」を表示', '30-50')
+  })
+  it('string - 🌴 ... 🌴', () => {
+    cmp('🌴aaa🌴を表示', 'aaa')
+    cmp('a=30;🌴aaa{a}bbb🌴を表示', 'aaa30bbb')
+    cmp('a=30;🌿aaa{a}bbb🌿を表示', 'aaa{a}bbb')
+  })
+  it('システム定数', () => {
+    cmp('ナデシコエンジンを表示', 'nadesi.com/v3')
+  })
+  it('助詞の後に句読点', () => {
+    cmp('「こんにちは」と、表示。', 'こんにちは')
+  })
+  it('代入文', () => {
+    cmp('3000を値段に代入。値段を表示', '3000')
+    cmp('値段に3000を代入。値段を表示', '3000')
+    cmp('々=3000。々を表示', '3000')
+    cmp('々に3000を代入。々を表示', '3000')
+  })
+  it('連文後の代入文', () => {
+    cmp('「aabbcc」の「aa」を「」に置換してFに代入。Fを表示', 'bbcc')
+    cmp('「aabbcc」の「aa」を「」に置換して「bb」を「」に置換してFに代入。Fを表示', 'cc')
+  })
+  it('〜を〜に定める', () => {
+    cmp('Aを0.8に定めてAを表示', '0.8')
+  })
+  it('文字列 - &と改行', () => {
+    cmp('「aaa」& _\n「bbb」を表示。', 'aaabbb')
+    cmp('A= 1 + 1 + 1 + 1 + 1 + _\n1 + 1\nAを表示', '7')
+    cmp('A= 1 + 1 + 1 + 1 + 1 + _\r\n1 + 1 + 1\r\nAを表示', '8')
+    cmp('A= 1 + 1 + 1 + 1 + 1 + _  \r\n1 + 3  \r\nAを表示', '9')
+    cmp('A = 1 + _\n' +
+      '    5 + _\n' +
+      '    10\n' +
+      'Aを表示。', '16')
+  })
+  it('名前に数字を持つ変数を使う', () => {
+    cmp('A1=30;B1=20;「{A1}{B1}」を表示。', '3020')
+  })
+  it('名前に絵文字を持つ変数を使う', () => {
+    cmp('\u1F60=30;\u1F60を表示。', '30')
+    cmp('😄=30;😄を表示。', '30')
+  })
+  it('ラインコメントが正しく処理されない問題 (#112)', () => {
+    cmp('A=50 # hogehoge\nAを表示', '50')
+    cmp('A=50 ＃ hogehoge\nAを表示', '50')
+    cmp('A=50 ※ hogehoge\nAを表示', '50')
+    cmp('A=50 // hogehoge\nAを表示', '50')
+    cmp('A=50 ／／ hogehoge\nAを表示', '50')
+    cmp('A=50\nもしA=50ならば # hogehoge\nAを表示\nここまで\n', '50')
+    cmp('A=50\nもしA=50ならば ＃ hogehoge\nAを表示\nここまで\n', '50')
+    cmp('A=50\nもしA=50ならば ※ hogehoge\nAを表示\nここまで\n', '50')
+    cmp('A=50\nもしA=50ならば // hogehoge\nAを表示\nここまで\n', '50')
+    cmp('A=50\nもしA=50ならば ／／ hogehoge\nAを表示\nここまで\n', '50')
+  })
+  it('ラインコメントに文字列記号があり閉じていないとエラーになる(#725)', () => {
+    cmp('A=50 # \"hogehoge\nAを表示', '50')
+  })
+  it('範囲コメントに文字列記号があり閉じていないとエラーになる(#731)', () => {
+    cmp('A=50 /* " */Aを表示', '50')
+    cmp('A=50 /* \' */Aを表示', '50')
+  })
+  it('論文などで使われる句読点「，」を「、」(#735)', () => {
+    cmp('A1=30;B1=20;(A1+B1)を，表示', '50')
+    cmp('A=３．１４;Aを，表示', '3.14')
+  })
+  it('条件分岐のインデント構文', () => {
+    cmp(
+      '！インデント構文\n' +
+      '3で条件分岐\n' +
+      '    2ならば\n' +
+      '        1を表示\n' +
+      '    3ならば\n' +
+      '        2を表示\n' +
+      '    違えば\n' +
+      '        3を表示\n',
+      '2'
+    )
+  })
+  it('空白で区切って文をつなげた場合', () => {
+    cmp('1と2を足す 1と2を足す', '')
+  })
+  it('制御構文で一語関数を使う', () => {
+    cmp('●一とは\n1を戻す\nここまで\nもし一ならば\n1を表示\nここまで', '1') // if
+    cmp('●一とは\n1を戻す\nここまで\n一回\n1を表示\nここまで', '1') // times
+    cmp('●一とは\n1を戻す\nここまで\n一の間\n1を表示\n抜ける\nここまで', '1') // while
+    cmp('●一とは\n[1]を戻す\nここまで\n一を反復\n1を表示\nここまで', '1') // foreach
+    cmp('●一とは\n1を戻す\nここまで\n一で条件分岐\n1ならば\n1を表示\nここまで\nここまで', '1') // switch
+  })
+  it('そう', () => {
+    // 「そう」は「それ」のエイリアス
+    cmp('それ＝1;そうを表示', '1')
+    cmp('1に3を足す;そうを表示', '4')
+  })
+  it('「〜時間」の「間」を制御構文として認識させない #831', () => {
+    cmp('時間=1\n（時間）を表示', '1')
+  })
+  it('「もしFが存在するならば」がFと「存在する」の比較になる問題の修正 #830', () => {
+    cmp('●（Aが）hogeとは\n' +
+        '    1を戻す\n' +
+        'ここまで\n' +
+        'もし、Fがhogeならば\n' +
+        '    1を表示\n' +
+        'ここまで',
+        // ---
+        '1')
+  })
+
+})

package/test/bundled/test_base/calc_test.js

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

package/test/bundled/test_base/css/browsers_box.css

@@ -0,0 +1,114 @@
+/* reset style */
+h1, h3, .sbox h4, .edit_head, .buttons, #info {
+  margin: 0;
+}
+
+h1, h3, #info {
+  padding: 0.5em;
+}
+
+/* title */
+h1#title, h1 {
+  background-color: #fff0f0;
+  margin: 0;
+  padding: 4px;
+  color: black;
+  font-size: 1.3em;
+}
+
+/* menubar */
+div.menubar {
+  background-color: #f0e0e0;
+  font-size: 0.8em;
+  color: black;
+  margin: 0; padding: 4px;
+  overflow: hidden;
+}
+h3, .info, .err, #src_box, .src {
+  font-size: 1em;
+}
+
+h3 {
+  background-color: #e0e0e0;
+  border-bottom: 1px solid gray;
+}
+
+
+.sbox h4 {
+  font-size: 0.9em;
+  padding: 4px;
+}
+
+.default_button {
+  min-width: 10em;
+}
+.mini_button {
+  width: 1em;
+}
+
+button {
+  padding: 0.4em;
+  cursor: pointer;
+}
+
+.turtle_canvas {
+  border: 1px solid silver;
+}
+
+.turtle_box, .buttons {
+  text-align: center;
+}
+
+.edit_head, .buttons {
+  padding: 0.3em;
+}
+
+.edit_head {
+  font-size: 0.8em;
+  color: gray;
+}
+
+.edit_div {
+  margin: 0.5em;
+  padding: 0;
+}
+
+.info, .err, #src_box, .src {
+  line-height: 1.5em;
+}
+
+.info, .err {
+  border: 1px solid gray;
+  padding: 8px;
+}
+
+.info {
+  background-color: #f0fff0;
+  margin-top: 0;
+}
+
+.err {
+  background-color: #fff0f0;
+}
+
+#src_box, .src, #info {
+  width: 99%;
+}
+
+#src_box {
+  background-color: #fffff0;
+}
+
+.src {
+  background-color: #fafafa;
+}
+
+.src_read {
+  background-color: #f0f0f0;
+}
+
+.sbox {
+  border-bottom: 1px solid silver;
+  margin: 8px;
+  padding: 12px;
+}

package/test/bundled/test_base/html/custom_context.html

@@ -0,0 +1,69 @@
+<!DOCTYPE html>
+<!--
+This is the execution context.
+Loaded within the iframe.
+Reloaded before every execution run.
+-->
+<html>
+<head>
+  <title></title>
+  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
+  <meta http-equiv="X-UA-Compatible" content="IE=edge" >
+  <meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1, user-scalable=no" />
+  <link rel="stylesheet" href="/css/browsers_box.css">
+</head>
+<body>
+  <h1>なでしこブラウザテスト</h1>
+  <!-- editor -->
+  <div id="editor" class="edit_div">
+    <h2 class="edit_head">簡易エディタ:</h2>
+    <textarea id="src_box" rows="4"></textarea>
+    <div class="buttons">
+      <button id="run_button" class="default_button">実行</button>
+      <button id="reset_button" class="default_button">クリア</button>
+    </div>
+    <div class="result_box">
+      <h3 class="edit_head">結果:</h3>
+      <textarea id="info" class="info" style="textAlign: left"></textarea>
+      <div id="json" class="info" style="textAlign: left"></div>
+      <div id="err" class="err"><span id="errName"></span><br><span id="errMessage"></span></div>
+      <!-- <canvas id="turtle_cv" class="turtle_canvas" width="280" height="380"></canvas>
+      <div id="turtle3d_div" class="turtle_div" width="280" height="380" style="width:280;height:380"></div> -->
+    </div>
+  </div>
+  <!-- なでしこ-->
+  <script src="/release/wnako3.js"></script>
+  <script src="/js/browsers_box.js"></script>
+  <script src="/release/plugin_kansuji.js"></script>
+  <script src="/release/plugin_markup.js"></script>
+  <script src="/release/plugin_datetime.js"></script>
+  <script src="/release/plugin_csv.js"></script>
+  <script src="/release/plugin_caniuse.js"></script>
+  <script src="/release/plugin_webworker.js"></script>
+  <!-- <script src="/release/plugin_turtle.js"></script> -->
+  <!-- <script src="/release/plugin_weykturtle3d.js"></script> -->
+  <!-- The scripts need to be in the body DOM element, as some test running frameworks need the body
+       to have already been created so they can insert their magic into it. For example, if loaded
+       before body, Angular Scenario test framework fails to find the body and crashes and burns in
+       an epic manner. -->
+  <script src="context.js"></script>
+  <script type="text/javascript">
+    // Configure our Karma and set up bindings
+    %CLIENT_CONFIG%
+    window.__karma__.setupContext(window);
+
+    // All served files with the latest timestamps
+    %MAPPINGS%
+  </script>
+  <!-- Dynamically replaced with <script> tags -->
+  %SCRIPTS%
+  <!-- Since %SCRIPTS% might include modules, the `loaded()` call needs to be in a module too.
+   This ensures all the tests will have been declared before karma tries to run them. -->
+  <script type="module">
+    window.__karma__.loaded();
+  </script>
+  <script nomodule>
+    window.__karma__.loaded();
+  </script>
+</body>
+</html>

package/test/bundled/test_base/html/custom_debug.html

@@ -0,0 +1,71 @@
+<!doctype html>
+<!--
+This file is almost the same as context.html - loads all source files,
+but its purpose is to be loaded in the main frame (not within an iframe),
+just for immediate execution, without reporting to Karma server.
+-->
+<html>
+<head>
+%X_UA_COMPATIBLE%
+  <title>Karma DEBUG RUNNER</title>
+  <meta http-equiv="X-UA-Compatible" content="IE=edge" >
+  <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
+  <link href="favicon.ico" rel="icon" type="image/x-icon" />
+  <meta name="viewport" content="width=device-width, initial-scale=1, maximum-scale=1, user-scalable=no" />
+  <link rel="stylesheet" href="/css/browsers_box.css">
+</head>
+<body>
+  <h1>なでしこブラウザテスト</h1>
+  <!-- editor -->
+  <div id="editor" class="edit_div">
+    <h2 class="edit_head">簡易エディタ:</h2>
+    <textarea id="src_box" rows="4"></textarea>
+    <div class="buttons">
+      <button id="run_button" class="default_button">実行</button>
+      <button id="reset_button" class="default_button">クリア</button>
+    </div>
+    <div class="result_box">
+      <h3 class="edit_head">結果:</h3>
+      <textarea id="info" class="info" style="textAlign: left"></textarea>
+      <div id="json" class="info" style="textAlign: left"></div>
+      <div id="err" class="err"><span id="errName"></span><br><span id="errMessage"></span></div>
+      <!-- <canvas id="turtle_cv" class="turtle_canvas" width="280" height="380"></canvas>
+      <div id="turtle3d_div" class="turtle_div" width="280" height="380" style="width:280;height:380"></div> -->
+    </div>
+  </div>
+  <!-- なでしこ-->
+  <script src="/release/wnako3.js"></script>
+  <script src="/js/browsers_box.js"></script>
+  <script src="/release/plugin_kansuji.js"></script>
+  <script src="/release/plugin_markup.js"></script>
+  <script src="/release/plugin_datetime.js"></script>
+  <script src="/release/plugin_csv.js"></script>
+  <script src="/release/plugin_caniuse.js"></script>
+  <script src="/release/plugin_webworker.js"></script>
+  <!-- <script src="/release/plugin_turtle.js"></script> -->
+  <!-- <script src="/release/plugin_weykturtle3d.js"></script> -->
+  <!-- The scripts need to be at the end of body, so that some test running frameworks
+   (Angular Scenario, for example) need the body to be loaded so that it can insert its magic
+   into it. If it is before body, then it fails to find the body and crashes and burns in an epic
+   manner. -->
+  <script src="context.js"></script>
+  <script src="debug.js"></script>
+  <script type="text/javascript">
+    // Configure our Karma
+    %CLIENT_CONFIG%
+
+    // All served files with the latest timestamps
+    %MAPPINGS%
+  </script>
+  <!-- Dynamically replaced with <script> tags -->
+  %SCRIPTS%
+  <!-- Since %SCRIPTS% might include modules, the `loaded()` call needs to be in a module too.
+   This ensures all the tests will have been declared before karma tries to run them. -->
+  <script type="module">
+    window.__karma__.loaded();
+  </script>
+  <script nomodule>
+    window.__karma__.loaded();
+  </script>
+</body>
+</html>