/**
 * パーサーが生成した中間オブジェクトを実際のJavaScriptのコードに変換する。
 * なお速度優先で忠実にJavaScriptのコードを生成する。
 */

import { NakoSyntaxError } from './nako_errors.mjs'
import { FuncList, FuncArgs, FuncListItem, NakoDebugOption } from './nako_types.mjs'
import { Ast, AstEol, AstStrValue, AstBlocks, AstOperator, AstConst, AstLet, AstLetArray, AstIf, AstWhile, AstAtohantei, AstFor, AstForeach, AstSwitch, AstRepeatTimes, AstDefFunc, AstCallFunc, AstDefVar, AstDefVarList } from './nako_ast.mjs'
import { NakoCompiler } from './nako3.mjs'

// なでしこで定義した関数の開始コードと終了コード
const topOfFunction = '(function(){\n'
const endOfFunction = '})'
const topOfFunctionAsync = '(async function(){\n'

interface VarsSet {
  isFunction: boolean;
  names: Set<string>;
  readonly: Set<string>;
}
interface SpeedMode {
  lineNumbers: number; // 行番号を出力しない
  implicitTypeCasting: number; // 数値加算でparseFloatを出力しない
  invalidSore: number; // 「それ」を用いない
  forcePure: number; // 全てのシステム命令をpureとして扱う。命令からローカル変数への参照が出来なくなる。
}
interface PerformanceMonitor {
  userFunction: number; // 呼び出されたユーザ関数
  systemFunction: number; // システム関数(呼び出しコードを含む)
  systemFunctionBody: number; // システム関数(呼び出しコードを除く)
  mumeiId: number;
}
interface FunctionContext {
  isAnonymous: boolean;
  varsIndex: number;
  usesClosure: boolean;
}
interface FindVarResult {
  i: number;
  name: string;
  isTop: boolean;
  js: string,
  js_set: string
}
/** コード生成オプション */
export class NakoGenOptions {
  isTest: boolean
  importFiles: string[]
  codeStandalone: string
  codeEnv: string
  constructor(isTest = false, importFiles: string[] = [], codeStandalone = '', convEnv = '') {
    this.isTest = isTest
    this.codeStandalone = codeStandalone
    this.codeEnv = convEnv
    this.importFiles = ['plugin_system.mjs', 'plugin_math.mjs', 'plugin_csv.mjs', 'plugin_promise.mjs', 'plugin_test.mjs']
    for (const fname of importFiles) {
      this.importFiles.push(fname)
    }
  }
}

/**
 * 構文木からJSのコードを生成するクラス
 */
export class NakoGen {
  private nakoFuncList: FuncList // なでしこ自身で定義した関数の一覧
  private nakoTestFuncs: FuncList // テストのための関数
  private usedFuncSet: Set<string> // 利用があった関数をメモする
  private usedAsyncFn: boolean // 非同期関数が使われているか判定
  private loopId: number // ループを生成する際にダミーのループ変数を管理するため
  private flagLoop: boolean // 変換中のソースがループの中かどうかを判定する
  private constPools: Array<any> // 定数プール用
  private constPoolsTemplate: string[] // 定数プール生成用テンプレート
  private defFuncName: string // 関数定義中の関数名
  // コード生成オプション
  private speedMode: SpeedMode
  private performanceMonitor: PerformanceMonitor
  private warnUndefinedVar: boolean
  private warnUndefinedReturnUserFunc: boolean
  private warnUndefinedCallingUserFunc: boolean
  private warnUndefinedCallingSystemFunc: boolean
  private warnUndefinedCalledUserFuncArgs: boolean
  // 変数管理
  private varslistSet: VarsSet[] // [システム変数一覧, グローバル変数一覧, ローカル変数一覧]で変数セットを記録
  private varsSet: VarsSet // ローカルな変数を記録
  private functionContextStack: FunctionContext[] // 関数生成時のレキシカルスコープ情報
  public debugOption: NakoDebugOption
  // public
  numAsyncFn: number
  __self: NakoCompiler
  genMode: string
  lastLineNo: string | null // `l123:main.nako3`形式

  /** constructor
   * @param com コンパイラのインスタンス
   */
  constructor(com: NakoCompiler) {
    /**
     * 出力するJavaScriptコードのヘッダー部分で定義する必要のある関数。fnはjsのコード。
     * プラグイン関数は含まれない。
     */
    this.nakoFuncList = new Map(com.getNakoFuncList())

    /**
     * なでしこで定義したテストの一覧
     */
    this.nakoTestFuncs = new Map()

    /**
     * プログラム内で参照された関数のリスト。プラグインの命令を含む。
     * JavaScript単体で実行するとき、このリストにある関数の定義をJavaScriptコードの先頭に付け足す。
     */
    this.usedFuncSet = new Set()

    /**
     * ループ時の一時変数が被らないようにIDで管理
     */
    this.loopId = 1

    /**
     * 非同関数を何回使ったか
     */
    this.numAsyncFn = 0

    /**
     * 関数定義の際、関数の中でasyncFn=trueの関数を呼び出したかどうかを調べる @see convDefFuncCommon
     */
    this.usedAsyncFn = false

    /** 変換中の処理が、ループの中かどうかを判定する */
    this.flagLoop = false

    this.__self = com

    /** コードジェネレータの種類 */
    this.genMode = 'sync'

    /** 行番号とファイル名が分かるときは `l123:main.nako3`、行番号だけ分かるときは `l123`、そうでなければ任意の文字列。 */
    this.lastLineNo = null

    /** スタック */
    this.varslistSet = this.setVarslistSet(com.__varslist)

    /** スタックトップ */
    this.varsSet = { isFunction: false, names: new Set(), readonly: new Set() }
    this.varslistSet[2] = this.varsSet
    this.functionContextStack = []

    // 現在定義中の関数名
    this.defFuncName = ''

    // 1以上のとき高速化する。
    // 実行速度優先ブロック内で1増える。
    this.speedMode = {
      lineNumbers: 0, // 行番号を出力しない
      implicitTypeCasting: 0, // 数値加算でparseFloatを出力しない
      invalidSore: 0, // 「それ」を用いない
      forcePure: 0 // 全てのシステム命令をpureとして扱う。命令からローカル変数への参照が出来なくなる。
    }

    // 1以上のとき測定をinjectする。
    // パフォーマンスモニタのブロック内で1増える。
    this.performanceMonitor = {
      userFunction: 0, // 呼び出されたユーザ関数
      systemFunction: 0, // システム関数(呼び出しコードを含む)
      systemFunctionBody: 0, // システム関数(呼び出しコードを除く)
      mumeiId: 0
    }

    /**
     * 未定義の変数の警告を行う
     */
    this.constPools = []
    this.constPoolsTemplate = []

    // undefinedの警告制御 (「厳しくチェック」でオンになる)
    this.warnUndefinedVar = false
    this.warnUndefinedReturnUserFunc = false
    this.warnUndefinedCallingUserFunc = false
    this.warnUndefinedCallingSystemFunc = false
    this.warnUndefinedCalledUserFuncArgs = false

    this.debugOption = com.debugOption
  }

  static isValidIdentifier(name: string) {
    // TODO: いらなそうな部分は削る
    // https://stackoverflow.com/a/9337047
    // eslint-disable-next-line no-misleading-character-class
    return /^(?!(?:do|if|in|for|let|new|try|var|case|else|enum|eval|false|null|this|true|void|with|break|catch|class|const|super|throw|while|yield|delete|export|import|public|return|static|switch|typeof|default|extends|finally|package|private|continue|debugger|function|arguments|interface|protected|implements|instanceof)$)[$A-Z_a-z\xaa\xb5\xba\xc0-\xd6\xd8-\xf6\xf8-\u02c1\u02c6-\u02d1\u02e0-\u02e4\u02ec\u02ee\u0370-\u0374\u0376\u0377\u037a-\u037d\u0386\u0388-\u038a\u038c\u038e-\u03a1\u03a3-\u03f5\u03f7-\u0481\u048a-\u0527\u0531-\u0556\u0559\u0561-\u0587\u05d0-\u05ea\u05f0-\u05f2\u0620-\u064a\u066e\u066f\u0671-\u06d3\u06d5\u06e5\u06e6\u06ee\u06ef\u06fa-\u06fc\u06ff\u0710\u0712-\u072f\u074d-\u07a5\u07b1\u07ca-\u07ea\u07f4\u07f5\u07fa\u0800-\u0815\u081a\u0824\u0828\u0840-\u0858\u08a0\u08a2-\u08ac\u0904-\u0939\u093d\u0950\u0958-\u0961\u0971-\u0977\u0979-\u097f\u0985-\u098c\u098f\u0990\u0993-\u09a8\u09aa-\u09b0\u09b2\u09b6-\u09b9\u09bd\u09ce\u09dc\u09dd\u09df-\u09e1\u09f0\u09f1\u0a05-\u0a0a\u0a0f\u0a10\u0a13-\u0a28\u0a2a-\u0a30\u0a32\u0a33\u0a35\u0a36\u0a38\u0a39\u0a59-\u0a5c\u0a5e\u0a72-\u0a74\u0a85-\u0a8d\u0a8f-\u0a91\u0a93-\u0aa8\u0aaa-\u0ab0\u0ab2\u0ab3\u0ab5-\u0ab9\u0abd\u0ad0\u0ae0\u0ae1\u0b05-\u0b0c\u0b0f\u0b10\u0b13-\u0b28\u0b2a-\u0b30\u0b32\u0b33\u0b35-\u0b39\u0b3d\u0b5c\u0b5d\u0b5f-\u0b61\u0b71\u0b83\u0b85-\u0b8a\u0b8e-\u0b90\u0b92-\u0b95\u0b99\u0b9a\u0b9c\u0b9e\u0b9f\u0ba3\u0ba4\u0ba8-\u0baa\u0bae-\u0bb9\u0bd0\u0c05-\u0c0c\u0c0e-\u0c10\u0c12-\u0c28\u0c2a-\u0c33\u0c35-\u0c39\u0c3d\u0c58\u0c59\u0c60\u0c61\u0c85-\u0c8c\u0c8e-\u0c90\u0c92-\u0ca8\u0caa-\u0cb3\u0cb5-\u0cb9\u0cbd\u0cde\u0ce0\u0ce1\u0cf1\u0cf2\u0d05-\u0d0c\u0d0e-\u0d10\u0d12-\u0d3a\u0d3d\u0d4e\u0d60\u0d61\u0d7a-\u0d7f\u0d85-\u0d96\u0d9a-\u0db1\u0db3-\u0dbb\u0dbd\u0dc0-\u0dc6\u0e01-\u0e30\u0e32\u0e33\u0e40-\u0e46\u0e81\u0e82\u0e84\u0e87\u0e88\u0e8a\u0e8d\u0e94-\u0e97\u0e99-\u0e9f\u0ea1-\u0ea3\u0ea5\u0ea7\u0eaa\u0eab\u0ead-\u0eb0\u0eb2\u0eb3\u0ebd\u0ec0-\u0ec4\u0ec6\u0edc-\u0edf\u0f00\u0f40-\u0f47\u0f49-\u0f6c\u0f88-\u0f8c\u1000-\u102a\u103f\u1050-\u1055\u105a-\u105d\u1061\u1065\u1066\u106e-\u1070\u1075-\u1081\u108e\u10a0-\u10c5\u10c7\u10cd\u10d0-\u10fa\u10fc-\u1248\u124a-\u124d\u1250-\u1256\u1258\u125a-\u125d\u1260-\u1288\u128a-\u128d\u1290-\u12b0\u12b2-\u12b5\u12b8-\u12be\u12c0\u12c2-\u12c5\u12c8-\u12d6\u12d8-\u1310\u1312-\u1315\u1318-\u135a\u1380-\u138f\u13a0-\u13f4\u1401-\u166c\u166f-\u167f\u1681-\u169a\u16a0-\u16ea\u16ee-\u16f0\u1700-\u170c\u170e-\u1711\u1720-\u1731\u1740-\u1751\u1760-\u176c\u176e-\u1770\u1780-\u17b3\u17d7\u17dc\u1820-\u1877\u1880-\u18a8\u18aa\u18b0-\u18f5\u1900-\u191c\u1950-\u196d\u1970-\u1974\u1980-\u19ab\u19c1-\u19c7\u1a00-\u1a16\u1a20-\u1a54\u1aa7\u1b05-\u1b33\u1b45-\u1b4b\u1b83-\u1ba0\u1bae\u1baf\u1bba-\u1be5\u1c00-\u1c23\u1c4d-\u1c4f\u1c5a-\u1c7d\u1ce9-\u1cec\u1cee-\u1cf1\u1cf5\u1cf6\u1d00-\u1dbf\u1e00-\u1f15\u1f18-\u1f1d\u1f20-\u1f45\u1f48-\u1f4d\u1f50-\u1f57\u1f59\u1f5b\u1f5d\u1f5f-\u1f7d\u1f80-\u1fb4\u1fb6-\u1fbc\u1fbe\u1fc2-\u1fc4\u1fc6-\u1fcc\u1fd0-\u1fd3\u1fd6-\u1fdb\u1fe0-\u1fec\u1ff2-\u1ff4\u1ff6-\u1ffc\u2071\u207f\u2090-\u209c\u2102\u2107\u210a-\u2113\u2115\u2119-\u211d\u2124\u2126\u2128\u212a-\u212d\u212f-\u2139\u213c-\u213f\u2145-\u2149\u214e\u2160-\u2188\u2c00-\u2c2e\u2c30-\u2c5e\u2c60-\u2ce4\u2ceb-\u2cee\u2cf2\u2cf3\u2d00-\u2d25\u2d27\u2d2d\u2d30-\u2d67\u2d6f\u2d80-\u2d96\u2da0-\u2da6\u2da8-\u2dae\u2db0-\u2db6\u2db8-\u2dbe\u2dc0-\u2dc6\u2dc8-\u2dce\u2dd0-\u2dd6\u2dd8-\u2dde\u2e2f\u3005-\u3007\u3021-\u3029\u3031-\u3035\u3038-\u303c\u3041-\u3096\u309d-\u309f\u30a1-\u30fa\u30fc-\u30ff\u3105-\u312d\u3131-\u318e\u31a0-\u31ba\u31f0-\u31ff\u3400-\u4db5\u4e00-\u9fcc\ua000-\ua48c\ua4d0-\ua4fd\ua500-\ua60c\ua610-\ua61f\ua62a\ua62b\ua640-\ua66e\ua67f-\ua697\ua6a0-\ua6ef\ua717-\ua71f\ua722-\ua788\ua78b-\ua78e\ua790-\ua793\ua7a0-\ua7aa\ua7f8-\ua801\ua803-\ua805\ua807-\ua80a\ua80c-\ua822\ua840-\ua873\ua882-\ua8b3\ua8f2-\ua8f7\ua8fb\ua90a-\ua925\ua930-\ua946\ua960-\ua97c\ua984-\ua9b2\ua9cf\uaa00-\uaa28\uaa40-\uaa42\uaa44-\uaa4b\uaa60-\uaa76\uaa7a\uaa80-\uaaaf\uaab1\uaab5\uaab6\uaab9-\uaabd\uaac0\uaac2\uaadb-\uaadd\uaae0-\uaaea\uaaf2-\uaaf4\uab01-\uab06\uab09-\uab0e\uab11-\uab16\uab20-\uab26\uab28-\uab2e\uabc0-\uabe2\uac00-\ud7a3\ud7b0-\ud7c6\ud7cb-\ud7fb\uf900-\ufa6d\ufa70-\ufad9\ufb00-\ufb06\ufb13-\ufb17\ufb1d\ufb1f-\ufb28\ufb2a-\ufb36\ufb38-\ufb3c\ufb3e\ufb40\ufb41\ufb43\ufb44\ufb46-\ufbb1\ufbd3-\ufd3d\ufd50-\ufd8f\ufd92-\ufdc7\ufdf0-\ufdfb\ufe70-\ufe74\ufe76-\ufefc\uff21-\uff3a\uff41-\uff5a\uff66-\uffbe\uffc2-\uffc7\uffca-\uffcf\uffd2-\uffd7\uffda-\uffdc][$A-Z_a-z\xaa\xb5\xba\xc0-\xd6\xd8-\xf6\xf8-\u02c1\u02c6-\u02d1\u02e0-\u02e4\u02ec\u02ee\u0370-\u0374\u0376\u0377\u037a-\u037d\u0386\u0388-\u038a\u038c\u038e-\u03a1\u03a3-\u03f5\u03f7-\u0481\u048a-\u0527\u0531-\u0556\u0559\u0561-\u0587\u05d0-\u05ea\u05f0-\u05f2\u0620-\u064a\u066e\u066f\u0671-\u06d3\u06d5\u06e5\u06e6\u06ee\u06ef\u06fa-\u06fc\u06ff\u0710\u0712-\u072f\u074d-\u07a5\u07b1\u07ca-\u07ea\u07f4\u07f5\u07fa\u0800-\u0815\u081a\u0824\u0828\u0840-\u0858\u08a0\u08a2-\u08ac\u0904-\u0939\u093d\u0950\u0958-\u0961\u0971-\u0977\u0979-\u097f\u0985-\u098c\u098f\u0990\u0993-\u09a8\u09aa-\u09b0\u09b2\u09b6-\u09b9\u09bd\u09ce\u09dc\u09dd\u09df-\u09e1\u09f0\u09f1\u0a05-\u0a0a\u0a0f\u0a10\u0a13-\u0a28\u0a2a-\u0a30\u0a32\u0a33\u0a35\u0a36\u0a38\u0a39\u0a59-\u0a5c\u0a5e\u0a72-\u0a74\u0a85-\u0a8d\u0a8f-\u0a91\u0a93-\u0aa8\u0aaa-\u0ab0\u0ab2\u0ab3\u0ab5-\u0ab9\u0abd\u0ad0\u0ae0\u0ae1\u0b05-\u0b0c\u0b0f\u0b10\u0b13-\u0b28\u0b2a-\u0b30\u0b32\u0b33\u0b35-\u0b39\u0b3d\u0b5c\u0b5d\u0b5f-\u0b61\u0b71\u0b83\u0b85-\u0b8a\u0b8e-\u0b90\u0b92-\u0b95\u0b99\u0b9a\u0b9c\u0b9e\u0b9f\u0ba3\u0ba4\u0ba8-\u0baa\u0bae-\u0bb9\u0bd0\u0c05-\u0c0c\u0c0e-\u0c10\u0c12-\u0c28\u0c2a-\u0c33\u0c35-\u0c39\u0c3d\u0c58\u0c59\u0c60\u0c61\u0c85-\u0c8c\u0c8e-\u0c90\u0c92-\u0ca8\u0caa-\u0cb3\u0cb5-\u0cb9\u0cbd\u0cde\u0ce0\u0ce1\u0cf1\u0cf2\u0d05-\u0d0c\u0d0e-\u0d10\u0d12-\u0d3a\u0d3d\u0d4e\u0d60\u0d61\u0d7a-\u0d7f\u0d85-\u0d96\u0d9a-\u0db1\u0db3-\u0dbb\u0dbd\u0dc0-\u0dc6\u0e01-\u0e30\u0e32\u0e33\u0e40-\u0e46\u0e81\u0e82\u0e84\u0e87\u0e88\u0e8a\u0e8d\u0e94-\u0e97\u0e99-\u0e9f\u0ea1-\u0ea3\u0ea5\u0ea7\u0eaa\u0eab\u0ead-\u0eb0\u0eb2\u0eb3\u0ebd\u0ec0-\u0ec4\u0ec6\u0edc-\u0edf\u0f00\u0f40-\u0f47\u0f49-\u0f6c\u0f88-\u0f8c\u1000-\u102a\u103f\u1050-\u1055\u105a-\u105d\u1061\u1065\u1066\u106e-\u1070\u1075-\u1081\u108e\u10a0-\u10c5\u10c7\u10cd\u10d0-\u10fa\u10fc-\u1248\u124a-\u124d\u1250-\u1256\u1258\u125a-\u125d\u1260-\u1288\u128a-\u128d\u1290-\u12b0\u12b2-\u12b5\u12b8-\u12be\u12c0\u12c2-\u12c5\u12c8-\u12d6\u12d8-\u1310\u1312-\u1315\u1318-\u135a\u1380-\u138f\u13a0-\u13f4\u1401-\u166c\u166f-\u167f\u1681-\u169a\u16a0-\u16ea\u16ee-\u16f0\u1700-\u170c\u170e-\u1711\u1720-\u1731\u1740-\u1751\u1760-\u176c\u176e-\u1770\u1780-\u17b3\u17d7\u17dc\u1820-\u1877\u1880-\u18a8\u18aa\u18b0-\u18f5\u1900-\u191c\u1950-\u196d\u1970-\u1974\u1980-\u19ab\u19c1-\u19c7\u1a00-\u1a16\u1a20-\u1a54\u1aa7\u1b05-\u1b33\u1b45-\u1b4b\u1b83-\u1ba0\u1bae\u1baf\u1bba-\u1be5\u1c00-\u1c23\u1c4d-\u1c4f\u1c5a-\u1c7d\u1ce9-\u1cec\u1cee-\u1cf1\u1cf5\u1cf6\u1d00-\u1dbf\u1e00-\u1f15\u1f18-\u1f1d\u1f20-\u1f45\u1f48-\u1f4d\u1f50-\u1f57\u1f59\u1f5b\u1f5d\u1f5f-\u1f7d\u1f80-\u1fb4\u1fb6-\u1fbc\u1fbe\u1fc2-\u1fc4\u1fc6-\u1fcc\u1fd0-\u1fd3\u1fd6-\u1fdb\u1fe0-\u1fec\u1ff2-\u1ff4\u1ff6-\u1ffc\u2071\u207f\u2090-\u209c\u2102\u2107\u210a-\u2113\u2115\u2119-\u211d\u2124\u2126\u2128\u212a-\u212d\u212f-\u2139\u213c-\u213f\u2145-\u2149\u214e\u2160-\u2188\u2c00-\u2c2e\u2c30-\u2c5e\u2c60-\u2ce4\u2ceb-\u2cee\u2cf2\u2cf3\u2d00-\u2d25\u2d27\u2d2d\u2d30-\u2d67\u2d6f\u2d80-\u2d96\u2da0-\u2da6\u2da8-\u2dae\u2db0-\u2db6\u2db8-\u2dbe\u2dc0-\u2dc6\u2dc8-\u2dce\u2dd0-\u2dd6\u2dd8-\u2dde\u2e2f\u3005-\u3007\u3021-\u3029\u3031-\u3035\u3038-\u303c\u3041-\u3096\u309d-\u309f\u30a1-\u30fa\u30fc-\u30ff\u3105-\u312d\u3131-\u318e\u31a0-\u31ba\u31f0-\u31ff\u3400-\u4db5\u4e00-\u9fcc\ua000-\ua48c\ua4d0-\ua4fd\ua500-\ua60c\ua610-\ua61f\ua62a\ua62b\ua640-\ua66e\ua67f-\ua697\ua6a0-\ua6ef\ua717-\ua71f\ua722-\ua788\ua78b-\ua78e\ua790-\ua793\ua7a0-\ua7aa\ua7f8-\ua801\ua803-\ua805\ua807-\ua80a\ua80c-\ua822\ua840-\ua873\ua882-\ua8b3\ua8f2-\ua8f7\ua8fb\ua90a-\ua925\ua930-\ua946\ua960-\ua97c\ua984-\ua9b2\ua9cf\uaa00-\uaa28\uaa40-\uaa42\uaa44-\uaa4b\uaa60-\uaa76\uaa7a\uaa80-\uaaaf\uaab1\uaab5\uaab6\uaab9-\uaabd\uaac0\uaac2\uaadb-\uaadd\uaae0-\uaaea\uaaf2-\uaaf4\uab01-\uab06\uab09-\uab0e\uab11-\uab16\uab20-\uab26\uab28-\uab2e\uabc0-\uabe2\uac00-\ud7a3\ud7b0-\ud7c6\ud7cb-\ud7fb\uf900-\ufa6d\ufa70-\ufad9\ufb00-\ufb06\ufb13-\ufb17\ufb1d\ufb1f-\ufb28\ufb2a-\ufb36\ufb38-\ufb3c\ufb3e\ufb40\ufb41\ufb43\ufb44\ufb46-\ufbb1\ufbd3-\ufd3d\ufd50-\ufd8f\ufd92-\ufdc7\ufdf0-\ufdfb\ufe70-\ufe74\ufe76-\ufefc\uff21-\uff3a\uff41-\uff5a\uff66-\uffbe\uffc2-\uffc7\uffca-\uffcf\uffd2-\uffd7\uffda-\uffdc0-9\u0300-\u036f\u0483-\u0487\u0591-\u05bd\u05bf\u05c1\u05c2\u05c4\u05c5\u05c7\u0610-\u061a\u064b-\u0669\u0670\u06d6-\u06dc\u06df-\u06e4\u06e7\u06e8\u06ea-\u06ed\u06f0-\u06f9\u0711\u0730-\u074a\u07a6-\u07b0\u07c0-\u07c9\u07eb-\u07f3\u0816-\u0819\u081b-\u0823\u0825-\u0827\u0829-\u082d\u0859-\u085b\u08e4-\u08fe\u0900-\u0903\u093a-\u093c\u093e-\u094f\u0951-\u0957\u0962\u0963\u0966-\u096f\u0981-\u0983\u09bc\u09be-\u09c4\u09c7\u09c8\u09cb-\u09cd\u09d7\u09e2\u09e3\u09e6-\u09ef\u0a01-\u0a03\u0a3c\u0a3e-\u0a42\u0a47\u0a48\u0a4b-\u0a4d\u0a51\u0a66-\u0a71\u0a75\u0a81-\u0a83\u0abc\u0abe-\u0ac5\u0ac7-\u0ac9\u0acb-\u0acd\u0ae2\u0ae3\u0ae6-\u0aef\u0b01-\u0b03\u0b3c\u0b3e-\u0b44\u0b47\u0b48\u0b4b-\u0b4d\u0b56\u0b57\u0b62\u0b63\u0b66-\u0b6f\u0b82\u0bbe-\u0bc2\u0bc6-\u0bc8\u0bca-\u0bcd\u0bd7\u0be6-\u0bef\u0c01-\u0c03\u0c3e-\u0c44\u0c46-\u0c48\u0c4a-\u0c4d\u0c55\u0c56\u0c62\u0c63\u0c66-\u0c6f\u0c82\u0c83\u0cbc\u0cbe-\u0cc4\u0cc6-\u0cc8\u0cca-\u0ccd\u0cd5\u0cd6\u0ce2\u0ce3\u0ce6-\u0cef\u0d02\u0d03\u0d3e-\u0d44\u0d46-\u0d48\u0d4a-\u0d4d\u0d57\u0d62\u0d63\u0d66-\u0d6f\u0d82\u0d83\u0dca\u0dcf-\u0dd4\u0dd6\u0dd8-\u0ddf\u0df2\u0df3\u0e31\u0e34-\u0e3a\u0e47-\u0e4e\u0e50-\u0e59\u0eb1\u0eb4-\u0eb9\u0ebb\u0ebc\u0ec8-\u0ecd\u0ed0-\u0ed9\u0f18\u0f19\u0f20-\u0f29\u0f35\u0f37\u0f39\u0f3e\u0f3f\u0f71-\u0f84\u0f86\u0f87\u0f8d-\u0f97\u0f99-\u0fbc\u0fc6\u102b-\u103e\u1040-\u1049\u1056-\u1059\u105e-\u1060\u1062-\u1064\u1067-\u106d\u1071-\u1074\u1082-\u108d\u108f-\u109d\u135d-\u135f\u1712-\u1714\u1732-\u1734\u1752\u1753\u1772\u1773\u17b4-\u17d3\u17dd\u17e0-\u17e9\u180b-\u180d\u1810-\u1819\u18a9\u1920-\u192b\u1930-\u193b\u1946-\u194f\u19b0-\u19c0\u19c8\u19c9\u19d0-\u19d9\u1a17-\u1a1b\u1a55-\u1a5e\u1a60-\u1a7c\u1a7f-\u1a89\u1a90-\u1a99\u1b00-\u1b04\u1b34-\u1b44\u1b50-\u1b59\u1b6b-\u1b73\u1b80-\u1b82\u1ba1-\u1bad\u1bb0-\u1bb9\u1be6-\u1bf3\u1c24-\u1c37\u1c40-\u1c49\u1c50-\u1c59\u1cd0-\u1cd2\u1cd4-\u1ce8\u1ced\u1cf2-\u1cf4\u1dc0-\u1de6\u1dfc-\u1dff\u200c\u200d\u203f\u2040\u2054\u20d0-\u20dc\u20e1\u20e5-\u20f0\u2cef-\u2cf1\u2d7f\u2de0-\u2dff\u302a-\u302f\u3099\u309a\ua620-\ua629\ua66f\ua674-\ua67d\ua69f\ua6f0\ua6f1\ua802\ua806\ua80b\ua823-\ua827\ua880\ua881\ua8b4-\ua8c4\ua8d0-\ua8d9\ua8e0-\ua8f1\ua900-\ua909\ua926-\ua92d\ua947-\ua953\ua980-\ua983\ua9b3-\ua9c0\ua9d0-\ua9d9\uaa29-\uaa36\uaa43\uaa4c\uaa4d\uaa50-\uaa59\uaa7b\uaab0\uaab2-\uaab4\uaab7\uaab8\uaabe\uaabf\uaac1\uaaeb-\uaaef\uaaf5\uaaf6\uabe3-\uabea\uabec\uabed\uabf0-\uabf9\ufb1e\ufe00-\ufe0f\ufe20-\ufe26\ufe33\ufe34\ufe4d-\ufe4f\uff10-\uff19\uff3f]*$/.test(name)
  }

  /**
   * com.__varslistを元に、this.varslistSetを設定
   */
  setVarslistSet(varslist: Map<string, any>[]): VarsSet[] {
    const vlist: VarsSet[] = []
    // 変数名の一覧をVarsSetに格納 (0: システム変数, 1: グローバル変数, 2: ローカル変数) 0と1のみ移す
    for (let i = 0; i <= 1; i++) {
      const scope: Map<string, any> = varslist[i]
      const names = new Set(scope.keys())
      names.delete('meta') // remove 'meta' from names
      vlist[i] = { isFunction: false, names, readonly: new Set() }
    }
    return vlist
  }

  /**
   * 改行を埋め込む
   */
  convLineno(node: Ast, forceUpdate = false, incLine = 0): string {
    // スピードモードでは行番号を埋め込まない
    if (this.speedMode.lineNumbers > 0) { return '' }

    const lineNo: number = node.line + incLine
    let lineNoStr: string
    if (typeof node.line !== 'number') {
      lineNoStr = 'unknown'
    } else if (typeof node.file !== 'string') {
      lineNoStr = `l${lineNo}`
    } else {
      lineNoStr = `l${lineNo}:${node.file}`
    }

    // 強制的に行番号をアップデートするか
    if (!forceUpdate) {
      if (lineNoStr === this.lastLineNo) { return '' }
      this.lastLineNo = lineNoStr
    }
    // 実行行のデータ
    const lineDataJSON = JSON.stringify(lineNoStr)
    // デバッグ実行か
    let debugCode = ''
    if (this.debugOption.useDebug) {
      // messageAction
      if (this.debugOption.messageAction) {
        debugCode += `window.postMessage({action:'${this.debugOption.messageAction}',` +
          `line: ${lineDataJSON}});`
      }
      // waitTime
      if (lineNo >= 1) {
        if (this.debugOption.waitTime > 0) {
          debugCode += `await __v0.get('秒待')(${this.debugOption.waitTime},__self);`
        }
        // breakpoints
        this.numAsyncFn += 1
        this.usedAsyncFn = true
        debugCode += `await __v0.get('__DEBUG_BP_WAIT')(${lineNo}, __self);`
      }
      // end
      debugCode += 'if (__v0.get(\'__forceClose\')) { return -1 };'
    }
    // 例: __v0.set('__line', 'l1:main.nako3')
    // return `__v0.set('__line', ${lineDataJSON});` + debugCode
    return `__line(${lineDataJSON});` + debugCode
  }

  /**
   * ローカル変数の取得用JavaScriptコードを生成する。
   * @param {string} name
   */
  varname_get(name: string): string {
    if (this.varslistSet.length === 3) {
      // グローバル
      return `__self.__varslist[${2}].get(${JSON.stringify(name)})`
    } else {
      // ローカル
      return `__self.__vars.get(${JSON.stringify(name)})`
    }
  }

  /**
   * ローカル変数の設定用JavaScriptコードを生成する。
   * @param {string} name
   * @param {string} jsvalue
   */
  varname_set(name: string, jsvalue: string): string {
    if (this.varslistSet.length === 3) {
      return `__self.__varslist[2].set(${JSON.stringify(name)}, (${jsvalue}))`
    } else {
      return `__self.__vars.set(${JSON.stringify(name)}, (${jsvalue}))`
    }
  }

  /**
   * ローカル変数の設定用JavaScriptコードを生成する。
   * @param {string} name
   * @param {string} jsvalue
   */
  varname_set_sys(name: string, jsvalue: string): string {
    return `__self.__setSysVar(${JSON.stringify(name)}, (${jsvalue}))`
  }

  /**
   * @param {string} name
   * @returns {string}
  */
  static getFuncName(name: string): string {
    if (name.indexOf('__') >= 0) { // スコープがある場合
      const a = name.split('__')
      const scope = a[0]
      const name3 = NakoGen.getFuncName(a[1])
      return `${scope}__${name3}`
    }
    let name2 = name.replace(/[ぁ-ん]+$/, '')
    if (name2 === '') { name2 = name }
    return name2
  }

  /** @param {Ast} node */
  static convPrint(node: Ast): string {
     
    return `__print(${node});`
  }

  /** @param {AstStrValue} node */
  convRequire(node: AstStrValue): string {
    const moduleName = node.value
    return this.convLineno(node, false) +
      `__module['${moduleName}'] = require('${moduleName}');\n`
  }

  /**
   * プログラムの実行に必要な関数定義を書き出す(グローバル領域)
   * convGenの結果を利用するため、convGenの後に呼び出すこと。
   * @param com
   * @param opt
   */
  getDefFuncCode(com: NakoCompiler, opt: NakoGenOptions): string {
    let code = ''
    // よく使う変数のショートカット
    // jsInit の部分に設定するコード
    code += `const nakoVersion = { version: ${JSON.stringify(com.version)} }\n`
    code += 'const __self = self;\n'
    code += '__self.__self = __self;\n'
    code += 'const __varslist = __self.__varslist;\n'
    code += 'const __module = __self.__module;\n'
    code += 'const __v0 = __self.__v0 = __self.__varslist[0];\n'
    code += 'const __v1 = __self.__v1 = __self.__varslist[1];\n'
    code += 'const __vars = __self.__vars = __self.__varslist[2];\n'
    code += 'const __nako_make_closure = (local, parent) => ({\n' +
      '  has: (key) => local.has(key) || (parent !== null && parent.has(key)),\n' +
      '  get: (key) => local.has(key) ? local.get(key) : (parent !== null ? parent.get(key) : undefined),\n' +
      '  set: (key, value) => { if (local.has(key) || parent === null || !parent.has(key)) { local.set(key, value); } else { parent.set(key, value); } return value; }\n' +
      '});\n'
    code += `const __modList = __self.__modList = ${JSON.stringify(com.getModList())}\n`
    code += 'const __line = (lineno) => { __self.__v0.set(\'__line\', lineno); }\n'
    code += '__v0.set(\'__line\', \'l0:__getDefFuncCode\');\n'
    code += '__v0.set(\'__forceClose\', false);\n'
    code += `__v0.set('__useDebug', ${String(this.debugOption.useDebug)});\n`
    // 定数を埋め込む
    code += '__self.constPools = ' + JSON.stringify(this.constPools) + ';\n'
    code += '__self.constPoolsTemplate = ' + JSON.stringify(this.constPoolsTemplate) + ';\n'
    //
    code += '__self.__propAccessor = [];\n'
    // なでしこの関数定義を行う
    let nakoFuncCode = ''
    this.nakoFuncList.forEach((value, key) => {
      const f = trim(cleanGeneratedCode(String(value.fn), 1))
      const isAsync = value.asyncFn ? 'true' : 'false'
      nakoFuncCode += '' +
        `//[DEF_FUNC name='${key}' asyncFn=${isAsync}]\n` +
        `__self.__varslist[1].set("${key}", ${f});\n` +
        `//[/DEF_FUNC name='${key}']\n`
    })
    if (nakoFuncCode !== '') { code += '__v0.set(\'__line\', \'関数の定義\');\n' + nakoFuncCode }

    // テストの定義を行う
    if (opt.isTest) {
      let testCode = 'const __tests = [];\n'
      this.nakoTestFuncs.forEach((value) => {
        const f = value.fn
        testCode += `${String(f)};\n`
      })
      if (testCode !== '') {
        code += '__v0.set(\'__line\', \'テストの定義\');\n'
        code += testCode + '\n'
      }
    }

    return code
  }

  /**
   * プラグイン・オブジェクトを追加
   * @param po プラグイン・オブジェクト
   */
  addPlugin(po: FuncList): void {
    return this.__self.addPlugin(po)
  }

  /**
   * プラグイン・オブジェクトを追加(ブラウザ向け)
   * @param name オブジェクト名
   * @param po 関数リスト
   */
  addPluginObject(name: string, po: FuncList): void {
    this.__self.addPluginObject(name, po)
  }

  /**
   * プラグイン・ファイルを追加(Node.js向け)
   * @param objName オブジェクト名
   * @param path ファイルパス
   * @param po 登録するオブジェクト
   */
  addPluginFile(objName: string, path: string, po: FuncList): void {
    this.__self.addPluginFile(objName, path, po)
  }

  /**
   * 関数を追加する
   * @param key 関数名
   * @param josi 助詞
   * @param fn 関数
   */
  addFunc(key: string, josi: FuncArgs, fn: any) {
    this.__self.addFunc(key, josi, fn)
  }

  /**
   * プラグイン関数を参照する
   * @param key プラグイン関数の関数名
   * @returns プラグイン・オブジェクト
   */
  getFunc(key: string) {
    return this.__self.getFunc(key)
  }

  /**
   * 関数を先に登録してしまう
   */
  registerFunction(ast: Ast) {
    if (ast.type !== 'block') { throw NakoSyntaxError.fromNode('構文解析に失敗しています。構文は必ずblockが先頭になります', ast) }

    /** 関数一覧 */
    const funcList: {name: string; node:Ast}[] = []

    // なでしこ関数を定義して this.nako_func[name] に定義する
    const registFunc = (t: AstDefFunc) => {
      // (t.type == 'def_func') はチェック済み
      if (!t.name) { throw new Error('[System Error] 関数の定義で関数名が指定されていません') }
      const name: string = t.name
      this.usedFuncSet.add(name)
       
      this.__self.__varslist[1].set(name, () => { }) // 事前に適当な値を設定
      this.varslistSet[1].names.add(name) // global
      const meta = t.meta
      if (!meta) { throw new Error('[System Error] 関数の定義で関数名のメタ情報が指定されていません') }
      this.nakoFuncList.set(name, {
        josi: meta.josi,
         
        fn: () => {},
        type: 'func',
        asyncFn: !!t.asyncFn,
        isExport: t.isExport
      })
      funcList.push({ name, node: t })
    }
    const registFuncs = (ast: Ast) => {
      // blocksプロパティを持っているか？
      if ((ast as AstBlocks).blocks) {
        // 各ブロックをくまなく巡回チェック
        for (const t of (ast as AstBlocks).blocks) {
          if (t.type === 'def_func') { // 関数定義
            registFunc(t as AstDefFunc)
          } else {
            registFuncs(t)
          }
        }
      }
    }
    // 関数の登録
    registFuncs(ast)

    // __self.__varslistの変更を反映
    const initialNames: Set<string> = new Set()
    if (this.speedMode.invalidSore === 0) {
      initialNames.add('それ')
    }
    this.varsSet = { isFunction: false, names: initialNames, readonly: new Set() }
    this.varslistSet = this.setVarslistSet(this.__self.__varslist)
    this.varslistSet[2] = this.varsSet
  }

  /**
   * @param node
   * @param opt
   */
  convGen(node: Ast, opt: NakoGenOptions): string {
    const result = this.convLineno(node, false) + this._convGen(node, true)
    if (opt.isTest) {
      return ''
    } else {
      return result
    }
  }

  /**
   * @param {Ast} node
   * @param {boolean} isExpression
   */
  _convGen(node: Ast|null, isExpression: boolean): string {
    if (!node) { return '' }
    let code = ''
    if (node instanceof Array) {
      for (let i = 0; i < node.length; i++) {
        const n = node[i]
        code += this._convGen(n, isExpression)
      }
      return code
    }
    if (node === null) { return 'null' }
    if (node === undefined) { return 'undefined' }
    if (typeof (node) !== 'object') { return '' + String(node) }
    // switch
    switch (node.type) {
    case 'nop':
      break
    case 'block':
      code += this.convBlock(node as AstBlocks)
      break
    case 'comment':
    case 'eol':
      code += this.convComment(node as AstEol)
      break
    case 'run_mode':
      code += this.convRunMode(node as AstStrValue)
      break
    case 'break':
      code += this.convCheckLoop(node, 'break')
      break
    case 'continue':
      code += this.convCheckLoop(node, 'continue')
      break
    case 'end':
      code += '__v0.get(\'終\')(__self);'
      break
    case 'number':
      code += (node as AstConst).value
      break
    case 'bigint':
      code += (node as AstConst).value
      break
    case 'string':
      code += this.convString(node as AstConst)
      break
    case 'def_local_var':
      code += this.convDefLocalVar(node as AstDefVar)
      break
    case 'def_local_varlist':
      code += this.convDefLocalVarlist(node as AstDefVarList)
      break
    case 'let':
      code += this.convLet(node as AstLet)
      break
    case 'let_prop':
      code += this.convLetProp(node as AstLet)
      break
    case 'ref_prop':
      code += this.convRefProp(node as AstLet)
      break
    case 'inc':
      code += this.convInc(node as AstBlocks)
      break
    case 'word':
    case 'variable':
      code += this.convGetVar(node as AstStrValue)
      break
    case 'op':
    case 'calc':
      code += this.convOp(node as AstOperator)
      break
    case 'renbun':
      code += this.convRenbun(node as AstOperator)
      break
    case 'not':
      code += '((' + this._convGen((node as AstBlocks).blocks[0], true) + ')?false:true)'
      break
    case 'func':
    case 'func_pointer':
    case 'calc_func':
      code += this.convCallFunc(node as AstCallFunc, isExpression)
      break
    case 'call_value':
      code += this.convCallValue(node as AstBlocks, isExpression)
      break
    case 'if':
      code += this.convIf(node as AstIf)
      break
    case 'for':
      code += this.convFor(node as AstFor)
      break
    case 'foreach': // 反復
      code += this.convForeach(node as AstForeach)
      break
    case 'repeat_times': // 回
      code += this.convRepeatTimes(node as AstRepeatTimes)
      break
    case 'speed_mode':
      code += this.convSpeedMode(node as AstBlocks, isExpression)
      break
    case 'performance_monitor':
      code += this.convPerformanceMonitor(node as AstBlocks, isExpression)
      break
    case 'while':
      code += this.convWhile(node as AstWhile)
      break
    case 'atohantei':
      code += this.convAtohantei(node as AstAtohantei)
      break
    case 'switch':
      code += this.convSwitch(node as AstSwitch)
      break
    case 'let_array':
      code += this.convLetArray(node as AstLetArray)
      break
    case 'ref_array':
      code += this.convRefArray(node)
      break
    case 'ref_array_value':
      code += this.convRefArrayValue(node as AstOperator)
      break
    case 'json_array':
      code += this.convJsonArray(node as AstBlocks)
      break
    case 'json_obj':
      code += this.convJsonObj(node as AstBlocks)
      break
    case 'bool':
      code += ((node as AstConst).value) ? 'true' : 'false'
      break
    case 'null':
      code += 'null'
      break
    case 'def_test':
      code += this.convDefTest(node as AstDefFunc)
      break
    case 'def_func':
      code += this.convDefFunc(node as AstDefFunc)
      break
    case 'func_obj':
      code += this.convFuncObj(node as AstDefFunc)
      break
    case 'return':
      code += this.convReturn(node as AstBlocks)
      break
    case 'try_except':
      code += this.convTryExcept(node as AstBlocks)
      break
    case 'require':
      code += this.convRequire(node as AstStrValue)
      break
    default:
      throw new Error('System Error: unknown_type=' + node.type)
    }
    return code
  }

  /** 変数を検索 */
  findVar(name: string, jsvalue: string|null = null): FindVarResult|null {
    // __vars ? (ローカル変数)
    if (this.varslistSet.length > 3 && this.varsSet.names.has(name)) {
      return {
        i: this.varslistSet.length - 1,
        name,
        isTop: true,
        js: this.varname_get(name),
        js_set: this.varname_set(name, String(jsvalue))
      }
    }
    // 外側の無名関数のローカル変数をクロージャとして参照する #2268
    const currentFunc = this.functionContextStack[this.functionContextStack.length - 1]
    if (this.varslistSet.length > 4 && currentFunc?.isAnonymous) {
      const currentIndex = this.varslistSet.length - 1
      for (let i = currentIndex - 1; i >= 3; i--) {
        if (this.varslistSet[i].names.has(name)) {
          for (const context of this.functionContextStack) {
            if (context.isAnonymous && context.varsIndex > i) {
              context.usesClosure = true
            }
          }
          const nameJson = JSON.stringify(name)
          return {
            i,
            name,
            isTop: false,
            js: `__nako_closure.get(${nameJson})`,
            js_set: `__nako_closure.set(${nameJson}, ${jsvalue ?? 'undefined'})`
          }
        }
      }
    }
    // __varslist ?
    for (let i = 2; i >= 0; i--) {
      if (this.varslistSet[i].names.has(name)) {
        // ユーザーの定義したグローバル変数 (__varslist[2]) は、変数展開されている（そのままの名前で定義されている）可能性がある。
        // それ以外の変数は、必ず__varslistに入っている。
        return {
          i,
          name,
          isTop: false,
          js: `__self.__varslist[${i}].get(${JSON.stringify(name)})`,
          js_set: `__self.__varslist[${i}].set(${JSON.stringify(name)}, ${jsvalue ?? 'undefined'})`
        }
      }
    }
    return null
  }

  /**
   * 定義済みの変数の参照
   * @param {string} name
   * @param {Ast} position
   */
  genVar(name: string, position: Ast): string {
    const res = this.findVar(name)
    const lno = position.line
    if (res === null) {
      // 定義されていない名前の参照は変数の定義とみなす。
      // 多くの場合はundefined値を持つ変数であり分かりづらいバグを引き起こすが、
      // 「ナデシコする」などの命令の中で定義された変数の参照の場合があるため警告に留める。
      // ただし、自動的に定義される変数『引数』『それ』などは例外 #952
      if (name === '引数' || name === 'それ' || name === '対象' || name === '対象キー') {
        // デフォルト定義されている変数名
      } else {
        if (this.warnUndefinedVar) {
          // main__は省略して表示するように。 #1223
          const dispName = name.replace(/^main__(.+)$/, '$1')
          this.__self.getLogger().warn(`変数『${dispName}』は定義されていません。`, position)
        }
      }
      this.varsSet.names.add(name)
      return this.varname_get(name)
    }

    const i = res.i
    // システム関数・変数の場合
    if (i === 0) {
      const pv = this.__self.getNakoFunc(name)
      if (!pv) { return `${res.js}/*[link_error]l${lno}:${position.file ?? 'unknown'}*/` }
      if (pv.type === 'const' || pv.type === 'var') { return res.js }
      if (pv.type === 'func') {
        if (!pv.josi || pv.josi.length === 0) { return `(${res.js}())` }

        throw NakoSyntaxError.fromNode(`『${name}』が複文で使われました。単文で記述してください。(v1非互換)`, position)
      }
      throw NakoSyntaxError.fromNode(`『${name}』は関数であり参照できません。`, position)
    }
    return res.js
  }

  convGetVar(node: AstStrValue): string {
    // 変数名を得る
    const name = node.value
    // 変数を取得するコードを生成
    return this.genVar(name, node)
  }

  convBlock(node: AstBlocks): string {
    let code = ''
    for (const block of node.blocks) {
      code += this._convGen(block, false)
    }
    return code
  }

  convComment(node: AstEol): string {
    let commentSrc = String(node.comment)
    // コメントの改行や空行を無効化
    commentSrc = commentSrc.replace(/\n/g, '¶')
    commentSrc = commentSrc.replace(/\*\//g, '＊／')
    commentSrc = commentSrc.replace(/(^\s+|\s+$)/g, '')
    // コメントの行番号を得る
    const lineNo = this.convLineno(node, false)
    if (commentSrc === '' && lineNo === '') { return ';' }
    if (commentSrc === '') {
      return ';' + lineNo + '\n'
    }
    return ';' + lineNo + '//' + commentSrc + '\n'
  }

  convRunMode(node: AstStrValue): string {
    const mode = node.value
    let isStrict = false
    if (mode === '厳しくチェック') {
      // 厳しくチェックモードの場合、変数の未定義チェックを行う
      isStrict = true
    }
    this.warnUndefinedVar = isStrict
    this.warnUndefinedReturnUserFunc = isStrict
    this.warnUndefinedCallingUserFunc = isStrict
    this.warnUndefinedCallingSystemFunc = isStrict
    this.warnUndefinedCalledUserFuncArgs = isStrict
    return `/* 実行モード: ${mode} */`
  }

  convReturn(node: AstBlocks): string {
    // 関数の中であれば利用可能
    if (this.varsSet.names.has('!関数')) { throw NakoSyntaxError.fromNode('『戻る』がありますが、関数定義内のみで使用可能です。', node) }

    const astValue = node.blocks[0]
    const lno = this.convLineno(node, false)

    // 戻り値のコードを得る
    let value = ''
    if (astValue.type !== 'nop') {
      value = this._convGen(astValue, true)
    } else if (this.speedMode.invalidSore === 0) {
      value = this.varname_get('それ')
    }

    // 戻り値のない関数の場合
    if (value === '') {
      return lno + 'return;'
    }

    // 戻り値がundefindかをチェックするかどうか
    if (!this.warnUndefinedReturnUserFunc) {
      return lno + `return ${value};`
    } else {
      const funcName: string = (this.defFuncName) ? this.defFuncName : '無名関数'
      const poolIndex = this.addConstPool(`ユーザ関数『${funcName}』からundefinedが返されています`, [], node.file, node.line)
      return lno + `return (__self.chk(${value}, ${poolIndex}));`
    }
  }

  getConstPoolsTemplateId(msg: string): number {
    let id = this.constPoolsTemplate.indexOf(msg)
    if (id < 0) {
      id = this.constPoolsTemplate.length
      this.constPoolsTemplate[id] = msg
    }
    return id
  }

  addConstPool(msg: string, args: string[], file: any, line: any): number {
    // file
    file = String(file)
    const fileNo = this.getConstPoolsTemplateId(file)
    // msg
    const msgNo = this.getConstPoolsTemplateId(msg)
    // args
    const args2: number[] = []
    for (const arg of args) {
      const argStr = '' + String(arg)
      const argNo = this.getConstPoolsTemplateId(argStr)
      args2.push(argNo)
    }
    const poolIndex = this.constPools.length
    this.constPools.push([msgNo, args2, fileNo, line])
    return poolIndex
  }

  convCheckLoop(node: Ast, cmd: string): string {
    // ループの中であれば利用可能
    if (!this.flagLoop) {
      const cmdj = (cmd === 'continue') ? '続ける' : '抜ける'
      throw NakoSyntaxError.fromNode(`『${cmdj}』文がありますが、それは繰り返しの中で利用してください。`, node)
    }
    return this.convLineno(node) + cmd + ';'
  }

  convDefFuncCommon(node: AstDefFunc, name: string): string {
    // 定義中の関数名を記録
    this.defFuncName = name
    // 変数をJS変数に展開するかどうか (TODO)
    const isExtractJS = false
    // パフォーマンスモニタ:ユーザ関数のinjectの定義
    let performanceMonitorInjectAtStart = ''
    let performanceMonitorInjectAtEnd = ''
    if (this.performanceMonitor.userFunction !== 0) {
      let key = name
      if (!key) {
        if (typeof this.performanceMonitor.mumeiId === 'undefined') {
          this.performanceMonitor.mumeiId = 0
        }
        this.performanceMonitor.mumeiId++
        key = `anous_${this.performanceMonitor.mumeiId}`
      }
      performanceMonitorInjectAtStart = 'const performanceMonitorEnd = (function (key, type) {\n' +
        'const uf_start = performance.now() * 1000;\n' +
        'return function () {\n' +
        'const el_time = performance.now() * 1000 - uf_start;\n' +
        'if (!__self.__performance_monitor) {\n' +
        '__self.__performance_monitor={};\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: el_time, min_usec: el_time, max_usec: el_time, type: type };\n' +
        '} else if (!__self.__performance_monitor[key]) {\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: el_time, min_usec: el_time, max_usec: el_time, type: type };\n' +
        '} else {\n' +
        '__self.__performance_monitor[key].called++;\n' +
        '__self.__performance_monitor[key].totel_usec+=el_time;\n' +
        'if(__self.__performance_monitor[key].min_usec>el_time){__self.__performance_monitor[key].min_usec=el_time;}\n' +
        'if(__self.__performance_monitor[key].max_usec<el_time){__self.__performance_monitor[key].max_usec=el_time;}\n' +
        `}};})('${key}', 'user');` +
        'try {\n'
      performanceMonitorInjectAtEnd = '} finally { performanceMonitorEnd(); }\n'
    }
    let variableDeclarations = ''
    const indent = '    '
    let pushStack = ''
    let popStack = ''
    const initialNames: Set<string> = new Set()
    if (this.speedMode.invalidSore === 0) {
      initialNames.add('それ')
    }
    this.varsSet = { isFunction: true, names: initialNames, readonly: new Set() }
    // ローカル変数をPUSHする
    this.varslistSet.push(this.varsSet)
    const funcContext: FunctionContext = {
      isAnonymous: name === '',
      varsIndex: this.varslistSet.length - 1,
      usesClosure: false
    }
    this.functionContextStack.push(funcContext)
    // JSの引数と引数をバインド
    if (isExtractJS) {
      variableDeclarations += indent + 'var 引数 = arguments;\n'
    } else {
      variableDeclarations += indent + '__self.__vars.set(\'引数\', arguments);\n'
    }

    // ローカル変数を生成 (再帰関数呼び出しで引数の値が壊れる問題があるので修正 #1663 / タイミングによって壊れるので修理 #1758)
    // 暫定変数__localVarsに現在のローカル変数の値をPUSHし、変数を抜ける時にPOPする)
    // 関数として宣言しているが、JS関数となでしこ関数では変数管理の方法が異なるため、完全なローカル変数としては使えない
    // 必ず、pushStack/popStack する必要がある
    pushStack += '\n// PUSH STACK\n'
    pushStack += 'const __localvars = __self.__vars;\n'
    pushStack += '__self.__vars = new Map();\n'
    pushStack += 'try {\n'
    popStack += '} finally {\n'
    popStack += indent + '// POP STACK\n'
    popStack += indent + 'self.__vars = __localvars;\n'
    popStack += '}\n'

    // 宣言済みの名前を保存
    const varsDeclared = Array.from(this.varsSet.names.values())
    let code = ''
    // 引数をローカル変数に設定
    const meta: FuncListItem|undefined = node.meta
    if (!meta) { throw new Error('[System Error] 関数の定義でメタ情報が指定されていません') }
    if (!meta.varnames) { meta.varnames = [] }
    for (let i = 0; i < meta.varnames.length; i++) {
      const word = meta.varnames[i]
      if (word === '引数') { continue }
      if (!this.warnUndefinedCalledUserFuncArgs) {
        code += indent + this.varname_set(word, `arguments[${i}]`) + ';\n'
      } else {
        // check undefined
        let errMsg = `匿名関数の引数『${word}』にundefinedが渡されました`
        if (name) {
          errMsg = `ユーザ関数『${name}』の引数『${word}』にundefinedが渡されました`
        }
        const warnJS = `__self.logger.warn('${errMsg}', {line: ${node.line}, file: ${JSON.stringify(node.file)}});`
        const checkFunc = `((a) => { if (a === undefined) { ${warnJS} }; return a; })`
        const callCheckFunc = `${checkFunc}(arguments[${i}])`
        code += indent + this.varname_set(word, callCheckFunc) + ';\n'
      }
      this.varsSet.names.add(word)
    }
    // 関数定義は、グローバル領域で。
    if (name) {
      this.usedFuncSet.add(name)
      this.varslistSet[1].names.add(name)
      if (this.nakoFuncList.get(name) === undefined) {
        if (!node.meta) { throw new Error('[System Error] 関数の定義でメタ情報が指定されていません') }
        // 既に generate で作成済みのはず(念のため)
        this.nakoFuncList.set(name, {
          josi: node.meta.josi,
           
          fn: () => {},
          type: 'func',
          asyncFn: false,
          isExport: null
        })
        this.__self.getLogger().warn(`generateで未定義の状態の関数『${name}』が動的に登録されています。`)
      }
    }
    // ブロックを解析
    const oldUsedAsyncFn = this.usedAsyncFn
    this.usedAsyncFn = false
    if (this.debugOption.useDebug) { this.usedAsyncFn = true }
    const block = this._convGen(node.blocks[0], false)
    code += block.split('\n').map((line) => '  ' + line).join('\n') + '\n'
    // 関数の最後に、変数「それ」をreturnするようにする
    if (this.speedMode.invalidSore === 0) {
      code += `  return (${this.varname_get('それ')});\n`
    }
    // パフォーマンスモニタ:ユーザ関数のinject
    code += performanceMonitorInjectAtEnd

    // 名前のある関数で非同期関数であれば、関数にasyncを付与する
    if (name && this.usedAsyncFn) {
      const f = this.nakoFuncList.get(name)
      if (f) { f.asyncFn = true }
    }
    // 関数の末尾に、ローカル変数をPOP

    // 関数内で定義されたローカル変数の宣言
    if (isExtractJS) {
      for (const name of Array.from(this.varsSet.names.values())) {
        if (!varsDeclared.includes(name)) {
          if (NakoGen.isValidIdentifier(name)) {
            variableDeclarations += `  var ${name};\n`
          }
        }
      }
      if (this.speedMode.invalidSore === 0) {
        if (NakoGen.isValidIdentifier('それ')) {
          variableDeclarations += '  var それ = \'\';\n'
        } else {
          variableDeclarations += `  ${this.varname_get('それ')} = '';`
        }
      }
    }
    // usedAsyncFnの値に応じて関数定義の方法を変更
    const tof = (this.usedAsyncFn) ? topOfFunctionAsync : topOfFunction
    // 関数コード全体を構築
    const lineInfo = '  ' + this.convLineno(node, true, 1) + '\n'
    code = tof + performanceMonitorInjectAtStart + pushStack + variableDeclarations + lineInfo + code + popStack
    code += endOfFunction
    if (funcContext.isAnonymous && funcContext.usesClosure) {
      const parentClosure = `(typeof __nako_closure === 'undefined' ? null : __nako_closure)`
      code = `(function(__nako_closure) {\n  return ${code}\n})(__nako_make_closure(__self.__vars, ${parentClosure}))`
    }

    // 名前があれば、関数を登録する
    if (name) {
      const nameFuncValue = this.nakoFuncList.get(name)
      if (nameFuncValue) {
        nameFuncValue.fn = code
        nameFuncValue.asyncFn = this.usedAsyncFn
        meta.asyncFn = this.usedAsyncFn
      }
    }
    this.usedAsyncFn = oldUsedAsyncFn // 以前の値を戻す

    this.varslistSet.pop()
    this.functionContextStack.pop()
    this.varsSet = this.varslistSet[this.varslistSet.length - 1]
    if (name) { this.__self.__varslist[1].set(name, code) }
    this.defFuncName = '' // 関数名をクリア
    return code
  }

  convDefTest(node: AstDefFunc): string {
    const name = node.name
    let code = `__tests.push({ name: '${name}', f: () => {\n`

    // ブロックを解析
    const block = this._convGen(node.blocks[0], false)

    code += `   ${block}\n` +
      '}});'

    if (!node.meta) {
      throw new Error('[System Error] テストのメタ情報が指定されていません')
    }
    this.nakoTestFuncs.set(name, {
      josi: node.meta.josi,
      fn: code,
      type: 'test_func'
    })

    // ★この時点ではテストコードを生成しない★
    // プログラム冒頭でコード生成時にテストの定義を行う
    return ''
  }

  convDefFunc(node: AstDefFunc): string {
    // ※ [関数定義のメモ]
    // ※ 関数の定義はプログラムの冒頭に移される。
    // ※ そのため、生成されたコードはここでは返さない
    // ※ registerFunction を参照
    if (!node.name) { return '' }
    const name = NakoGen.getFuncName(node.name)
    this.convDefFuncCommon(node, name)
    return ''
  }

  convFuncObj(node: AstDefFunc): string {
    return '/*convFuncObj*/' + this.convDefFuncCommon(node, '')
  }

  convJsonObj(node: AstBlocks): string {
    const resultArray = []
    const list = node.blocks
    for (let i = 0; i < list.length / 2; i++) {
      const idx = i * 2
      const key = list[idx + 0]
      const val = list[idx + 1]
      const keyStr = this._convGen(key, true)
      const valStr = this._convGen(val, true)
      resultArray.push(`${keyStr}: ${valStr}`)
    }
    return '{' + resultArray.join(', ') + '}'
  }

  convJsonArray(node: AstBlocks): string {
    const list = node.blocks
    const codelist = list.map((e: Ast) => {
      return this._convGen(e, true)
    })
    return '[' + codelist.join(',') + ']'
  }

  convRefArray(node: Ast): string {
    let code = ''
    code = this._convGen(node.name as Ast, true)
    const list: Ast[] | undefined = node.index
    if (!list) { return code }
    for (let i = 0; i < list.length; i++) {
      const idx = this._convGen(list[i], true)
      code += '[' + idx + ']'
    }
    return code
  }

  convRefArrayValue(node: AstOperator): string {
    let code = ''
    const op: string = node.name ? String(node.name) : '???'
    const val: Ast|undefined = node.index ? node.index.shift() : undefined
    if (!val) { return '/*[WARNING] convRefArrayOperator::InvalidValue */' }
    code = this._convGen(val, true)
    const list: Ast[] | undefined = node.index
    if (!list) { return code }
    if (op === '@' || op === '[') {
      for (let i = 0; i < list.length; i++) {
        const idx = this._convGen(list[i], true)
        code += '[' + idx + ']'
      }
      return code
    }
    if (op === '$') {
      return this.convRefProp_genCode(code, list as AstStrValue[])
    }
    // operator not found
    const op2 = op.replace('*/', '＊/')
    return `/* [WARNING] convRefArrayOperator::UnknownOperator [${op2}] */` + code
  }

  convLetArray(node: AstLetArray): string {
    const id = this.loopId++
    const valueNode: Ast = node.blocks[0]
    const indexNodes: Ast[] = node.blocks.slice(1)
    const name = this.genVar(node.name, node)
    let codeInit = ''
    let code = name
    let codeArray = ''
    // codeInit?
    if (node.checkInit) { // DNCLのための初期化処理 ... DNCLでは配列の初期化なしでいきなり配列を使う試験問題があるため
      const arrayDefCode = '[0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0, 0,0,0,0,0,0,0,0,0,0]'
      // [name]の内容は[__self.__varslist[2].get("a__A")]のようなものになっているはず
      if (node.name) {
        const word = node.name
        const tmpVar = `$nako_tmp_a${id}`
        const initArrayCode = this.varname_set(word, arrayDefCode)
        codeInit += `\n/*配列初期化*/if (!(${name} instanceof Array)) { ${initArrayCode} };\n`
        codeInit += `${tmpVar} = ${name};\n`
        for (let i = 0; i < indexNodes.length - 1; i++) {
          const idx = this._convGen(indexNodes[i], true)
          codeArray += `[${idx}]`
          codeInit += `\n/*配列初期化${i}*/if (!(${tmpVar}${codeArray} instanceof Array)) { ${tmpVar}${codeArray} = ${arrayDefCode}; };`
        }
        codeInit += '\n'
      }
    }
    // array
    for (let i = 0; i < indexNodes.length; i++) {
      const idx = this._convGen(indexNodes[i], true)
      code += '[' + idx + ']'
    }
    // value
    let value = null
    if (this.speedMode.invalidSore === 0) { value = this.varname_get('それ') }
    if (valueNode.type !== 'nop') { value = this._convGen(valueNode, true) }
    if (value === null) {
      throw NakoSyntaxError.fromNode('代入する先の変数名がありません。', node)
    }
    code += ' = ' + value + ';\n'
    // generate code
    const src = this.convLineno(node, false) + codeInit + code
    return src
  }

  convGenLoop(node: Ast): string {
    const tmpflag = this.flagLoop
    this.flagLoop = true
    try {
      return this._convGen(node, false)
    } finally {
      this.flagLoop = tmpflag
    }
  }

  convFor(node: AstFor): string {
    const astFrom = node.blocks[0]
    const astTo = node.blocks[1]
    const astInc = node.blocks[2]
    const astBlock = node.blocks[3]
    // forのIDを取得
    const idLoop = this.loopId++
    const varI = `$nako_i${idLoop}`
    // ループ変数について
    let loopVarSetter = ''
    if (node.word !== '') { // ループ変数を使う時
      const varName = node.word
      this.varsSet.names.add(varName)
      loopVarSetter = this.varname_set(varName, varI)
    }
    // ループ条件を変数に入れる用
    const varFrom = `$nako_from${idLoop}`
    const varTo = `$nako_to${idLoop}`
    const varTemp = `$nako_temp${idLoop}`
    let sorePrefex = ''
    if (this.speedMode.invalidSore === 0) {
      sorePrefex = this.varname_set('それ', varI)
    }
    // ループ条件を確認
    let kara = '0'
    let made = '0'
    let temp = '0'
    if (astTo && astTo.type === 'func' && astTo.name === '範囲') {
      temp = this._convGen(astTo, true)
      kara = `${varTemp}['先頭'] || 0`
      made = `${varTemp}['末尾'] || 0`
    } else {
      kara = this._convGen(astFrom, true)
      made = this._convGen(astTo, true)
    }
    const flagDown = node.flagDown
    const flagUp = node.flagUp
    let inc = '1'
    if (astInc.type !== 'nop') {
      inc = this._convGen(astInc, true)
    }
    // ループ内のブロック内容を得る
    const block = this.convGenLoop(astBlock)
    const code =
      this.convLineno(node, false) + '\n' +
      `/*[convFor id=${idLoop}]*/\n` +
      `const ${varTemp} = ${temp};\n` +
      `const ${varFrom} = ${kara};\n` +
      `const ${varTo} = ${made};\n` +
      `if (${varFrom} < ${varTo}) { // up\n` +
      `  if (${String(flagUp)}) {` +
      `    for (let ${varI} = ${varFrom}; ${varI} <= ${varTo}; ${varI}+= ${inc}) {\n` +
      `      ${sorePrefex};${loopVarSetter}\n` +
      '      // for block begin\n' +
      `      ${block}\n` +
      '      // for block end\n' +
      '    };\n' +
      '  };\n' +
      `} else if (${varFrom} > ${varTo}) { // down\n` +
      `  if (${String(flagDown)}) {` +
      `    for (let ${varI} = ${varFrom}; ${varI} >= ${varTo}; ${varI}-= ${inc}) {\n` +
      `      ${sorePrefex};${loopVarSetter}\n` +
      '      // for block begin\n' +
      `      ${block}\n` +
      '      // for block end\n' +
      '    }\n' +
      '  };\n' +
      '} else { // from == to\n' +
      `  for (let ${varI} = ${varFrom}; ${varI} <= ${varTo}; ${varI}+= 1) {\n` +
      `    ${sorePrefex};${loopVarSetter}\n` +
      '    // for block begin\n' +
      `    ${block}\n` +
      '    // for block end\n' +
      '  };\n' +
      '};\n' +
      `//[/convFor id=${idLoop}]\n`
    return code
  }

  convForeach(node: AstForeach): string {
    const exprAst = node.blocks[0]
    const blockAst = node.blocks[1]
    // foreachのIDを取得
    const id = this.loopId++
    const loopKeyVar = `$nako_i${id}`
    const loopValueVar = `$nako_foreach_value${id}`
    const loopDataVar = `$nako_foreach_data${id}`
    const taisyouTemp = `$nako_taisyou_temp${id}`
    const taisyouKeyTemp = `$nako_taisyou_key_temp${id}`
    const soreTemp = `$nako_foreach_sore_temp${id}`

    // 「対象」「対象キー」を取得 --- blockより早く変数を定義する必要がある
    let taisyoPrefex = this.varname_set_sys('対象', loopValueVar)
    if (node.word !== '') { // 対象変数がある場合、対象は設定されない
      const valueVar = node.word
      this.varsSet.names.add(valueVar)
      taisyoPrefex = this.varname_set(valueVar, loopValueVar)
    }
    const keyVar = '対象キー'
    const keySetter = this.varname_set_sys(keyVar, loopKeyVar)
    // 「それ」(対象のエイリアス)の設定
    let sorePrefex = ''
    let soreRecover = ''
    let soreBackup = ''
    if (this.speedMode.invalidSore === 0) {
      sorePrefex = this.varname_set('それ', loopValueVar)
      soreRecover = this.varname_set('それ', soreTemp)
      soreBackup = `let ${soreTemp} = ` + this.varname_get('それ') + ';'
    }

    // 反復するデータを取得
    let targetData = ''
    if (exprAst.type === 'nop') {
      if (this.speedMode.invalidSore === 0) {
        targetData = this.varname_get('それ')
      } else {
        throw NakoSyntaxError.fromNode('『反復』の対象がありません。', node)
      }
    } else {
      targetData = this._convGen(exprAst, true)
    }
    // 反復するブロックを取得
    const block = trim(cleanGeneratedCode(this.convGenLoop(blockAst), 1))
    // コードを生成
    const code =
      this.convLineno(node, false) + '\n' +
      `// [convForeach id=${id}]\n` +
      `const ${taisyouTemp} = __self.__getSysVar('対象'); ${soreBackup}; ` +
      `const ${taisyouKeyTemp} = __self.__getSysVar('対象キー');\n` +
      `let ${loopDataVar} = ${targetData};\n` +
      '// foreach Map?\n' +
      `if (${loopDataVar} instanceof Map) { // Objectに強制変換\n` +
      `  let tmp = {}; for (let tmpKey of ${loopDataVar}.keys()) { tmp[tmpKey] = ${loopDataVar}.get(tmpKey); }; \n` +
      `  ${loopDataVar} = tmp;\n` +
      '}\n' +
      `for (let ${loopKeyVar} in ${loopDataVar}) {\n` +
      `  if (!${loopDataVar}.hasOwnProperty(${loopKeyVar})) { continue }\n` +
      '  // 対象キーの設定\n' +
      `  ${keySetter}\n` +
      '  // 対象の設定\n' +
      `  let ${loopValueVar} = $nako_foreach_data${id}[${loopKeyVar}]\n` +
      `  ${sorePrefex};\n` +
      `  ${taisyoPrefex};\n` +
      '  // [convForeach::block]\n' +
      `  ${block}\n` +
      '  // [/convForeach::block]\n' +
      '}\n' +
      `__self.__setSysVar('対象', ${taisyouTemp});${soreRecover};` +
      `__self.__setSysVar('対象キー', ${taisyouKeyTemp});` +
      `// [/convForeach id=${id}]\n`
    return code
  }

  convRepeatTimes(node: AstRepeatTimes): string {
    // ループのIDを取得
    const id = this.loopId++
    const varI = `$nako_i${id}`
    const varCount = `$nako_times_data${id}`
    const varKaisuTemp = `$nako_kaisu_temp${id}`
    const codeCount = this._convGen(node.blocks[0], true)
    // ブロックを得る
    const block = trim(cleanGeneratedCode(this.convGenLoop(node.blocks[1]), 1))
    // それ
    let sorePrefex = ''
    let soreRecover = ''
    if (this.speedMode.invalidSore === 0) {
      sorePrefex = this.varname_set('それ', varI)
      soreRecover = this.varname_set('それ', varKaisuTemp)
    }
    // 回数
    sorePrefex += `;__self.__setSysVar('回数', ${varI});`
    soreRecover += `;__self.__setSysVar('回数', ${varKaisuTemp});`
    const code =
      this.convLineno(node, false) + '\n' +
      `// [convRepeatTimes id=${id}] // 『n回』構文\n` +
      `let ${varKaisuTemp} = __self.__getSysVar('回数')\n` +
      `let ${varCount} = ${codeCount};\n` +
      `for (let ${varI} = 1; ${varI} <= ${varCount}; ${varI}++) {\n` +
      `  ${sorePrefex}\n` +
      `  ${block}\n` +
      '}\n' +
      `${soreRecover}\n` +
      `// [/convRepeatTimes id=${id}]\n`
    return code
  }

  /**
   * @param {Ast} node
   * @param {boolean} isExpression
   */
  convSpeedMode(node: AstBlocks, isExpression: boolean): string {
    if (!node.options) { return '' }
    const prev = { ...this.speedMode }
    if (node.options['行番号無し']) {
      this.speedMode.lineNumbers++
    }
    if (node.options['暗黙の型変換無し']) {
      this.speedMode.implicitTypeCasting++
    }
    if (node.options['強制ピュア']) {
      this.speedMode.forcePure++
    }
    if (node.options['それ無効']) {
      this.speedMode.invalidSore++
    }
    try {
      return this._convGen(node.blocks[0], isExpression)
    } finally {
      this.speedMode = prev
    }
  }

  /**
   * @param {Ast} node
   * @param {boolean} isExpression
   */
  convPerformanceMonitor(node: AstBlocks, isExpression: boolean): string {
    const prev = { ...this.performanceMonitor }
    if (!node.options) { return '' }
    if (node.options['ユーザ関数']) {
      this.performanceMonitor.userFunction++
    }
    if (node.options['システム関数本体']) {
      this.performanceMonitor.systemFunctionBody++
    }
    if (node.options['システム関数']) {
      this.performanceMonitor.systemFunction++
    }
    try {
      return this._convGen(node.blocks[0], isExpression)
    } finally {
      this.performanceMonitor = prev
    }
  }

  convWhile(node: AstWhile): string {
    const exprAst = node.blocks[0]
    const blockAst = node.blocks[1]
    const cond = this._convGen(exprAst, true)
    const block = trim(cleanGeneratedCode(this.convGenLoop(blockAst), 1))
    const code =
      '// [convWhile]\n' +
      this.convLineno(node, false) + '\n' +
      `while (${cond})` + '{\n' +
      `  ${block}` + '\n' +
      '}\n' +
      '// [convWhile]\n'
    return code
  }

  convAtohantei(node: AstAtohantei): string {
    const id = this.loopId++
    const varId = `$nako_i${id}`
    const cond = this._convGen(node.blocks[0], true)
    const block = this.convGenLoop(node.blocks[1])
    const code =
      'while (true) {\n' +
      `  ${block}\n` +
      `  let ${varId} = ${cond};\n` +
      `  if (${varId}) { continue } else { break }\n` +
      '}\n\n'
    return this.convLineno(node, false) + code
  }

  convSwitch(node: AstSwitch): string {
    const expr: string = this._convGen(node.blocks[0], true)
    const defaultStr = this._convGen(node.blocks[1], false)
    let body = ''
    for (let i = 0; i < node.case_count; i++) {
      const caseIndex = i * 2 + 2
      const condStr = this._convGen(node.blocks[caseIndex + 0], true)
      const blockStr = this.convGenLoop(node.blocks[caseIndex + 1])
      body += `  case ${condStr}:\n`
      body += `    ${blockStr}\n` +
              '    break\n'
    }
    const code =
      '// [switch]\n' +
      `switch (${expr})` + '{\n' +
      `${body}` + '\n' +
      '  default:\n' +
      `    ${defaultStr}\n` +
      '}\n' +
      '// [/switch]\n'
    return this.convLineno(node, false) + code
  }

  convIf(node: AstIf): string {
    const exprAst = node.blocks[0]
    const trueAst = node.blocks[1]
    const falseAst = node.blocks[2]
    // 条件
    const expr = this._convGen(exprAst, true)
    // TRUEブロック
    const trueBlock = trim(cleanGeneratedCode(this._convGen(trueAst, false), 1))
    // FALSEブロック
    const falseBlock = trim(cleanGeneratedCode(this._convGen(falseAst, false), 1))
    let code =
      '// [convIf]\n' +
      this.convLineno(node, false) + '\n' +
      `if (${expr}) {\n` +
      `  ${trueBlock}\n` +
      '}'
    if (trim(falseBlock) !== '') {
      code +=
        '  else {\n' +
        `  ${falseBlock}\n` +
        '}\n'
    }
    code += '\n// [/convIf]\n'
    return code
  }

  convFuncGetArgsCalcType(_funcName: string, _func: any, node: AstCallFunc): [any, any] {
    const args = []
    const opts: {[key: string]: boolean} = {}
    const nodeArgs = (node.blocks) ? node.blocks : []
    for (let i = 0; i < nodeArgs.length; i++) {
      const arg = nodeArgs[i]
      if (i === 0 && arg === null && this.speedMode.invalidSore === 0) {
        args.push(this.varname_get('それ'))
        opts.sore = true
      } else {
        let argCode = this._convGen(arg, true)
        if (argCode === '') { argCode = 'undefined' }
        if (typeof argCode !== 'string') { argCode = 'undefined' }
        args.push(`/*arg${i}*/${argCode}`)
      }
    }
    return [args, opts]
  }

  getPluginList() {
    const r = []
    for (const name in this.__self.__module) { r.push(name) }
    return r
  }

  /**
   * 関数の呼び出し
   * @param {Ast} node
   * @param {boolean} isExpression
   * @returns string コード
   */
  convCallFunc(node: AstCallFunc, isExpression: boolean): string {
    const funcName = NakoGen.getFuncName(node.name)
    const res = this.findVar(funcName)
    if (res === null) {
      throw NakoSyntaxError.fromNode(`関数『${funcName}』が見当たりません。有効プラグイン=[` + this.getPluginList().join(', ') + ']', node)
    }
    // どの関数を呼び出すのか関数を特定する
    let func
    if (res.i === 0) { // plugin function
      func = this.__self.getFunc(funcName)
      if (!func) { throw new Error(`[System Error] 関数「${funcName}」NakoCompiler.nakoFuncList の不整合があります。`) }
      if (func.type !== 'func') {
        throw NakoSyntaxError.fromNode(`『${funcName}』は関数ではありません。`, node)
      }
    } else {
      func = this.nakoFuncList.get(funcName)
      // 無名関数の可能性
      if (func === undefined) { func = { return_none: false, asyncFn: !!node.asyncFn } }
    }
    // 関数の参照渡しか？
    if (node.type === 'func_pointer') {
      return res.js
    }

    // 関数の参照渡しでない場合
    // 関数定義より助詞を一つずつ調べる
    const argsInfo = this.convFuncGetArgsCalcType(funcName, func, node)
    const args = argsInfo[0]
    const argsOpts = argsInfo[1]
    // function
    this.usedFuncSet.add(funcName)
    if (funcName === '名前空間設定') {
      return `\n// --- 名前空間(${args[0]}) ---\n__self.__varslist[0].get('名前空間設定')(${args[0]}, __self);__self.__modName=${args[0]};\n`
    } else if (funcName === 'プラグイン名設定') {
      return `\n__self.__varslist[0].get('プラグイン名設定')(${args[0]}, __self);\n`
    }

    // 関数呼び出しで、引数の末尾にthisを追加する-システム情報を参照するため
    args.push('__self')
    let funcDef = 'function'
    let funcBegin = ''
    let funcEnd = ''
    // setter?
    if (node.setter) {
      funcBegin += ';__self.isSetter = true;\n'
      funcEnd += ';__self.isSetter = false;\n'
    }
    // 関数内 (__varslist.length > 3) からプラグイン関数 (res.i === 0) を呼び出すとき、 そのプラグイン関数がpureでなければ
    // 呼び出しの直前に全てのローカル変数をthis.__localsに入れる。
    if (res.i === 0 && this.varslistSet.length > 3 && func.pure !== true && this.speedMode.forcePure === 0) { // undefinedはfalseとみなす
      // 展開されたローカル変数の列挙
      const localVars = []
      for (const name of Array.from(this.varsSet.names.values())) {
        if (NakoGen.isValidIdentifier(name)) {
          localVars.push({ str: JSON.stringify(name), js: this.varname_get(name) })
        }
      }

      // --- 実行前 ---
      // 全ての展開されていないローカル変数を __self.__locals にコピーする
      funcBegin += '__self.__locals = __vars;\n'
      // 全ての展開されたローカル変数を __self.__locals に保存する
      if (localVars.length > 0) {
        funcBegin += '/* 全ての展開されたローカル変数を __self.__locals に保存 */\n'
        for (const v of localVars) {
          funcBegin += `__self.__locals.set(${v.str}, ${v.js});\n`
        }
      }

      // --- 実行後 ---
      // 全ての展開されたローカル変数を __self.__locals から受け取る
      // 「それ」は関数の実行結果を受け取るために使うためスキップ。
      if (localVars.length > 0) {
        funcEnd += '/* 全ての展開されたローカル変数を __self.__locals から受け取る */\n'
        for (const v of localVars) {
          if (v.js !== 'それ') {
            funcEnd += `__self.__varslist[2].set(${v.str}, __self.__locals[${v.str}]);\n`
          }
        }
      }
    }
    // 変数「それ」が補完されていることをヒントとして出力
    if (argsOpts.sore) { funcBegin += '/*[sore]*/' }

    const indent = (text: string, n: number) => {
      let result = ''
      for (const line of text.split('\n')) {
        if (line !== '') {
          result += '  '.repeat(n) + line + '\n'
        }
      }
      return result
    }

    // 引数チェックの例外 #1260
    const noCheckFuncs: {[key: string]: boolean} = { 'TYPEOF': true, '変数型確認': true }
    // 関数呼び出しコードの構築
    let argsCode: string
    if ((!this.warnUndefinedCallingUserFunc && res.i !== 0) || (!this.warnUndefinedCallingSystemFunc && res.i === 0)) {
      argsCode = args.join(',')
    } else {
      const argsA: string[] = []
      args.forEach((arg: string) => {
        if (arg === '__self' || noCheckFuncs[funcName] === true) { // #1260
          argsA.push(`${arg}`)
        } else {
          // 引数のundefinedチェックのコードを入れる
          const msg = (res.i === 0) ? '命令『$0』の引数にundefinedを渡しています。' : 'ユーザ命令『$0』の引数にundefinedを渡しています。'
          const poolIndex = this.addConstPool(msg, [funcName], node.file, node.line)
          // argが空になる対策 #1315
          const argStr = (arg === '') ? '""' : arg
          argsA.push(`(__self.chk(${argStr}, ${poolIndex}))`)
        }
      })
      argsCode = argsA.join(', ')
    }

    let funcCall = `${res.js}(${argsCode})`
    if (func.asyncFn) {
      funcDef = `async ${funcDef}`
      funcCall = `await ${funcCall}`
      this.numAsyncFn++
      this.usedAsyncFn = true
      // 非同期関数の呼び出し前に __self.__vars を待避しておく必要がある (#1758)
      const varI = `$nako_i${this.loopId}`
      this.loopId++
      funcBegin += `const __local_async${varI} = __self.__vars;\n`
      funcEnd += `__self.__vars = __local_async${varI};\n`
    }
    if (res.i === 0 && this.performanceMonitor.systemFunctionBody !== 0) {
      let key = funcName
      if (!key) {
        if (typeof this.performanceMonitor.mumeiId === 'undefined') {
          this.performanceMonitor.mumeiId = 0
        }
        this.performanceMonitor.mumeiId++
        key = `anous_${this.performanceMonitor.mumeiId}`
      }
      funcCall = `(${funcDef} (key, type) {\n` +
        'const sbf_start = performance.now() * 1000;\n' +
        'try {\n' +
        'return ' + funcCall + ';\n' +
        '} finally {\n' +
        'const sbl_time = performance.now() * 1000 - sbf_start;\n' +
        'if (!__self.__performance_monitor) {\n' +
        '__self.__performance_monitor={};\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: sbl_time, min_usec: sbl_time, max_usec: sbl_time, type: type };\n' +
        '} else if (!__self.__performance_monitor[key]) {\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: sbl_time, min_usec: sbl_time, max_usec: sbl_time, type: type };\n' +
        '} else {\n' +
        '__self.__performance_monitor[key].called++;\n' +
        '__self.__performance_monitor[key].totel_usec+=sbl_time;\n' +
        'if(__self.__performance_monitor[key].min_usec>sbl_time){__self.__performance_monitor[key].min_usec=sbl_time;}\n' +
        'if(__self.__performance_monitor[key].max_usec<sbl_time){__self.__performance_monitor[key].max_usec=sbl_time;}\n' +
        `}}})('${funcName}_body', 'sysbody')\n`
    }

    let code = ''
    if (func.return_none) {
      // ------------------------------------
      // 戻り値のない関数の場合
      // ------------------------------------
      if (funcEnd === '') {
        code = `/*VOID関数呼出*/${funcBegin}${funcCall}\n`
      } else {
        code = `/*VOID関数呼出(前後処理付)*/${funcBegin}try {\n${indent(funcCall, 1)};\n} finally {\n${indent(funcEnd, 1)}}\n`
      }
      // 行番号を追加
      code = this.convLineno(node, false) + code
    } else {
      // ------------------------------------
      // 戻り値のある関数の場合
      // ------------------------------------
      let sorePrefex = ''
      let sorePostfix = ''
      if (this.speedMode.invalidSore === 0) {
        // 関数の戻り値を記録
        sorePrefex = '__self.__setSore('
        sorePostfix = ')'
      }
      if (funcBegin === '' && funcEnd === '') {
        code = `${sorePrefex}${funcCall}${sorePostfix}`
      } else {
        if (funcEnd === '') {
          const funcBody = `${sorePrefex}${funcCall}${sorePostfix}`
          const funcObj = `${funcDef}(){ return ${funcBody} }`
          const funcCallThis = `(${funcObj}).call(this)`
          code = `/* funcCallThis1 */${funcCallThis}`
        } else { // つまり、pure=falseの場合
          const varI = `$nako_i${this.loopId}`
          this.loopId++
          code = `/* funcCallThis2 */(${funcDef}(){\n` +
            indent(funcBegin, 1) + '\n' +
            indent('try {', 1) + '\n' +
            indent(`let ${varI} = ${funcCall};`, 2) + '\n' +
            indent(`return ${varI};`, 2) + '\n' +
            indent('} finally {', 2) + '\n' +
            indent(funcEnd, 1) + '\n' +
            indent('}', 1) + '\n' +
            '}).call(this)'
          if (func.asyncFn) {
            code = `await (${code})`
          }
          code = `${sorePrefex}${code}${sorePostfix}`
        }
      }
      // ...して
      if (node.josi === 'して' || (node.josi === '' && !isExpression)) {
        code = this.convLineno(node, false) + code
        code += ';\n'
      }
    }

    if (res.i === 0 && this.performanceMonitor.systemFunction !== 0) {
      code = '(function (key, type) {\n' +
        'const sf_start = performance.now() * 1000;\n' +
        'try {\n' +
        'return ' + code + ';\n' +
        '} finally {\n' +
        'const sl_time = performance.now() * 1000 - sf_start;\n' +
        'if (!__self.__performance_monitor) {\n' +
        '__self.__performance_monitor={};\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: sl_time, min_usec: sl_time, max_usec: sl_time, type: type };\n' +
        '} else if (!__self.__performance_monitor[key]) {\n' +
        '__self.__performance_monitor[key] = { called:1, totel_usec: sl_time, min_usec: sl_time, max_usec: sl_time, type: type };\n' +
        '} else {\n' +
        '__self.__performance_monitor[key].called++;\n' +
        '__self.__performance_monitor[key].totel_usec+=sl_time;\n' +
        'if(__self.__performance_monitor[key].min_usec>sl_time){__self.__performance_monitor[key].min_usec=sl_time;}\n' +
        'if(__self.__performance_monitor[key].max_usec<sl_time){__self.__performance_monitor[key].max_usec=sl_time;}\n' +
        `}}})('${funcName}_sys', 'system')\n`
    }

    return code
  }

  convCallValue(node: AstBlocks, isExpression: boolean): string {
    const callee = this._convGen(node.blocks[0], true)
    const args = node.blocks.slice(1).map((arg) => this._convGen(arg, true))
    args.push('__self')
    const funcCall = `${callee}(${args.join(',')})`
    if (isExpression) {
      return funcCall
    }
    const sorePrefex = (this.speedMode.invalidSore === 0) ? '__self.__setSore(' : ''
    const sorePostfix = (this.speedMode.invalidSore === 0) ? ')' : ''
    return this.convLineno(node, false) + `${sorePrefex}${funcCall}${sorePostfix};\n`
  }

  convRenbun(node: AstOperator): string {
    const right = this._convGen(node.blocks[1], true)
    const left = this._convGen(node.blocks[0], false)
    this.numAsyncFn++
    this.usedAsyncFn = true
    return `/*[連文]*/await (async function(){ ${left}; return ${right} }).call(this)/*[/連文]*/`
  }

  convOp(node: AstOperator): string {
    // トークン名からJS演算子への変換 - 単純な変換が可能なものをここで定義
    const OP_TBL: {[key: string]: string} = {
      '&': '+""+',
      eq: '==',
      noteq: '!=',
      '===': '===',
      '!==': '!==',
      gt: '>',
      lt: '<',
      gteq: '>=',
      lteq: '<=',
      and: '&&',
      or: '||',
      shift_l: '<<',
      shift_r: '>>',
      shift_r0: '>>>',
      '÷': '/'
    }
    let op: string = node.operator || '' // 演算子
    let right = this._convGen(node.blocks[1], true)
    let left = this._convGen(node.blocks[0], true)
    if (op === '+' && this.speedMode.implicitTypeCasting === 0) {
      if (node.blocks[0] && (node.blocks[0]).type !== 'number' && (node.blocks[0]).type !== 'bigint') {
        left = `self.__parseFloatOrBigint(${left})`
      }
      if (node.blocks[1] && (node.blocks[1]).type !== 'number' && (node.blocks[1]).type !== 'bigint') {
        right = `self.__parseFloatOrBigint(${right})`
      }
    }
    // 階乗
    if (op === '^' || op === '**') { return `((${left}) ** (${right}))` }
    // 整数の割り算 #1152
    if (op === '÷÷') { return `(Math.floor(${left} / ${right}))` }

    // 一般的なオペレータに変換
    if (OP_TBL[op]) { op = OP_TBL[op] }
    //
    return `(${left} ${op} ${right})`
  }

  convInc(node: AstBlocks): string {
    // idを得る
    const id = this.loopId++
    const valueVar = `$nako_v${id}`

    // もし値が省略されていたら、変数「それ」に代入する
    let incValue = '1'
    if (this.speedMode.invalidSore === 0) { incValue = this.varname_get('それ') }
    const astValue = node.blocks[0]
    if (astValue.type !== 'nop') { incValue = this._convGen(astValue, true) }

    // 配列への代入か(core#86)
    let code = ''
    let varGetter = ''
    let varSetter = ''
    let varInitter = ''
    const nodeName = node.name as Ast
    if (nodeName.type === 'ref_array') {
      varGetter = this.convRefArray(nodeName)
      varSetter = `${varGetter} = ${valueVar}`
      varInitter = `${varGetter} = 0`
    } else if (nodeName.type === 'ref_prop') {
      // プロパティアクセス(A$a)の場合 (#1793)
      const baseName = this._convGen(nodeName.name as Ast, true)
      const propList = nodeName.index as AstStrValue[]
      // __getProp/__setPropを持つオブジェクトにも対応するgetter/setter生成
      const buildPropGetter = (targetExpr: string, propKey: string): string =>
        `(()=>{const __nako_obj=${targetExpr};` +
        `return (__nako_obj!=null&&typeof __nako_obj.__getProp==='function')` +
        `?__nako_obj.__getProp(${propKey}, __self)` +
        `:__nako_obj[${propKey}]})()`
      const buildPropSetter = (targetExpr: string, propKey: string, valueExpr: string): string =>
        `(()=>{const __nako_obj=${targetExpr};` +
        `return (__nako_obj!=null&&typeof __nako_obj.__setProp==='function')` +
        `?__nako_obj.__setProp(${propKey}, ${valueExpr}, __self)` +
        `:(__nako_obj[${propKey}]=${valueExpr})})()`
      const propKeys = propList.map((prop) => JSON.stringify(prop.value))
      // getter: 全プロパティを順にたどる
      let currentExpr = baseName
      for (const propKey of propKeys) {
        currentExpr = buildPropGetter(currentExpr, propKey)
      }
      varGetter = currentExpr
      // setter/initter: 最後のプロパティだけsetterで、残りはgetterでたどる
      let parentExpr = baseName
      for (const propKey of propKeys.slice(0, -1)) {
        parentExpr = buildPropGetter(parentExpr, propKey)
      }
      const lastPropKey = propKeys[propKeys.length - 1]
      varSetter = buildPropSetter(parentExpr, lastPropKey, valueVar)
      varInitter = buildPropSetter(parentExpr, lastPropKey, '0')
    } else {
      // 変数名
      const name: string = (nodeName as AstStrValue).value
      let res = this.findVar(name, valueVar)
      if (res === null) {
        this.varsSet.names.add(name)
        res = this.findVar(name, valueVar)
        if (!res) { throw new Error('『増』または『減』で変数が見当たりません。') }
      }
      varGetter = res.js
      varSetter = res.js_set
      res = this.findVar(name, '0')
      if (res !== null) {
        varInitter = res.js_set
      }
    }
    // 自動初期化するか
    code += '\n/*[convInc]*/\n'
    code += this.convLineno(node, false) + '\n'
    code += `let ${valueVar} = ${varGetter}\n`
    code += `if (typeof ${valueVar} === 'undefined') { ${varInitter}; }\n`
    code += `${valueVar} = Number(${varGetter}) + Number(${incValue});\n`
    code += `${varSetter}\n`
    code += '/*[/convInc]*/\n'
    return code
  }

  convLet(node: AstLet): string {
    const astValue = node.blocks[0]
    // もし値が省略されていたら、変数「それ」に代入する
    let value = null
    if (this.speedMode.invalidSore === 0) { value = this.varname_get('それ') }
    // 値のプログラムを生成
    if (astValue) {
      // 関数の戻り値がない場合はエラーを出す
      if (astValue.type === 'func' && astValue.name !== undefined) {
        const astFunc = astValue as AstCallFunc
        const func = this.__self.getFunc(astFunc.name)
        if (func && func.return_none) {
          throw NakoSyntaxError.fromNode(`関数『${astValue.name}』は戻り値がないので結果を代入できません。`, node)
        }
      }
      value = this._convGen(astValue, true)
    }
    // 戻り値の検証
    if (value === null) {
      throw NakoSyntaxError.fromNode('代入する先の変数名がありません。', node)
    }

    // 変数名
    const name: string = node.name
    const res = this.findVar(name, value)
    let code = '/*[convLet]*/'
    if (res === null) {
      this.varsSet.names.add(name)
      code = `${this.varname_set(name, value)};`
    } else {
      // 定数ならエラーを出す
      if (this.varslistSet[res.i].readonly.has(name)) {
        throw NakoSyntaxError.fromNode(
          `定数『${name}』は既に定義済みなので、値を代入することはできません。`, node)
      }
      code = `${res.js_set};`
    }
    return ';' + this.convLineno(node, false) + code + '\n'
  }

  // プロパティへの代入式 (#1793)
  convLetProp(node: AstLet): string {
    if (!node.index || node.index.length === 0) { throw NakoSyntaxError.fromNode('代入する先のプロパティ名がありません。', node) }
    if (!node.blocks || node.blocks.length === 0) { throw NakoSyntaxError.fromNode('代入する値がありません。', node) }
    const propList = node.index as AstStrValue[]
    const propTopAst = propList.pop()
    if (propTopAst === undefined) { throw NakoSyntaxError.fromNode('代入する先のプロパティ名がありません。', node) }
    const propTop = (typeof propTopAst.value === 'string') ? propTopAst.value : ''
    const astValue = node.blocks[0]
    let value = null
    // 値のプログラムを生成
    if (astValue) {
      value = this._convGen(astValue, true)
    } else {
      throw NakoSyntaxError.fromNode('代入する値がありません。', node)
    }
    // 変数名
    const name: string = node.name
    const res = this.findVar(name, value)
    let code = '/*[convLetProp]*/\n'
    // 変数が存在しないとき
    if (res === null) {
      throw NakoSyntaxError.fromNode(`変数『${name}』が見当たりません。`, node)
    }
    // 変数のプロパティ
    let nameJs = res.js
    // 配列アクセス
    if (node.blocks.length >= 2) {
      for (let i = 1; i < node.blocks.length; i++) {
        const indexNode = node.blocks[i]
        const indexJs = this._convGen(indexNode, true)
        nameJs += `[${indexJs}]`
      }
    }
    if (propList.length > 0) {
      for (const prop of propList) {
        if (typeof prop.value === 'string') {
          nameJs += `['${prop.value}']`
        } else {
          throw NakoSyntaxError.fromNode(
            `変数『${nameJs}』以下のプロパティにアクセスできません。`, node)
        }
      }
    }
    // プロパティへの代入式を作る
    code += `if (typeof ${nameJs}.__setProp === 'function') { ${nameJs}.__setProp('${propTop}', ${value}, __self); } else { `
    code += `__self.__checkPropAccessor('set', ${nameJs});`
    code += `if (typeof ${nameJs}.__setProp === 'function') { ${nameJs}.__setProp('${propTop}', ${value}, __self); } else { `
    code += `${nameJs}['${propTop}'] = ${value} }};`
    return ';' + this.convLineno(node, false) + code + '\n'
  }

  // プロパティへの参照 (#1793)
  convRefProp(node: Ast): string {
    const name = this._convGen(node.name as Ast, true)
    const list: Ast[] | undefined = node.index
    if (!list || list.length <= 0) {
      throw NakoSyntaxError.fromNode('プロパティがありません。', node)
    }
    return this.convRefProp_genCode(name, list as AstStrValue[])
  }

  // プロパティへの参照のコード生成部分 (#1793)
  convRefProp_genCode(name: string, propList: AstStrValue[]): string {
    let code
    if (propList.length <= 1) {
      const propKey = propList[0].value
      const codeCall = `${name}.__getProp('${propKey}', __self)`
      const codeProp = `${name}['${propKey}']`
      const codeCheckAccessor = `__self.__checkPropAccessor('get', ${name});\n` +
      `if (typeof ${name}.__getProp === 'function') { return ${codeCall} }\n` +
      `return ${codeProp}\n`
      const codeIf = `if (${name}.__getProp) { return ${codeCall} } else { ${codeCheckAccessor} }`
      code = `( (()=>{ ${codeIf} })() )`
    } else {
      const arrs = []
      const keys = []
      for (let i = 0; i < propList.length; i++) {
        const propKey = propList[i].value
        keys.push(`['${propKey}']`)
        arrs.push(`'${propKey}'`)
      }
      const keyStr = keys.join('')
      const arrStr = '[' + arrs.join(',') + ']'
      const codeCall = `${name}.__getProp(${arrStr}, __self)`
      const codeProp = `${name}${keyStr}`
      const codeCheckAccessor = `__self.__checkPropAccessor('get', ${name});\n` +
      `if (${name}.__getProp) { return ${codeCall} }\n` +
      `return ${codeProp}\n`
      const codeIf = `if (${name}.__getProp) { return ${codeCall} } else { ${codeCheckAccessor} }`
      code = `( (()=>{ ${codeIf} })() )`
    }
    return code
  }

  convDefLocalVar(node: AstDefVar): string {
    const astValue = node.blocks[0]
    let value = '0'
    if (astValue.type !== 'nop') {
      value = this._convGen(astValue, true)
    }
    const name = node.name // 変数名
    const vtype = node.vartype // 変数 or 定数
    // 二重定義？
    if (this.varsSet.names.has(name)) { throw NakoSyntaxError.fromNode(`${vtype}『${name}』の二重定義はできません。`, node) }

    //
    this.varsSet.names.add(name)
    if (vtype === '定数') {
      this.varsSet.readonly.add(name)
    }
    const code = `/*${vtype}*/${this.varname_set(name, value)};\n`
    return this.convLineno(node, false) + code
  }

  // #563 複数変数への代入
  convDefLocalVarlist(node: AstDefVarList): string {
    let code = ''
    const vtype = node.vartype // 変数 or 定数
    // 初期値を取得
    let value = '0'
    if (node.blocks.length > 0) {
      const astValue = node.blocks[0]
      if (astValue.type !== 'nop') {
        value = this._convGen(astValue, true)
      }
    }
    // 代入する変数名を取得
    const id = this.loopId++
    const varI = `$nako_i${id}`
    code += `let ${varI} = ${value}\n`
    code += `if (!(${varI} instanceof Array)) { ${varI}=[${varI}] }\n`
    const names: Ast[] = (node.names) ? node.names : []
    for (let i = 0; i < names.length; i++) {
      const nameObj = names[i]
      const name = (nameObj as AstStrValue).value
      // 二重定義？
      if (this.varsSet.names.has(name)) {
        // 複数変数文では、二重定義も許容する #1027
        // throw NakoSyntaxError.fromNode(`${vtype}『${name}』の二重定義はできません。`, node)
      }
      this.varsSet.names.add(name)
      if (vtype === '定数') {
        this.varsSet.readonly.add(name)
      }
      code += this.varname_set(name, `${varI}[${i}]`) + ';\n'
    }
    return this.convLineno(node, false) +
      '/*[convDefLocalVarlist]*/\n' +
      code +
      '/*[/convDefLocalVarlist]*/\n'
  }

  convString(node: AstConst): string {
    let value = String(node.value)
    value = value.replace(/\\/g, '\\\\')
    value = value.replace(/"/g, '\\"')
    value = value.replace(/\r/g, '\\r')
    value = value.replace(/\n/g, '\\n')
    return '"' + value + '"'
  }

  convTryExcept(node: AstBlocks): string {
    const block = this._convGen(node.blocks[0], false)
    const errBlock = this._convGen(node.blocks[1], false)
    return this.convLineno(node, false) +
      `try {\n${block}\n} catch (e) {\n` +
      '  __self.__setSysVar("エラーメッセージ", e.message);\n' +
      ';\n' +
      `${errBlock}}\n`
  }

  getUsedFuncSet(): Set<string> {
    return this.usedFuncSet
  }

  getPluginInitCode(): string {
    // プラグインの初期化関数を実行する
    let code = ''
    let pluginCode = ''
    for (const name in this.__self.__module) {
      const initkey = `!${name}:初期化`
      if (this.varslistSet[0].names.has(initkey)) {
        const initkeyDone = `!${name}:初期化済`
        this.usedFuncSet.add(initkey)
        pluginCode += `if (!__v0.has('${initkeyDone}')) { __v0.get('${initkey}')(__self); __v0.set('${initkeyDone}', true) }\n`
      }
    }
    if (pluginCode !== '') {
      code += '__v0.set(\'__line\', \'l0:プラグインの初期化\');\n' + pluginCode
    }
    return code
  }
}

export interface NakoGenResult {
  // なでしこの実行環境ありの場合
  runtimeEnv: string;
  // JavaScript単体で動かす場合
  standalone: string;
  // コード生成に使ったNakoGenのインスタンス
  gen: any
}

/** template of standalone js code */
const STANDALONE_CODE = `
// === generated by nadesiko3 v__version__(core:__coreVersion__) ===
// -----------------------------------------------------------------
// <nadesiko3standalone>
// -----------------------------------------------------------------
// --- import
import path from 'path'
import { NakoRuntimeError } from './nako3runtime/nako_errors.mjs'
__codeImportFiles__
// --- init global self
const self = {
  newVariables: () => {
    const map = new Map()
    return map
  }
}
self.coreVersion = '__coreVersion__'
self.version = '__version__'
self.logger = {
  error: (message) => { console.error(message) },
  warn: (message) => { console.warn(message) },
  send: (level, message) => { console.log(message) },
  runtimeError: (message, lineInfo) => { console.error(message, lineInfo) }
};
self.__varslist = [self.newVariables(), self.newVariables(), self.newVariables()]
self.__v0 = self.__varslist[0]
self.initFuncList = []
self.clearFuncList = []
self.__propAccessor = []
// --- jsInit ---
__jsInit__
// --- Copy module functions ---
for (const mod of __importNames__) {
  for (const funcName in mod) {
    // プラグインの初期化とクリア関数を登録
    if (funcName === '初期化') {
      __self.initFuncList.push(mod[funcName].fn)
      continue
    }
    if (funcName === '!クリア') {
      __self.clearFuncList.push(mod[funcName].fn)
      continue
    }
    // 関数や定数を登録
    const f = mod[funcName]
    if (f.type === 'func') { // 関数
      __self.__varslist[0].set(funcName, f.fn)
    } else { // 定数
      __self.__varslist[0].set(funcName, f.value)
    }
  }
}
__self.__vars = __self.__varslist[2];
__self.__module = {};
__self.__locals = __self.newVariables();
__self.__genMode = 'sync';
// プラグインの初期化コードを実行
__self.initFuncList.map(f => f(self))
// standalone
__self.__v0.set('__standalone', true)
// -----------------------------------------------------------------
try {
  try {
// -----------------------------------------------------------------
// <prepareMainCode>
__codeStandalone__
// </prepareMainCode>
// -----------------------------------------------------------------
// <mainCode>
// -----------------------------------------------------------------
__codeJS__
// -----------------------------------------------------------------
// </mainCode>
// -----------------------------------------------------------------
  } catch (err) {
    __self.logger.error(err);
    throw err;
  }
} finally {
  // standaloneCodeでは、即時プラグインのクリアコードを実行
  __self.clearFuncList.map(f => f(__self))
}
// -----------------------------------------------------------------
// </nadesiko3standalone>
// -----------------------------------------------------------------
`

/**
 * @param com
 * @param ast
 * @param opt
 */
export function generateJS(com: NakoCompiler, ast: Ast, opt: NakoGenOptions): NakoGenResult {
  // NakoGenのインスタンスを作成
  const gen = new NakoGen(com)

  // ※ [関数定義に関するコード生成のヒント]
  // ※ 関数の名前だけを(1)で登録して、(2)で実際に関数のコードを生成する。
  // ※ ただし(2)では生成するだけなので、(3)でプログラム冒頭に関数定義のコードを記述する。
  // この順番を変えることはできない (グローバル変数が認識できなくなったり、関数定義のタイミングがずれる)

  // (1) ユーザー定義関数をシステムに登録する
  gen.registerFunction(ast)

  // (2) JSコードを生成する
  let js = trim(cleanGeneratedCode(gen.convGen(ast, opt), 1))

  // (3) JSコードを実行するための事前ヘッダ部分の生成
  const jsInit = gen.getDefFuncCode(com, opt)

  // ランダムな関数名を生成
  const funcID = String((new Date()).getTime()) + '_' + Math.floor(0xFFFFFFFF * Math.random()).toString()
  // テストの実行
  if (js && opt.isTest) {
    js += '\n__self._runTests(__tests);\n'
  }
  // async method
  if (gen.numAsyncFn > 0 || gen.debugOption.useDebug) {
    const asyncMain = '__eval_nako3async_' + funcID + '__'
    js = `
// ------------------------------------------------------------------
// <nadesiko3::gen::async id="${funcID}" times="${gen.numAsyncFn}">
// ------------------------------------------------------------------
async function ${asyncMain}(__self) {
  // --- code_begin ---
  ${js}
  // --- code_end ---
  // __処理末尾__ // ← テストなどで必要なので消さない
} // end of ${asyncMain}
// ------------------------------------------------------------------
// call ${asyncMain}
(async () => {
  if (__self.__v0.get('__standalone')) {
    await ${asyncMain}(self);
  } else {
    ${asyncMain}.call(self, self)
    .then(() => { /* __async_ok__ */ })
    .catch(err => {
      if (err.message === '__終わる__') { return }
      __self.numFailures++
      // send errors to logger
      let rterr = __self.logger.runtimeError(err, __self.__v0.get('__line'))
      __self.logger.error(rterr)
    })
  }
})();
// ------------------------------------------------------------------
// </nadesiko3::gen::async id="${funcID}">
// ------------------------------------------------------------------
`
  } else {
    const syncMain = '__eval_nako3sync_' + funcID + '__'
    js = `
// ------------------------------------------------------------------
// <nadesiko3::gen::syncMode>
// ------------------------------------------------------------------
function ${syncMain}(__self) {
try {
  ${js}
  // __処理末尾__ // ← テストなどで必要なので消さない
} catch (err) {
  if (err.message === '__終わる__') { return }
  __self.numFailures++
  throw __self.logger.runtimeError(err, __self.__v0.get('__line'))
}
} // end of ${syncMain}
${syncMain}(__self)
// ------------------------------------------------------------------
// </nadesiko3::gen::syncMode>
// ------------------------------------------------------------------
`
  }
  // --- 生成したコードの簡単な整形 ---
  js = cleanGeneratedCode(js)
  // デバッグメッセージ
  let codeImportFiles = ''
  const importNames = []
  for (const f of opt.importFiles) {
    if (f === 'nako_errors.mjs') { continue }
    const ff = 'nako3runtime_' + f.replace(/\.(js|mjs)$/, '').replace(/[^a-zA-Z0-9_]/g, '_')
    importNames.push(ff)
    codeImportFiles += `import ${ff} from './nako3runtime/${f}'\n`
  }
  // ---
  const initCode = gen.getPluginInitCode()
  const runtimeEnvCode = `
// <runtimeEnvCode>
const self = this
${opt.codeEnv}
${jsInit}
${initCode}
${js}
// </runtimeEnvCode>
`
  com.getLogger().trace('--- generate::jsInit ---\n' + jsInit)
  com.getLogger().trace('--- generate::js ---\n' + js)
  return {
    // なでしこの実行環境ありの場合(thisが有効)
    runtimeEnv: runtimeEnvCode,
    // JavaScript単体で動かす場合
    standalone: replaceTemplateCode(STANDALONE_CODE, {
      codeImportFiles,
      'coreVersion': com.coreVersion,
      'version': com.version,
      'importNames': ('[' + importNames.join(', ') + ']'),
      'codeStandalone': opt.codeStandalone,
      'codeJS': js,
      jsInit
    }),
    // コード生成に使ったNakoGenのインスタンス
    gen
  }
}
// template
function replaceTemplateCode(template: string, values: any): string {
  for (const key in values) {
    const pat = `__${key}__`
    const val = values[key]
    template = template.split(pat).join(val)
  }
  return template
}

// clean generated code
function cleanGeneratedCode(code: string, indent = 0): string {
  // 1. 無意味な改行やセミコロンを削除
  // 2. 行頭の空白やセミコロンを削除
  // 3. indent分インデントを追加
  // ただし、文字列リテラル内の改行やセミコロンは削除しない (#2153)
  
  // 文字列リテラル外の連続セミコロンと連続改行を削除
  code = removeDuplicateChars(code)
  
  // indent分インデントを追加
  let spc = ''
  for (let i = 0; i < indent; i++) { spc += '  ' }
  
  // 行頭の";"を削除
  const result = []
  const lines = code.split('\n')
  for (let i = 0; i < lines.length; i++) {
    let line = lines[i]
    line = line.replace(/^(\s*);/, '$1')
    if (trim(line) === '') { continue }
    result.push(spc + line)
  }

  // 結果のコードを返す
  code = result.join('\n')
  return code
}

/**
 * 文字列リテラル外の連続セミコロンと連続改行を1つに置換する
 * 文字列リテラル内のセミコロンと改行は保護する (#2153)
 * JavaScriptの文字列リテラル、正規表現、テンプレートリテラル、コメントを考慮
 */
function removeDuplicateChars(code: string): string {
  const result: string[] = []
  let i = 0
  let inString = false
  let inRegex = false
  let inTemplate = false
  let inLineComment = false
  let inBlockComment = false
  let stringDelimiter = ''
  let prevChar = ''
  let lastSemiPos = -2 // 最後のセミコロンの位置
  let lastNewlinePos = -2 // 最後の改行の位置

  /**
   * 直前のバックスラッシュの数をカウント
   * 偶数個なら次の文字はエスケープされていない
   */
  const countBackslashes = (pos: number): number => {
    let count = 0
    let p = pos - 1
    while (p >= 0 && code.charAt(p) === '\\') {
      count++
      p--
    }
    return count
  }

  while (i < code.length) {
    const ch = code.charAt(i)
    const nextCh = i + 1 < code.length ? code.charAt(i + 1) : ''

    // 行コメントの処理
    if (inLineComment) {
      result.push(ch)
      if (ch === '\n') {
        inLineComment = false
      }
      prevChar = ch
      i++
      continue
    }

    // ブロックコメントの処理
    if (inBlockComment) {
      result.push(ch)
      if (ch === '*' && nextCh === '/') {
        result.push(nextCh)
        inBlockComment = false
        i += 2
        prevChar = '/'
        continue
      }
      prevChar = ch
      i++
      continue
    }

    // テンプレートリテラルの処理
    if (inTemplate) {
      result.push(ch)
      if (ch === '`') {
        const backslashCount = countBackslashes(i)
        if (backslashCount % 2 === 0) {
          // 偶数個のバックスラッシュ = エスケープされていない
          inTemplate = false
        }
      }
      prevChar = ch
      i++
      continue
    }

    // 正規表現の処理
    if (inRegex) {
      result.push(ch)
      if (ch === '/') {
        const backslashCount = countBackslashes(i)
        if (backslashCount % 2 === 0) {
          inRegex = false
        }
      }
      prevChar = ch
      i++
      continue
    }

    // 文字列リテラルの処理
    if (inString) {
      result.push(ch)
      if (ch === stringDelimiter) {
        const backslashCount = countBackslashes(i)
        if (backslashCount % 2 === 0) {
          // 偶数個のバックスラッシュ = エスケープされていない
          inString = false
          stringDelimiter = ''
        }
      }
      prevChar = ch
      i++
      continue
    }

    // コメント開始チェック
    if (ch === '/' && nextCh === '/') {
      result.push(ch)
      result.push(nextCh)
      inLineComment = true
      i += 2
      prevChar = '/'
      continue
    }

    if (ch === '/' && nextCh === '*') {
      result.push(ch)
      result.push(nextCh)
      inBlockComment = true
      i += 2
      prevChar = '*'
      continue
    }

    // 文字列・正規表現・テンプレートリテラルの開始チェック
    if (ch === '"' || ch === '\'') {
      inString = true
      stringDelimiter = ch
      result.push(ch)
      prevChar = ch
      i++
      continue
    }

    if (ch === '`') {
      inTemplate = true
      result.push(ch)
      prevChar = ch
      i++
      continue
    }

    // 正規表現リテラルの開始チェック（簡易版）
    // / の前が演算子や ( や , や = などの場合は正規表現の可能性が高い
    if (ch === '/' && /[=([,;:!&|?+\-*%^~{]|\breturn\b|\bnew\b/.test(prevChar)) {
      inRegex = true
      result.push(ch)
      prevChar = ch
      i++
      continue
    }
    // 文字列外の連続セミコロンをスキップ
    if (ch === ';' && lastSemiPos === i - 1) {
      // 連続するセミコロンの2番目以降はスキップ
      lastSemiPos = i
      i++
      prevChar = ch
      continue
    }

    if (ch === ';') {
      lastSemiPos = i
    }

    // 文字列外の連続改行をスキップ
    if (ch === '\n' && lastNewlinePos === i - 1) {
      // 連続する改行の2番目以降はスキップ
      lastNewlinePos = i
      i++
      prevChar = ch
      continue
    }

    if (ch === '\n') {
      lastNewlinePos = i
    }

    result.push(ch)
    prevChar = ch
    i++
  }

  return result.join('')
}

/**
 * 前後の空白を削除する
 * @param str 対象文字列
 * @returns トリムした文字列
 */
function trim(str: string): string {
  str = String(str)
  return str.replace(/^\s+|\s+$/g, '')
}