nadesiko3 3.2.36 → 3.2.40

package/release/yoyakugo.json

@@ -6,6 +6,7 @@
   "繰返",
   "増繰返",
   "減繰返",
+  "後判定",
   "反復",
   "抜",
   "続",
@@ -18,6 +19,8 @@
   "定",
   "逐次実行",
   "条件分岐",
+  "増",
+  "減",
   "変数",
   "定数",
   "エラー監視",

package/src/nako_from_dncl.js

@@ -56,12 +56,40 @@ function make_spaces(n) {
 function dncl2nako(src, filename) {
     // 全角半角を統一
     src = conv2half(src)
-    // 行頭の「|」はインデントを表す記号
+    // 行頭の「|」はインデントを表す記号なので無視する
+    // 後判定の「繰り返し,」を「後判定で繰り返す」に置換する
     const a = src.split('\n')
     for (let i = 0; i < a.length; i++) {
-        a[i] = a[i].replace(/^(\s*[|\s]+)(.*$)/, (m0, m1, m2) => {
+        const line = a[i]
+        a[i] = line.replace(/^(\s*[|\s]+)(.*$)/, (m0, m1, m2) => {
             return make_spaces(m1.length) + m2
         })
+        const line2 = line.replace(/^\s+/, '').replace(/\s+$/, '')
+        if (line2 === '繰り返し,' || line2 === '繰り返し') {
+            a[i] = '後判定で繰り返し'
+        }
+        const r = line.match(/^\s*を,?(.+)になるまで(繰り返す|実行する)/)
+        if (r) {
+            a[i] = `ここまで、(${r[1]})になるまでの間`
+            continue
+        }
+        // 『もしj>hakosuならばhakosu←jを実行する』のような単文のもし文
+        const rif = line.match(/^もし(.+)を実行する(。|．)*/)
+        if (rif) {
+            const sent = dncl2nako(rif[1], filename)
+            a[i] = `もし、${sent};`
+            continue
+        }
+        //'のすべての値を0にする'
+        //'のすべての要素を0にする'
+        //'のすべての要素に0を代入する'
+        const rall = line.match(/^(.+?)のすべての(要素|値)(を|に)(.+?)(にする|を代入)/)
+        if (rall) {
+            const varname = rall[1]
+            const v = rall[4]
+            a[i] = `${varname} = [${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v},${v}]`
+            continue
+        }
     }
     src = a.join('\n')
     // ---------------------------------
@@ -77,106 +105,88 @@ function dncl2nako(src, filename) {
         'を実行し，そうでなければ': '違えば',
         'を実行し、そうでなければ': '違えば',
         'を繰り返す': 'ここまで',
-        '改行なしで表示': '継続表示',
-        'のすべての値を0にする': '=[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]',
+        '改行なしで表示': '連続無改行表示',
         'ずつ増やしながら':'ずつ増やし繰り返す',
         'ずつ減らしながら':'ずつ減らし繰り返す',
+        '二進で表示': '二進表示',
+        'でないならば': 'でなければ',
     }
-
+    let peekChar = () => src.charAt(0)
+    let nextChar = () => {
+        let ch = src.charAt(0)
+        src = src.substring(1)
+        return ch
+    }
+    // 文字列を判定するフラグ
+    let flagStr = false
+    let poolStr = ''
+    let endStr = ''
+    // 結果
     let result = ''
     while (src !='') {
         // 代入記号を変更
         const ch = src.charAt(0)
+        if (flagStr) {
+            if (ch === endStr) {
+                result += poolStr + endStr
+                poolStr = ''
+                flagStr = false
+                nextChar()
+                continue
+            }
+            poolStr += nextChar()
+            continue
+        }
+        // 文字列？
+        if (ch == '"') {
+            flagStr = true
+            endStr = '"'
+            poolStr = nextChar()
+            continue
+        }
+        if (ch == '「') {
+            flagStr = true
+            endStr = '」'
+            poolStr = nextChar()
+            continue
+        }
+        if (ch == '『') {
+            flagStr = true
+            endStr = '』'
+            poolStr = nextChar()
+            continue
+        }
         // 空白を飛ばす
         if (ch === ' ' || ch === '　' || ch == '\t') {
-            result += ch
-            src = src.substring(1)
+            result += nextChar()
             continue
         }
-        // 1行先読み
-        let line = ''
-        const i = src.indexOf('\n')
-        if (i >= 0) {
-            line = src.substring(0, i)
-        } else {
-            line = src
+        // 表示を連続表示に置き換える
+        const ch3 = src.substring(0, 3)
+        if (ch3 === 'を表示') {
+            result += 'を連続表示'
+            src = src.substring(3)
+            continue
         }
-        //「var を n 増やす」を「var = var + 1」と置き換える
-        const r = line.match(/^([a-zA-Z_][a-zA-Z0-9_]*)\s*を\s*([0-9a-zA-Z_]+)\s*(増やす|減らす)/)
-        if (r) {
-            const var_name = r[1]
-            const inc_val = r[2]
-            const inc_dec = r[3]
-            if (inc_dec == '増やす') {
-                result += `${var_name} = ${var_name} + ${inc_val};`
-            } else {
-                result += `${var_name} = ${var_name} - ${inc_val};`
-            }
-            src = src.substring(r[0].length)
+        if (src.substring(0, 4) === 'を 表示') {
+            result += 'を連続表示'
+            src = src.substring(4)
             continue
         }
-        //「S1とS2とS3を表示する」を「(S1)&(S2)&S3)を表示」と置き換える
-        // あまりスマートではないが手抜きで
-        if (line.indexOf('表示') >= 0) {
-            const r6 = line.match(/^(.+?)と(.+?)と(.+?)と(.+?)と(.+?)と(.+?)(を|と)表示/)
-            if (r6) {
-                const s1 = r6[1]
-                const s2 = r6[2]
-                const s3 = r6[3]
-                const s4 = r6[4]
-                const s5 = r6[5]
-                const s6 = r6[6]
-                result += `(${s1})&(${s2})&(${s3})&(${s4})&(${s5})&(${s6})を表示`
-                src = src.substring(r6[0].length)
-                continue
-            }
-            const r5 = line.match(/^(.+?)と(.+?)と(.+?)と(.+?)と(.+?)(を|と)表示/)
-            if (r5) {
-                const s1 = r5[1]
-                const s2 = r5[2]
-                const s3 = r5[3]
-                const s4 = r5[4]
-                const s5 = r5[5]
-                result += `(${s1})&(${s2})&(${s3})&(${s4})&(${s5})を表示`
-                src = src.substring(r5[0].length)
-                continue
-            }
-            const r4 = line.match(/^(.+?)と(.+?)と(.+?)と(.+?)(を|と)表示/)
-            if (r4) {
-                const s1 = r4[1]
-                const s2 = r4[2]
-                const s3 = r4[3]
-                const s4 = r4[4]
-                result += `(${s1})&(${s2})&(${s3})&(${s4})を表示`
-                src = src.substring(r4[0].length)
-                continue
-            }
-            const r3 = line.match(/^(.+?)と(.+?)と(.+?)(を|と)表示/)
-            if (r3) {
-                const s1 = r3[1]
-                const s2 = r3[2]
-                const s3 = r3[3]
-                result += `(${s1})&(${s2})&(${s3})を表示`
-                src = src.substring(r3[0].length)
-                continue
-            }
-            const r2 = line.match(/^(.+?)と(.+?)を表示/)
-            if (r2) {
-                const s1 = r2[1]
-                const s2 = r2[2]
-                result += `(${s1})&(${s2})を表示`
-                src = src.substring(r2[0].length)
-                continue
+        // 乱数を乱数範囲に置き換える
+        if (src.substring(0, 2) === '乱数' && src.substring(0, 4) !== '乱数範囲') {
+            result += '乱数範囲'
+            src = src.substring(2)
+            continue
+        }
+        // 増やす・減らすの前に「だけ」を追加する #1149
+        if (ch3 === '増やす' || ch3 === '減らす') {
+            if (result.substring(result.length - 2) !== 'だけ') {
+                result += 'だけ'
             }
+            result += ch3
+            src = src.substring(3)
         }
-        // 『もしj>hakosuならばhakosu←jを実行する』のような単文のもし文
-        const rif = line.match(/^もし(.+)を実行する(。|．)*/)
-        if (rif) {
-            const sent = dncl2nako(rif[1], filename)
-            result += `もし、${sent};`
-            src = src.substring(rif[0].length)
-            continue
-        }        
         // 一覧から単純な変換
         {
             let flag = false
@@ -193,8 +203,7 @@ function dncl2nako(src, filename) {
         }
 
         // 1文字削る
-        src = src.substring(1)
-        result += ch
+        result += nextChar()
     }
     return result
 }

package/src/nako_gen.js

@@ -476,6 +476,9 @@ try {
       case 'let':
         code += this.convLet(node)
         break
+      case 'inc':
+        code += this.convInc(node)
+        break
       case 'word':
       case 'variable':
         code += this.convGetVar(node)
@@ -519,6 +522,9 @@ try {
       case 'while':
         code += this.convWhile(node)
         break
+      case 'atohantei':
+        code += this.convAtohantei(node)
+        break
       case 'switch':
         code += this.convSwitch(node)
         break
@@ -1043,6 +1049,20 @@ try {
     return this.convLineno(node, false) + code
   }
 
+  convAtohantei (node) {
+    const id = this.loop_id++
+    const varId = `$nako_i${id}`
+    const cond = this._convGen(node.cond, true)
+    const block = this.convGenLoop(node.block)
+    const code =
+      `for(;;) {\n` +
+      `  ${block}\n` +
+      `  let ${varId} = ${cond};\n` +
+      `  if (${varId}) { continue } else { break }\n` +
+      '}\n\n'
+    return this.convLineno(node, false) + code
+  }
+
   convSwitch (node) {
     const value = this._convGen(node.value, true)
     const cases = node.cases
@@ -1376,6 +1396,24 @@ try {
     return `(${left} ${op} ${right})`
   }
 
+  convInc (node) {
+    // もし値が省略されていたら、変数「それ」に代入する
+    let value = null
+    if (this.speedMode.invalidSore === 0) { value = this.varname('それ') }
+    if (node.value) { value = this._convGen(node.value, true) }
+    if (value == null) {
+      throw NakoSyntaxError.fromNode('加算する先の変数名がありません。', node)
+    }
+    // 変数名
+    const name = node.name.value
+    const res = this.findVar(name)
+    let code = ''
+    if (res === null) { this.varsSet.names.add(name) }
+    code += `if (typeof(${this.varname(name)}) === 'undefined') { ${this.varname(name)} = 0; }`
+    code += `${this.varname(name)} += ${value}`
+    return ';' + this.convLineno(node, false) + code + '\n'
+  }
+
   convLet (node) {
     // もし値が省略されていたら、変数「それ」に代入する
     let value = null

package/src/nako_lex_rules.js

@@ -154,7 +154,7 @@ function cbWordParser (src, isTrimOkurigana = true) {
       // 助詞の判定
       const j = josiRE.exec(src)
       if (j) {
-        josi = j[0]
+        josi = j[0].replace(/^\s+/, '')
         src = src.substr(j[0].length)
         // 助詞の直後にある「,」を飛ばす #877
         if (src.charAt(0) === ',') { src = src.substr(1) }
@@ -229,7 +229,7 @@ function cbString (beginTag, closeTag, src) {
   // 文字列直後の助詞を取得
   const j = josiRE.exec(src)
   if (j) {
-    josi = j[0]
+    josi = j[0].replace(/^\s+/, '')
     src = src.substr(j[0].length)
     // 助詞の後のカンマ #877
     if (src.charAt(0) === ',') { src = src.substr(1) }

package/src/nako_parser3.js

@@ -96,25 +96,20 @@ class NakoParser extends NakoParserBase {
   /** @returns {Ast | null} */
   ySentence () {
     const map = this.peekSourceMap()
+    
     // 最初の語句が決まっている構文
     if (this.check('eol')) { return this.yEOL() }
     if (this.check('もし')) { return this.yIF() }
+    if (this.check('後判定')) { return this.yAtohantei() }
     if (this.check('エラー監視')) { return this.yTryExcept() }
     if (this.check('逐次実行')) { return this.yTikuji() }
     if (this.accept(['抜ける'])) { return { type: 'break', josi: '', ...map, end: this.peekSourceMap() } }
     if (this.accept(['続ける'])) { return { type: 'continue', josi: '', ...map, end: this.peekSourceMap() } }
-    if (this.accept(['require', 'string', '取込'])) {
-      return {
-        type: 'require',
-        value: this.y[1].value,
-        josi: '',
-        ...map,
-        end: this.peekSourceMap()
-      }
-    }
+    if (this.accept(['require', 'string', '取込'])) { return { type: 'require', value: this.y[1].value, josi: '', ...map, end: this.peekSourceMap() } }
     if (this.accept(['not', '非同期モード'])) { return this.yASyncMode() }
     if (this.accept(['not', 'DNCLモード'])) { return this.yDNCLMode() }
     if (this.accept(['not', 'string', 'モード設定'])) { return this.ySetGenMode(this.y[1].value) }
+    
     // 関数呼び出し演算子
     if (this.check2(['func', '←'])) { return this.yCallOp() }
     if (this.check2(['func', 'eq'])) {
@@ -128,7 +123,9 @@ class NakoParser extends NakoParserBase {
     if (this.accept([this.yLet])) { return this.y[0] }
     if (this.accept([this.yDefTest])) { return this.y[0] }
     if (this.accept([this.yDefFunc])) { return this.y[0] }
-    if (this.accept([this.yCall])) { // 関数呼び出しの他、各種構文の実装
+    
+    // 関数呼び出しの他、各種構文の実装
+    if (this.accept([this.yCall])) {
       const c1 = this.y[0]
       if (c1.josi === 'して') { // 連文をblockとして接続する(もし構文、逐次実行構文などのため)
         const c2 = this.ySentence()
@@ -281,12 +278,13 @@ class NakoParser extends NakoParserBase {
     let a = this.yGetArg()
     if (!a) { return null }
     // console.log('yIFCond=', a, this.peek())
+    
     // チェック : AがBならば
     if (a.josi === 'が') {
       const tmpI = this.index
       const b = this.yGetArg()
       const naraba = this.get()
-      if (b && b.type !== 'func' && naraba && naraba.type === 'ならば') {
+      if ((b && b.type !== 'func') && (naraba && naraba.type === 'ならば')) {
         return {
           type: 'op',
           operator: (naraba.value === 'でなければ') ? 'noteq' : 'eq',
@@ -733,6 +731,42 @@ class NakoParser extends NakoParserBase {
     }
   }
 
+  /** @returns {Ast | null} */
+  yAtohantei () {
+    const map = this.peekSourceMap()
+    if (this.check('後判定')) { this.get() } // skip 後判定
+    if (this.check('繰返')) { this.get() } // skip 繰り返す
+    if (this.check('ここから')) { this.get() }
+    const block = this.yBlock()
+    if (this.check('ここまで')) { this.get() }
+    if (this.check('comma')) { this.get() }
+    let cond = this.yGetArg() // 条件
+    let bUntil = false
+    const t = this.peek()
+    if (t && t.value === 'なる' && (t.josi === 'まで' || t.josi === 'までの')) {
+      this.get() // skip なるまで
+      bUntil = true
+    }
+    if (this.check('間')) { this.get() } // skip 間
+    if (bUntil) { // 条件を反転する
+      cond = {
+        type: 'not',
+        value: cond,
+        josi: '',
+        ...map,
+        end: this.peekSourceMap()
+      }
+    }
+    return {
+      type: 'atohantei',
+      cond,
+      block,
+      josi: '',
+      ...map,
+      end: this.peekSourceMap()
+    }
+  }
+  
   /** @returns {Ast | null} */
   yFor () {
     const map = this.peekSourceMap()
@@ -747,7 +781,9 @@ class NakoParser extends NakoParserBase {
     if (incdec.type == 'word' && (incdec.value === '増' || incdec.value === '減')) {
       kurikaesu.type = incdec.value + kurikaesu.type
       // ↑ typeを増繰返 | 減繰返 に変換 
-    } else {
+    }
+    // 普通の繰り返しの場合
+    else {
       this.stack.push(incdec) // 違ったので改めて追加
     }
     let vInc = null
@@ -944,52 +980,107 @@ class NakoParser extends NakoParserBase {
     }
   }
 
+  /** @returns {import('./nako3').Ast | null | undefined} */
+  yDainyu () {
+    const map = this.peekSourceMap()
+    const dainyu = this.get() // 代入
+    if (dainyu === null) { return null }
+    const value = this.popStack(['を'])
+    const word = this.popStack(['へ', 'に'])
+    if (!word || (word.type !== 'word' && word.type !== 'func' && word.type !== '配列参照')) {
+      throw NakoSyntaxError.fromNode('代入文で代入先の変数が見当たりません。『(変数名)に(値)を代入』のように使います。', dainyu)
+    }
+    // 配列への代入
+    if (word.type === '配列参照') {
+      return {
+          type: 'let_array', 
+          name: word.name, 
+          index: word.index, 
+          value: value, 
+          josi: '', 
+          checkInit: this.flagCheckArrayInit, 
+          ...map, end: this.peekSourceMap()
+      };
+    }
+    // 一般的な変数への代入
+    return {
+      type: 'let', name: word, 
+      value: value, josi: '', 
+      ...map, end: this.peekSourceMap()
+    }
+  }
+
+  /** @returns {import('./nako3').Ast | null | undefined} */
+  ySadameru () {
+    const map = this.peekSourceMap()
+    const sadameru = this.get() // 定める
+    if (sadameru === null) { return null }
+    const word = this.popStack(['を'])
+    const value = this.popStack(['へ', 'に'])
+    console.log(word)
+    if (!word || (word.type !== 'word' && word.type !== 'func' && word.type !== '配列参照')) {
+      throw NakoSyntaxError.fromNode('『定める』文で定数が見当たりません。『(定数名)を(値)に定める』のように使います。', sadameru)
+    }
+    return {
+      type: 'def_local_var', name: word, vartype: '定数', 
+      value: value, josi: '', 
+      ...map, end: this.peekSourceMap()
+    };
+  }
+
+  /** @returns {import('./nako3').Ast | null | undefined} */
+  yIncDec () {
+    const map = this.peekSourceMap()
+    const action = this.get() // (増やす|減らす)
+    if (action === null) { return null }
+    
+    // 『Nずつ増やして繰り返す』文か？
+    if (this.check('繰返')) { 
+      this.pushStack({type: 'word', value: action.value, josi: action.josi, ...map, end: this.peekSourceMap})
+      return this.yFor();
+    }
+    
+    // スタックから引数をポップ
+    let value = this.popStack(['だけ', '']);
+    const word = this.popStack(['を'])
+    if (!word || (word.type !== 'word' && word.type !== '配列参照')) {
+      throw NakoSyntaxError.fromNode(
+        `『${action.type}』文で定数が見当たりません。『(変数名)を(値)だけ${action.type}』のように使います。`, 
+        action)
+    }
+
+    // 減らすなら-1かける
+    if (action.value === '減') {
+      value = { type: 'op', operator: '*', left: value, right: {type: 'number', value: -1, line: action.line}, josi: '', ...map }
+    }
+
+    return {
+      type: 'inc',
+      name: word, 
+      value: value,
+      josi: action.josi,
+      ...map, end: this.peekSourceMap()
+    };
+  }
+
   /** @returns {import('./nako3').Ast | null | undefined} */
   yCall () {
     if (this.isEOF()) { return null }
+    
+    // スタックに積んでいく
     while (!this.isEOF()) {
-      const map = this.peekSourceMap()
+      if (this.check('ここから')) { this.get() }
       // 代入
-      if (this.check('代入')) {
-        const dainyu = this.get()
-        const value = this.popStack(['を'])
-        const word = this.popStack(['へ', 'に'])
-        if (!word || (word.type !== 'word' && word.type !== 'func' && word.type !== '配列参照')) {
-          throw NakoSyntaxError.fromNode('代入文で代入先の変数が見当たりません。', dainyu)
-        }
-
-        switch (word.type) {
-          case '配列参照': // 配列への代入
-            return { type: 'let_array', name: word.name, index: word.index, value: value, josi: '', checkInit: this.flagCheckArrayInit, ...map, end: this.peekSourceMap() }
-          default:
-            return { type: 'let', name: word, value: value, josi: '', ...map, end: this.peekSourceMap() }
-        }
-      }
-      if (this.check('定める')) {
-        const dainyu = this.get()
-        const word = this.popStack(['を'])
-        const value = this.popStack(['に'])
-        if (!word || word.type !== 'word') {
-          throw NakoSyntaxError.fromNode('代入文で代入先の変数が見当たりません。', dainyu)
-        }
-        return {
-          type: 'def_local_var',
-          name: word,
-          vartype: '定数',
-          value: value,
-          ...map,
-          end: this.peekSourceMap()
-        }
-      }
+      if (this.check('代入')) { return this.yDainyu(); }
+      if (this.check('定める')) { return this.ySadameru(); }
       // 制御構文
-      if (this.check('ここから')) { this.get() }
       if (this.check('回')) { return this.yRepeatTime() }
       if (this.check('間')) { return this.yWhile() }
       if (this.check('繰返') || this.check('増繰返') || this.check('減繰返')) { return this.yFor() }
       if (this.check('反復')) { return this.yForEach() }
       if (this.check('条件分岐')) { return this.ySwitch() }
-      // 戻す
       if (this.check('戻る')) { return this.yReturn() }
+      if (this.check('増') || this.check('減')) { return this.yIncDec() }
       // C言語風関数
       if (this.check2([['func', 'word'], '(']) && this.peek().josi === '') { // C言語風
         const t = this.yValue()
@@ -1020,6 +1111,7 @@ class NakoParser extends NakoParserBase {
       }
       break
     } // end of while
+    
     // 助詞が余ってしまった場合
     if (this.stack.length > 0) {
       this.logger.debug('--- stack dump ---\n' + JSON.stringify(this.stack, null, 2) + '\npeek: ' + JSON.stringify(this.peek(), null, 2))

package/src/nako_reserved_words.js

@@ -11,6 +11,7 @@ module.exports = {
   '繰返': '繰返',
   '増繰返': '増繰返', // (#1140)
   '減繰返': '減繰返',
+  '後判定': '後判定', // (#1147)
   '反復': '反復',
   '抜': '抜ける',
   '続': '続ける',
@@ -23,6 +24,8 @@ module.exports = {
   '定': '定める',
   '逐次実行': '逐次実行',
   '条件分岐': '条件分岐',
+  '増': '増',
+  '減': '減',
   '変数': '変数',
   '定数': '定数',
   'エラー監視': 'エラー監視', // 例外処理:エラーならばと対

package/src/nako_version.js

@@ -1,8 +1,8 @@
 // なでしこバージョン
 const nakoVersion = {
-  version: '3.2.36',
+  version: '3.2.40',
   major: 3,
   minor: 2,
-  patch: 36
+  patch: 40
 }
 module.exports = nakoVersion

package/src/plugin_math.js

@@ -220,6 +220,14 @@ const PluginMath = {
       return Math.floor(Math.random() * a)
     }
   },
+  '乱数範囲': { // @AからBまでの範囲の乱数を返す // @らんすうはんい
+    type: 'func',
+    josi: [['から'],['までの','の']],
+    pure: true,
+    fn: function (a, b) {
+      return (Math.floor(Math.random() * (b - a + 1)) + a)
+    }
+  },
   'SQRT': { // @Aの平方根を返す // @SQRT
     type: 'func',
     josi: [['の']],