Changeset 321 for EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/generate.rb

Timestamp:

Aug 23, 2017, 9:27:43 AM (7 years ago)

Author:

coas-nagasima

Message:

文字コードを設定

File:

• EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/generate.rb (modified) (202 diffs, 1 prop)

EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/generate.rb

@@ -6 +6 @@
 #   Copyright (C) 2008-2016 by TOPPERS Project
 #--
-#   上記著作権è€
-は，以下の(1)～(4)ã®æ¡ä»¶ã‚’æº€ãŸã™å ´åˆã«é™ã‚Šï¼Œæœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§
-#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
-#   変・再é
-å¸ƒï¼ˆä»¥ä¸‹ï¼Œåˆ©ç”¨ã¨å‘¼ã¶ï¼‰ã™ã‚‹ã“とを無償で許諾する．
-#   (1) æœ¬ã‚½ãƒ•ãƒˆã‚¦ã‚§ã‚¢ã‚’ã‚½ãƒ¼ã‚¹ã‚³ãƒ¼ãƒ‰ã®å½¢ã§åˆ©ç”¨ã™ã‚‹å ´åˆã«ã¯ï¼Œä¸Šè¨˜ã®è‘—ä½œ
-#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
-#       スコード中に含まれていること．
-#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
-#       用できる形で再é
-å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œå†é
-å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨
-#       è€
-マニュアルなど）に，上記の著作権表示，この利用条件および下記
-#       の無保証規定を掲載すること．
-#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
-#       用できない形で再é
-å¸ƒã™ã‚‹å ´åˆã«ã¯ï¼Œæ¬¡ã®ã„ずれかの条件を満たすこ
-#       と．
-#     (a) 再é
-å¸ƒã«ä¼´ã†ãƒ‰ã‚­ãƒ¥ãƒ¡ãƒ³ãƒˆï¼ˆåˆ©ç”¨è€
-マニュアルなど）に，上記の著
-#         作権表示，この利用条件および下記の無保証規定を掲載すること．
-#     (b) 再é
-å¸ƒã®å½¢æ
-‹ã‚’，別に定める方法によって，TOPPERSプロジェクトに
-#         å ±å‘Šã™ã‚‹ã“ã¨ï¼Ž
-#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
-#       害からも，上記著作権è€
-およびTOPPERSプロジェクトをå
-è²¬ã™ã‚‹ã“と．
-#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
-#       由に基づく請求からも，上記著作権è€
-およびTOPPERSプロジェクトを
-#       å
-è²¬ã™ã‚‹ã“と．
+#   上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
+#   ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
+#   変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
+#   (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
+#       権表示，この利用条件および下記の無保証規定が，そのままの形でソー
+#       スコード中に含まれていること．
+#   (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
+#       用できる形で再配布する場合には，再配布に伴うドキュメント（利用
+#       者マニュアルなど）に，上記の著作権表示，この利用条件および下記
+#       の無保証規定を掲載すること．
+#   (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
+#       用できない形で再配布する場合には，次のいずれかの条件を満たすこ
+#       と．
+#     (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
+#         作権表示，この利用条件および下記の無保証規定を掲載すること．
+#     (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
+#         報告すること．
+#   (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
+#       害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
+#       また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
+#       由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
+#       免責すること．
 #  
-#   本ソフトウェアは，無保証で提供されているものである．上記著作権è€
-お
-#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
-#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
-#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
-#   ã®è²¬ä»»ã‚’è² ã‚ãªã„ï¼Ž
+#   本ソフトウェアは，無保証で提供されているものである．上記著作権者お
+#   よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
+#   に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
+#   アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
+#   の責任を負わない．
 #  
-#   $Id: generate.rb 1011 2016-07-11 02:20:01Z coas-nagasima $
+#   $Id$
 #++
 
@@ -134 +119 @@
 end
 
-# celltype_private.h を生成
+# celltype_private.h を生成
 
 class Namespace
@@ -140 +125 @@
 
     begin
-      # root namespace ならば makefile を出力する(å
-¨ã‚»ãƒ«ã‚¿ã‚¤ãƒ—に関わるものだけ)
-      # å
-ˆã«å‡ºåŠ›ã™ã‚‹
+      # root namespace ならば makefile を出力する(全セルタイプに関わるものだけ)
+      # 先に出力する
       if @name == "::" then
 
@@ -155 +138 @@
 
       dbgPrint "generating region: #{$generating_region.get_name} namespace=#{@name} gen_dir=#{$gen}\n"
-      # global_tecsgen.h (typedef, struct, const) の生成
+      # global_tecsgen.h (typedef, struct, const) の生成
       gen_global_header
 
-      # signature のコードを生成
+      # signature のコードを生成
       @signature_list.each { |s|
         s.generate
       }
 
-      # celltype のコードを生成
+      # celltype のコードを生成
       @celltype_list.each { |t|
         t.generate
       }
 
-      # サブネームスペースのコードを生成
+      # サブネームスペースのコードを生成
       @namespace_list.each { |n|
         n.generate
@@ -174 +157 @@
 
     rescue => evar
-      # もしスタックトレースが出るまでい時間がかかるようならば、次をコメントアウトしてみるべし
+      # もしスタックトレースが出るまでい時間がかかるようならば、次をコメントアウトしてみるべし
       cdl_error( "H1001 tecsgen: fatal internal error during code generation"  )
       print_exception( evar )
@@ -187 +170 @@
 
     begin
-      # global_tecsgen.h (typedef, struct, const) の終わりのガードコード生成
+      # global_tecsgen.h (typedef, struct, const) の終わりのガードコード生成
       gen_global_header_post
 
-      # signature のコードを生成
+      # signature のコードを生成
       @signature_list.each { |s|
         s.generate_post
       }
 
-      # celltype のコードを生成
+      # celltype のコードを生成
       @celltype_list.each { |t|
         t.generate_post
       }
 
-      # サブネームスペースのコードを生成
+      # サブネームスペースのコードを生成
       @namespace_list.each { |n|
         n.generate_post
@@ -214 +197 @@
   def gen_global_header
 
-    # global_tecs.h の生成
+    # global_tecs.h の生成
     f = AppFile.open( "#{$gen}/global_tecsgen.#{$h_suffix}" )
 
@@ -220 +203 @@
       print_note f
 
-      # ガードコードを出力
+      # ガードコードを出力
       f.print <<EOT
 #ifndef GLOBAL_TECSGEN_H
@@ -227 +210 @@
 EOT
 
-      # import_C で指定されたヘッダファイルの #include を出力
+      # import_C で指定されたヘッダファイルの #include を出力
       if Import_C.get_header_list2.length > 0 then
-        # ヘッダ include の出力
+        # ヘッダ include の出力
         f.printf TECSMsg.get( :IMP_comment ), "#_IMP_#"
         Import_C.get_header_list2.each{ |h|
@@ -240 +223 @@
     end
 
-    # typedef, struct, enum を生成
+    # typedef, struct, enum を生成
     @decl_list.each { |d|
 
-      # d は Typedef, StructType, EnumType のいずれか
+      # d は Typedef, StructType, EnumType のいずれか
       if d.instance_of?( Typedef ) then
 
-        # Typedef ã®å ´åˆã€declarator の @type が　CType でないか
+        # Typedef の場合、declarator の @type が　CType でないか
         if ! d.get_declarator.get_type.kind_of?( CType ) then
           d.gen_gh f
@@ -252 +235 @@
       elsif ! d.kind_of?( CType ) then
 
-        # CType ではない (StructType または EnumType)
+        # CType ではない (StructType または EnumType)
         d.gen_gh f
 #     else
-#       ここに該当するのは CStructType, CEnumType
+#       ここに該当するのは CStructType, CEnumType
       end
     }
@@ -283 +266 @@
     end
 
-    # const を生成  mikan
+    # const を生成  mikan
     @const_decl_list.each { |d|
       f.printf( "#define %-14s ((%s%s)%s)\n", d.get_global_name,
@@ -296 +279 @@
   def gen_global_header_post
 
-    # global_tecs.h を開く
+    # global_tecs.h を開く
     f = AppFile.open( "#{$gen}/global_tecsgen.#{$h_suffix}" )
 
@@ -310 +293 @@
   end
 
-  #=== Makefile.tecsgen, Makefile.templ の出力
-  # å
-¨ã‚»ãƒ«ã‚¿ã‚¤ãƒ—名を出力する部分を出力
-  #    （本メソッドは root namespace に対して呼出す）
-  #     個ã€
-のセルタイプのメークルールは Celltype クラスで出力
+  #=== Makefile.tecsgen, Makefile.templ の出力
+  # 全セルタイプ名を出力する部分を出力
+  #    （本メソッドは root namespace に対して呼出す）
+  #     個々のセルタイプのメークルールは Celltype クラスで出力
   def gen_makefile
     gen_makefile_template
@@ -325 +306 @@
     return if $generate_no_template
 
-    ### Makefile.templ の生成
+    ### Makefile.templ の生成
     f = AppFile.open( "#{$gen}/Makefile.templ" )
 
     print_Makefile_note f
 
-    # Makefile の変数の出力
+    # Makefile の変数の出力
     f.printf TECSMsg.get( :MVAR_comment ), "#_MVAR_#"
     f.printf "# fixed variable (unchangeable by config or plugin)\n"
 
-    # TARGET の出力 (第一引数 $target に region 名および .exe ã‚’ä»˜åŠ )
+    # TARGET の出力 (第一引数 $target に region 名および .exe を付加)
     target = $target
     if $generating_region != @@root_namespace then
-      # 子 region ã®ãƒªãƒ³ã‚¯ã‚¿ãƒ¼ã‚²ãƒƒãƒˆã®å ´åˆ
+      # 子 region のリンクターゲットの場合
       target += "-#{$generating_region.get_global_name}"
     end
@@ -419 +400 @@
 EOT
 
-    # make ルールの出力
+    # make ルールの出力
     f.printf( TECSMsg.get( :MRUL_comment), "#_MRUL_#" )
 
@@ -447 +428 @@
     f.print "-include $(GEN_DIR)/Makefile.tecsgen\n"
     if $generating_region.get_n_cells != 0 then
-      # Makefile.depend の include
+      # Makefile.depend の include
       f.print "-include $(GEN_DIR)/Makefile.depend\n\n"
 
@@ -457 +438 @@
       f.print "\nsub_regions:$(TIMESTAMP)\n"
       Region.get_link_roots.each {|region|
-        if region.get_global_name != "" then  # Root region: この Makefile 自身
+        if region.get_global_name != "" then  # Root region: この Makefile 自身
           f.print "\tcd #{region.get_global_name}; make all\n"
         end
@@ -464 +445 @@
     end
 
-    # clean: ターゲット
+    # clean: ターゲット
     f.print "clean :\n"
     if $generating_region == @@root_namespace then
       Region.get_link_roots.each {|region|
-        if region.get_global_name != "" then  # Root region: この Makefile 自身
+        if region.get_global_name != "" then  # Root region: この Makefile 自身
           f.print "\tcd #{region.get_global_name}; make clean\n"
         end
@@ -479 +460 @@
     f.print "\n"
 
-    # tecs: ターゲット
+    # tecs: ターゲット
     if $generating_region == @@root_namespace then
       f.print "tecs : $(PRE_TECSGEN_TARGET) $(TIMESTAMP) $(POST_TECSGEN_TARGET)\n\n"
@@ -508 +489 @@
 
   def gen_makefile_tecsgen
-    ### Makefile.tecsgen の生成
+    ### Makefile.tecsgen の生成
     f = AppFile.open( "#{$gen}/Makefile.tecsgen" )
 
@@ -563 +544 @@
     domain_regions = nil
     DomainType.get_domain_regions.each{ |dt, regions|
-      # domain_type は一つのノードには、一つしかないので、このループは、å¿
-ず一回しか回らない
+      # domain_type は一つのノードには、一つしかないので、このループは、必ず一回しか回らない
       domain_regions = regions
       domain_type = dt
@@ -687 +667 @@
   end
 
-  #=== すべてのセルタイプの名前を出力
-  #f::       FILE:   出力å
-ˆãƒ•ã‚¡ã‚¤ãƒ«
-  #prepend:: string: 前置文字列
-  #append::  string: 後置文字列
-  #b_plguin::  bool:   plugin により生成されたセルタイプを出力
-  ##b_inline_only::  bool:   true ならば inline の entry port のみのセルタイプを含める
-  #b_inline_only_or_proc::  bool|Proc:   true ならば inline の entry port のみ、かつインアクティブなセルタイプを含める
-  #                                      Proc ならば Proc を実行した結果 true ならば含める
-  #  namespace "::" から呼出される
+  #=== すべてのセルタイプの名前を出力
+  #f::       FILE:   出力先ファイル
+  #prepend:: string: 前置文字列
+  #append::  string: 後置文字列
+  #b_plguin::  bool:   plugin により生成されたセルタイプを出力
+  ##b_inline_only::  bool:   true ならば inline の entry port のみのセルタイプを含める
+  #b_inline_only_or_proc::  bool|Proc:   true ならば inline の entry port のみ、かつインアクティブなセルタイプを含める
+  #                                      Proc ならば Proc を実行した結果 true ならば含める
+  #  namespace "::" から呼出される
   def gen_celltype_names( f, prepend, append, b_plugin, b_inline_only_or_proc = true )
     dbgPrint "gen_celltype_names #{@name}\n"
@@ -716 +695 @@
   end
 
-  #=== すべてのセルタイプの名前を出力
+  #=== すべてのセルタイプの名前を出力
   #region:: Region:
-  # gen_celltype_names とgen_celltype_names_domain の相違：
-  #   region を domain_roots ã«å«ã‚€å ´åˆã€å‡ºåŠ›ã™ã‚‹ï¼Ž
-  #   または、region を含まないが、domain_roots ãŒè¤‡æ•°ã‹ã¤ãƒ«ãƒ¼ãƒˆãƒªãƒ¼ã‚¸ãƒ§ãƒ³ã®å ´åˆã€å‡ºåŠ›ã™ã‚‹ï¼Ž
-  # それ以外は、gen_celltype_names の説明を参ç
-§
+  # gen_celltype_names とgen_celltype_names_domain の相違：
+  #   region を domain_roots に含む場合、出力する．
+  #   または、region を含まないが、domain_roots が複数かつルートリージョンの場合、出力する．
+  # それ以外は、gen_celltype_names の説明を参照
   def gen_celltype_names_domain( f, prepend, append, domain_type, region, b_plugin, b_inline_only = true )
     dbgPrint "gen_celltype_names #{@name}\n"
@@ -752 +730 @@
     }
   end
-  #== Namespace#すべてのセルタイプの名前を出力
-  # セルタイプコードのための名前出力
-  # gen_celltype_names_domain と gen_celltype_names_domain2 の相違
-  # ・どれか一つのリージョンにしか出さない
-  #     domain_roots が1つだけで、指定リージョンを含む
-  #     domain_roots が2つ以上で、指定リージョンがルートリージョン 
-  # ãƒ»ãƒ‰ãƒ¡ã‚¤ãƒ³åã‚’ä»˜åŠ ã—ãªã„
+  #== Namespace#すべてのセルタイプの名前を出力
+  # セルタイプコードのための名前出力
+  # gen_celltype_names_domain と gen_celltype_names_domain2 の相違
+  # ・どれか一つのリージョンにしか出さない
+  #     domain_roots が1つだけで、指定リージョンを含む
+  #     domain_roots が2つ以上で、指定リージョンがルートリージョン 
+  # ・ドメイン名を付加しない
   def gen_celltype_names_domain2( f, prepend, append, domain_type, region, b_plugin, b_inline_only = true )
     dbgPrint "gen_celltype_names #{@name}\n"
@@ -885 +863 @@
   def gen_sh_func_tab f
 
-    # シグニチャディスクリプタの出力
+    # シグニチャディスクリプタの出力
     f.printf TECSMsg.get(:SD_comment), "#_SD_#"
     f.print "struct tag_#{@global_name}_VDES {\n"
@@ -891 +869 @@
     f.print "};\n\n"
 
-    # シグニチャ関数テーブルの出力
+    # シグニチャ関数テーブルの出力
     f.printf TECSMsg.get(:SFT_comment), "#_SFT_#"
     f.print( "struct tag_#{@global_name}_VMT {\n" )
@@ -906 +884 @@
         len = items.length
       else
-        # ここで nil になるのは、引数なしの時に void ãŒãªã‹ã£ãŸå ´åˆ
+        # ここで nil になるのは、引数なしの時に void がなかった場合
         items = []
         len = 0
@@ -932 +910 @@
   end
 
-  #=== Signature# 関数の ID の define を出力
+  #=== Signature# 関数の ID の define を出力
   def gen_sh_func_id f
     f.print "/* function id */\n"
@@ -951 +929 @@
   def generate
 
-    if need_generate?    # セルのないセルタイプは生成しない
+    if need_generate?    # セルのないセルタイプは生成しない
 
       generate_private_header
@@ -962 +940 @@
       generate_makefile
 
-    elsif $generate_all_template   # テンプレートコード生成オプション
+    elsif $generate_all_template   # テンプレートコード生成オプション
 
       generate_template_code
       generate_inline_template_code
 
-      # generate_makefile_template は Makefile に追記するものだから、呼び出さない
+      # generate_makefile_template は Makefile に追記するものだから、呼び出さない
 
     end
@@ -974 +952 @@
 
   def generate_post
-    return if ! need_generate?    # セルのないセルタイプは生成しない
+    return if ! need_generate?    # セルのないセルタイプは生成しない
 
     generate_private_header_post
@@ -994 +972 @@
     gen_ph_cell_cb_type f
     gen_ph_INIB_as_CB f
-    gen_ph_extern_cell f          # セルタイプグルコード以外は参ç
-§ã—ない
-    gen_ph_typedef_idx f          # mikan 参ç
-§ã™ã‚‹ã‚‚のができていない
+    gen_ph_extern_cell f          # セルタイプグルコード以外は参照しない
+    gen_ph_typedef_idx f          # mikan 参照するものができていない
     gen_ph_ep_fun_prototype f
     end_extern_C f
@@ -1005 +981 @@
 
     if @n_entry_port_inline == 0 then
-      # inline がなければ CB_TYPE_ONLY とする
-      # inline ã‚ã‚Šã®å ´åˆã€ã„ã£ãŸã‚“ define しておいて、後ですべて undef する
+      # inline がなければ CB_TYPE_ONLY とする
+      # inline ありの場合、いったん define しておいて、後ですべて undef する
       ifndef_cb_type_only f
     end
@@ -1028 +1004 @@
 #    gen_ph_cell_cb_type f
 #    gen_ph_INIB_as_CB f
-#    gen_ph_extern_cell f          # セルタイプグルコード以外は参ç
-§ã—ない
-    # gen_ph_typedef_idx f          # mikan 参ç
-§ã™ã‚‹ã‚‚のができていない
+#    gen_ph_extern_cell f          # セルタイプグルコード以外は参照しない
+    # gen_ph_typedef_idx f          # mikan 参照するものができていない
 #    gen_ph_ep_fun_prototype f
     gen_ph_ep_skel_prototype f
@@ -1037 +1011 @@
     endif_macro_only f
 
-    # 短縮形などのマクロ出力
+    # 短縮形などのマクロ出力
     if @n_entry_port_inline == 0 then
       ifndef_cb_type_only f
@@ -1047 +1021 @@
     gen_ph_test_optional_call_port_abbrev f
     gen_ph_ep_fun_macro f         if @n_entry_port > 0
-    gen_ph_foreach_cell f         # FOREACH マクロの出力
-    gen_ph_cb_initialize_macro f   # CB 初期化マクロの出力．消費しないので ram_initializer フラグに関わらず出力
+    gen_ph_foreach_cell f         # FOREACH マクロの出力
+    gen_ph_cb_initialize_macro f   # CB 初期化マクロの出力．消費しないので ram_initializer フラグに関わらず出力
     gen_ph_dealloc_code f, ""
     gen_ph_dealloc_code f, "_RESET"
@@ -1095 +1069 @@
         next if p.get_port_type != :CALL
 
-        # is_...joined は omit するケースでも出力されるため、omit を検査する前に出力
+        # is_...joined は omit するケースでも出力されるため、omit を検査する前に出力
         if p.is_optional? then
           f.print( "#undef is_#{p.get_name}_joined\n" )
@@ -1130 +1104 @@
   end
 
-  #=== CELLTYPE_tecsgen.c を生成
+  #=== CELLTYPE_tecsgen.c を生成
   def generate_cell_code
     fs = { }
@@ -1165 +1139 @@
     end
 
-    # すべての _tecsgen.c に出力
+    # すべての _tecsgen.c に出力
     print_note f
     gen_cell_private_header f
@@ -1171 +1145 @@
     gen_cell_ep_des_type f
 
-    # すべての _tecsgen.c に出力
+    # すべての _tecsgen.c に出力
     fs.each{ |r,f2|
       if f == f2 then
@@ -1182 +1156 @@
     }
 
-    # 一つの _tecsgen.c に出力
+    # 一つの _tecsgen.c に出力
     gen_cell_skel_fun f
     gen_cell_fun_table f
     gen_cell_var_init f
 
-    # セルごとに _tecsgen.c に出力
+    # セルごとに _tecsgen.c に出力
     gen_cell_ep_vdes fs
     gen_cell_ep_vdes_array fs
-    gen_cell_cb_out_init fs         # INITIALIZE_CB で参ç
-§ã•ã‚Œã‚‹ãŸã‚ ram_initializer=false でも消せない
+    gen_cell_cb_out_init fs         # INITIALIZE_CB で参照されるため ram_initializer=false でも消せない
     gen_cell_cb fs
     gen_cell_extern_mt fs
     gen_cell_ep_des fs
 
-    # 一つの _tecsgen.c に出力
+    # 一つの _tecsgen.c に出力
     gen_cell_cb_tab f
     if $ram_initializer then
@@ -1251 +1224 @@
 
   def gen_ph_include f
-    # ランタイムヘッダの include
+    # ランタイムヘッダの include
 #    f.printf TECSMsg.get( :IRTH_comment), "#_IRTH_#"
 #    f.print "#include \"tecs.#{$h_suffix}\"\n\n"
 
-    # グローバルヘッダの include
+    # グローバルヘッダの include
     f.printf TECSMsg.get( :IGH_comment ), "#_IGH_#"
     f.print "#include \"global_tecsgen.#{$h_suffix}\"\n\n"
 
-    # シグニチャヘッダの include
+    # シグニチャヘッダの include
     f.printf TECSMsg.get( :ISH_comment ), "#_ISH_#"
     @port.each { |p|
@@ -1277 +1250 @@
     end
 
-    # 最適化のため参ç
-§ã™ã‚‹ã‚»ãƒ«ã‚¿ã‚¤ãƒ—の CB 型の定義を取込む
-    # _CB_TYPE_ONLY を定義した上で include する
+    # 最適化のため参照するセルタイプの CB 型の定義を取込む
+    # _CB_TYPE_ONLY を定義した上で include する
     f.printf( TECSMsg.get( :ICT_comment ), "#_ICT_#" )
 
@@ -1292 +1264 @@
 
       if p.is_skelton_useless? || p.is_cell_unique? || p.is_VMT_useless? then
-        # 最適化コード (optimize) # スケルトン不要など
+        # 最適化コード (optimize) # スケルトン不要など
         p2 = p.get_real_callee_port
         if p2 then
@@ -1301 +1273 @@
           end
         # else
-          # optional で未結合
+          # optional で未結合
         end
       end
@@ -1313 +1285 @@
 #      next if p.get_port_type != :CALL
 #      if p.is_skelton_useless? || p.is_cell_unique? || p.is_VMT_useless? then
-#        # 最適化コード (optimize) # スケルトン不要など
+#        # 最適化コード (optimize) # スケルトン不要など
 #        p2 = p.get_real_callee_port
 #        ct = p2.get_celltype
@@ -1329 +1301 @@
     return if @singleton
 
-    # ID の基数および個数の define を出力
+    # ID の基数および個数の define を出力
     f.printf("#define %-20s %10s  /* %s #_NIDB_# */\n", "#{@global_name}_ID_BASE", "(#{@id_base})", TECSMsg.get(:NIDB_comment))
     f.printf("#define %-20s %10s  /* %s  #_NCEL_# */\n\n", "#{@global_name}_N_CELL", "(#{@n_cell_gen})", TECSMsg.get(:NCEL_comment))
@@ -1337 +1309 @@
     return if @singleton
 
-    # mikan  最適化
-    # IDX 正当性チェックマクロの出力
+    # mikan  最適化
+    # IDX 正当性チェックマクロの出力
     f.printf( TECSMsg.get( :CVI_comment ), "#_CVI_#" )
     if @idx_is_id_act then
@@ -1351 +1323 @@
     return if @singleton
 
-    # IDX 正当性チェックマクロ（短縮形）の出力
+    # IDX 正当性チェックマクロ（短縮形）の出力
     f.printf( TECSMsg.get( :CVIA_comment ), "#_CVIA_#")
     f.print("#define VALID_IDX(IDX)  #{@global_name}_VALID_IDX(IDX)\n\n")
@@ -1357 +1329 @@
   end
 
-  #=== 呼び口é
-åˆ—の大きさを得るマクロの出力
+  #=== 呼び口配列の大きさを得るマクロの出力
   #
-  #セルタイプヘッダへ呼び口の個数を出力
+  #セルタイプヘッダへ呼び口の個数を出力
   def gen_ph_n_cp f
 
@@ -1374 +1345 @@
       end
 
-      if p.get_array_size != "[]" then       # 固定長é
-åˆ—
+      if p.get_array_size != "[]" then       # 固定長配列
         f.print( "#define N_CP_#{p.get_name}    (#{p.get_array_size})\n" )
         f.print( "#define NCP_#{p.get_name}     (#{p.get_array_size})\n" )
-      else                                   # 可変長é
-åˆ—
+      else                                   # 可変長配列
         if @singleton then
           if has_INIB? then
@@ -1388 +1357 @@
           f.print( "#define N_CP_#{p.get_name}  (#{@global_name}_SINGLE_CELL_#{inib}.n_#{p.get_name})\n" )
           f.print( "#define NCP_#{p.get_name}   (#{@global_name}_SINGLE_CELL_#{inib}.n_#{p.get_name})\n" )
-          # mikan singleton ならば、固定長化できる
+          # mikan singleton ならば、固定長化できる
         else
           if has_CB? && has_INIB? then
@@ -1402 +1371 @@
   end
 
-  #=== 受け口é
-åˆ—の大きさを得るマクロの出力
+  #=== 受け口配列の大きさを得るマクロの出力
   #
-  #セルタイプヘッダへ受け口の個数を出力
+  #セルタイプヘッダへ受け口の個数を出力
   def gen_ph_n_ep f
 
@@ -1411 +1379 @@
     @port.each { |p|
       next if p.get_port_type != :ENTRY
-      # next if p.is_omit?                       # 受け口é
-åˆ—の個数は省略しない
+      # next if p.is_omit?                       # 受け口配列の個数は省略しない
       next if p.get_array_size == nil
 
@@ -1420 +1387 @@
       end
 
-      if p.get_array_size != "[]" then       # 固定長é
-åˆ—
+      if p.get_array_size != "[]" then       # 固定長配列
         f.print( "#define NEP_#{p.get_name}     (#{p.get_array_size})\n" )
-      else                                   # 可変長é
-åˆ—
+      else                                   # 可変長配列
         if @singleton then
           if has_INIB? then
@@ -1432 +1397 @@
           end
           f.print( "#define NEP_#{p.get_name}   (#{@global_name}_SINGLE_CELL_#{inib}.n_#{p.get_name})\n" )
-          # mikan singleton ならば、固定長化できる
+          # mikan singleton ならば、固定長化できる
         else
           if has_CB? && has_INIB? then
@@ -1445 +1410 @@
   end
 
-  #=== optional な呼び口が結合されているかテストするコードの生成
+  #=== optional な呼び口が結合されているかテストするコードの生成
   def gen_ph_test_optional_call_port f
     b_comment = false
@@ -1466 +1431 @@
       next if p.get_port_type != :CALL
       next if ! p.is_optional?
-      # next if p.is_omit?  # omit でも test コードは生成する
+      # next if p.is_omit?  # omit でも test コードは生成する
 
       if b_comment == false then
@@ -1484 +1449 @@
       end
 
-      # 関数名の出力(標準：受け口ディスクリプタから VMT の関数名、最適化：受け口関数 or 受け口ディスクリプタ)
-      # mikan  å
-¨éƒ¨ã¤ãªãŒã£ã¦ã„るかどうかで (1) を判定する
+      # 関数名の出力(標準：受け口ディスクリプタから VMT の関数名、最適化：受け口関数 or 受け口ディスクリプタ)
+      # mikan  全部つながっているかどうかで (1) を判定する
       if ! p.is_VMT_useless? then
-        # 標準コード
+        # 標準コード
         if p.get_array_size == nil then
           if @singleton then
@@ -1496 +1460 @@
           end
         else
-          # é
-åˆ—ã®å ´åˆ
+          # 配列の場合
           if @singleton then
             f.print( "\t  ((#{@global_name}_SINGLE_CELL_#{inib}.#{p.get_name}!=0) \\\n" )
@@ -1507 +1470 @@
         end
       else
-        # 最適化コード (optimize) # VMT 不要（é
-åˆ—è¦ç´ すべて同じ）
+        # 最適化コード (optimize) # VMT 不要（配列要素すべて同じ）
         p2 = p.get_real_callee_port
         if p2 then
           ct = p2.get_celltype
           if p.is_skelton_useless? then
-            # 受け口関数を直接呼出す
+            # 受け口関数を直接呼出す
             f.print( "\t  (1)\n" )
           else
-            # 受け口スケルトン関数を直接呼出す
+            # 受け口スケルトン関数を直接呼出す
             f.print( "\t  (1)\n" )
           end
         else
-          # optional で未結合
+          # optional で未結合
           f.print( "\t  (0)    /* not joined */\n" )
         end
@@ -1527 +1489 @@
   end
 
-  #=== optional な呼び口が結合されているかテストするコードの生成（短縮形）
+  #=== optional な呼び口が結合されているかテストするコードの生成（短縮形）
   def gen_ph_test_optional_call_port_abbrev f
     b_comment = false
@@ -1534 +1496 @@
       next if p.get_port_type != :CALL
       next if ! p.is_optional?
-      # next if p.is_omit?  # omit でも test コードは生成する
+      # next if p.is_omit?  # omit でも test コードは生成する
 
       if b_comment == false then
@@ -1550 +1512 @@
   end
 
-  #=== CELLCB へのポインタを得るマクロを出力
-  #   セルタイプヘッダへ出力
+  #=== CELLCB へのポインタを得るマクロを出力
+  #   セルタイプヘッダへ出力
   def gen_ph_get_cellcb f
     f.printf( TECSMsg.get( :GCB_comment ), "#_GCB_#" )
     if ( ! has_CB? && ! has_INIB? ) || @singleton then
       f.print( "#define #{@global_name}_GET_CELLCB(idx) ((void *)0)\n" )
-    elsif @idx_is_id_act then   # mikan å˜ä¸€ã®ã‚»ãƒ«ã®å ´åˆã®æœ€é©åŒ–, idx_is_id ã§ãªã„å ´åˆ
+    elsif @idx_is_id_act then   # mikan 単一のセルの場合の最適化, idx_is_id でない場合
       f.print( "#define #{@global_name}_GET_CELLCB(idx) (#{@global_name}_CB_tab[(idx) - #{@global_name}_ID_BASE])\n" )
     else
@@ -1563 +1525 @@
   end
 
-  #=== CELLCB へのポインタを得るマクロ（短縮形）を出力
-  #  セルタイプヘッダへ出力
+  #=== CELLCB へのポインタを得るマクロ（短縮形）を出力
+  #  セルタイプヘッダへ出力
   def gen_ph_get_cellcb_abbrev f
     f.printf( TECSMsg.get( :GCBA_comment ), "#_GCBA_#" )
@@ -1580 +1542 @@
   end
 
-  #===  attribute, var をアクセスするマクロを出力
-  #    セルタイプヘッダへ出力
+  #===  attribute, var をアクセスするマクロを出力
+  #    セルタイプヘッダへ出力
   def gen_ph_attr_access f
     if @n_attribute_rw > 0 || @n_attribute_ro > 0 then
@@ -1591 +1553 @@
       next if a.is_omit?
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       if @singleton then
@@ -1601 +1563 @@
         f.printf( "%-20s", "#{@global_name}_ATTR_#{a.get_name}" )
         f.print( "\t(#{@global_name}_SINGLE_CELL_#{inib}.#{a.get_name})\n" )
-        # mikan ここでは cell ではなく celltype の名前
+        # mikan ここでは cell ではなく celltype の名前
       else
         if ! a.is_rw? && has_CB? && has_INIB? then
@@ -1632 +1594 @@
       end
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       if @singleton then
         f.printf( "%-20s", "#{@global_name}_GET_#{a.get_name}()" )
         f.print( "\t(#{@global_name}_SINGLE_CELL_#{inib}.#{a.get_name})\n" )
-        # mikan ここでは cell ではなく celltype の名前
+        # mikan ここでは cell ではなく celltype の名前
       else
         f.printf( "%-20s", "#{@global_name}_GET_#{a.get_name}(p_that)" )
@@ -1648 +1610 @@
           f.printf( "%-20s", "#{@global_name}_SET_#{a.get_name}(val)" )
           f.print( "\t(#{@global_name}_SINGLE_CELL_#{inib}.#{a.get_name} = (val))\n" )
-          # mikan ここでは cell ではなく celltype の名前
+          # mikan ここでは cell ではなく celltype の名前
         else
           f.printf( "%-20s", "#{@global_name}_SET_#{a.get_name}(p_that,val)" )
@@ -1680 +1642 @@
       end
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       if @singleton then
         f.printf( "%-20s", "#{@global_name}_VAR_#{v.get_name}" )
         f.print( "\t(#{@global_name}_SINGLE_CELL_#{inib}.#{v.get_name})\n" )
-        # mikan ここでは cell ではなく celltype の名前
+        # mikan ここでは cell ではなく celltype の名前
       else
         f.printf( "%-20s", "#{@global_name}_VAR_#{v.get_name}(p_that)" )
@@ -1696 +1658 @@
       next if v.is_omit?
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       if @singleton then
         f.printf( "%-20s", "#{@global_name}_GET_#{v.get_name}()" )
         f.print( "\t(#{@global_name}_SINGLE_CELL_CB.#{v.get_name})\n" )
-        # mikan ここでは cell ではなく celltype の名前
+        # mikan ここでは cell ではなく celltype の名前
       else
         f.printf( "%-20s", "#{@global_name}_GET_#{v.get_name}(p_that)" )
@@ -1711 +1673 @@
         f.printf( "%-20s", "#{@global_name}_SET_#{v.get_name}(val)" )
         f.print( "\t(#{@global_name}_SINGLE_CELL_CB.#{v.get_name}=(val))\n" )
-        # mikan ここでは cell ではなく celltype の名前
+        # mikan ここでは cell ではなく celltype の名前
       else
         f.printf( "%-20s", "#{@global_name}_SET_#{v.get_name}(p_that,val)" )
@@ -1721 +1683 @@
   end
 
-  #===  attribute/var アクセスマクロ（短縮形）コードの生成
+  #===  attribute/var アクセスマクロ（短縮形）コードの生成
   def gen_ph_attr_access_abbrev f
     if @n_attribute_rw > 0 || @n_attribute_ro > 0 then
@@ -1730 +1692 @@
       next if a.is_omit?
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       f.printf( "%-20s", "ATTR_#{a.get_name}" )
@@ -1748 +1710 @@
       next if v.is_omit?
 
-      # mikan const_value ã®å ´åˆ
+      # mikan const_value の場合
       f.print( "#define " )
       f.printf( "%-20s", "VAR_#{v.get_name}" )
@@ -1809 +1771 @@
         delim = ""
 
-        # 関数名の出力(標準：受け口ディスクリプタから VMT の関数名、最適化：受け口関数 or 受け口ディスクリプタ)
+        # 関数名の出力(標準：受け口ディスクリプタから VMT の関数名、最適化：受け口関数 or 受け口ディスクリプタ)
         if ! p.is_VMT_useless? then
-          # 標準コード
+          # 標準コード
           if @singleton then
             f.print( "\t  #{@global_name}_SINGLE_CELL_#{inib}.#{p.get_name}" )
@@ -1819 +1781 @@
           f.print( "#{subsc}->VMT->#{fun.get_name}__T( \\\n" )
         else
-          # 最適化コード (optimize) # VMT 不要
+          # 最適化コード (optimize) # VMT 不要
           p2 = p.get_real_callee_port
           if p2 then
             ct = p2.get_celltype
             if p.is_skelton_useless? then
-              # 受け口関数を直接呼出す
+              # 受け口関数を直接呼出す
               f.print( "\t  #{ct.get_global_name}_#{p2.get_name}_#{fun.get_name}( \\\n" )
             else
-              # 受け口スケルトン関数を直接呼出す
+              # 受け口スケルトン関数を直接呼出す
               f.print( "\t  #{ct.get_global_name}_#{p2.get_name}_#{fun.get_name}_skel( \\\n" )
               # print "skelton: #{@name} #{ct.get_global_name}_#{p2.get_name}\n"
             end
           else
-            # optional で未結合
+            # optional で未結合
             f.print( "\t  ((#{fun.get_declarator.get_type.get_type.get_type_str} (*)()" )
             f.print( "#{fun.get_declarator.get_type.get_type.get_type_str_post})0)()\n" )
@@ -1842 +1804 @@
         end
 
-        b_join = true    # optional ã§çµåˆã—ã¦ã„ãªã„å ´åˆ false
-
-        # 受け口æƒ
-å ±ã®å‡ºåŠ›(標準：受け口ディスクリプタ、最適化：IDX など)
+        b_join = true    # optional で結合していない場合 false
+
+        # 受け口情報の出力(標準：受け口ディスクリプタ、最適化：IDX など)
         if ! p.is_skelton_useless? && ! p.is_cell_unique? then
-          # 標準コード
+          # 標準コード
           if @singleton then
             f.print( "\t  #{@global_name}_SINGLE_CELL_#{inib}.#{p.get_name}#{subsc}" )
@@ -1856 +1817 @@
           end
         else
-          # 最適化コード (optimize) # スケルトン不要
-          c2 = p.get_real_callee_cell               # 唯一のセル(ã§ãªã„å ´åˆã‚‚ã‚ã‚‹ã€è¤‡æ•°ã‚»ãƒ«ãŒã‚ã‚‹å ´åˆ)
-          p2 = p.get_real_callee_port               # 唯一のポート(ã§ãªã„å ´åˆã¯ã€ãªã„)
+          # 最適化コード (optimize) # スケルトン不要
+          c2 = p.get_real_callee_cell               # 唯一のセル(でない場合もある、複数セルがある場合)
+          p2 = p.get_real_callee_port               # 唯一のポート(でない場合は、ない)
           if p2 then
-            ct = p2.get_celltype                    # 呼びå
-ˆã®ã‚»ãƒ«ã‚¿ã‚¤ãƒ—
+            ct = p2.get_celltype                    # 呼び先のセルタイプ
             if ! ct.is_singleton? then
               if ct.has_CB? || ct.has_INIB? then
@@ -1868 +1828 @@
                   f.print( "\t   #{name_array[7]}" )
                 else
-                  # CELLCB IDX を渡す (標準コードと同じだが、扱う型は異なる)
-                  # p.is_skelton_useless? == true/false ともに同じ
+                  # CELLCB IDX を渡す (標準コードと同じだが、扱う型は異なる)
+                  # p.is_skelton_useless? == true/false ともに同じ
                   f.print( "\t   (p_that)#{inib}->#{p.get_name}#{subsc}" )
                 end
@@ -1880 +1840 @@
             end
           else
-            # optional で未結合
+            # optional で未結合
             b_join = false
           end
@@ -1897 +1857 @@
   end
 
-  #=== send/receive ã§å—ã‘å–ã£ãŸãƒ¡ãƒ¢ãƒªé ˜åŸŸã‚’ dealloc するマクロコード
+  #=== send/receive で受け取ったメモリ領域を dealloc するマクロコード
   #f:: File
-  #b_undef:: bool : true = #undef コードの生成,  false = #define コードの生成
+  #b_undef:: bool : true = #undef コードの生成,  false = #define コードの生成
   def  gen_ph_dealloc_code( f, append_name, b_undef = false )
     b_msg = false
@@ -1906 +1866 @@
 
       p.each_param{ |port, fd, par|
-        case par.get_direction                        # 引数の方向指定子 (in, out, inout, send, receive )
+        case par.get_direction                        # 引数の方向指定子 (in, out, inout, send, receive )
         when :SEND
           # next if port.get_port_type == :CALL
@@ -1923 +1883 @@
         end
 
-        #                      ポート名         関数名         パラメータ名
+        #                      ポート名         関数名         パラメータ名
         dealloc_func_name = "#{port.get_name}_#{fd.get_name}_#{par.get_name}_dealloc"
         dealloc_macro_name = dealloc_func_name.upcase
@@ -1962 +1922 @@
     @port.each { |p|
       next if p.get_port_type != :CALL
-      # next if p.is_omit?  呼び出すとエラーを起こすコードを生成
+      # next if p.is_omit?  呼び出すとエラーを起こすコードを生成
 
       p.get_signature.get_function_head_array.each{ |fun|
@@ -2067 +2027 @@
         f.print( "struct tag_#{@global_name}_CB *" )
       elsif has_INIB? then
-        # f.print( "struct tag_#{@global_name}_INIB *" )  # const を出力していない
+        # f.print( "struct tag_#{@global_name}_INIB *" )  # const を出力していない
         f.print( "const struct tag_#{@global_name}_INIB *" )
       else
@@ -2103 +2063 @@
 
         if p.get_array_size then
-          f.print( "#{delim} int_t subscript" )     # mikan singleton 時の ',' の始末
+          f.print( "#{delim} int_t subscript" )     # mikan singleton 時の ',' の始末
           delim = ","
         end
@@ -2111 +2071 @@
           len = items.length
         else
-          # ここで nil になるのは、引数なしの時に void ãŒãªã‹ã£ãŸå ´åˆ
+          # ここで nil になるのは、引数なしの時に void がなかった場合
           items = []
           len = 0
@@ -2132 +2092 @@
 
   def gen_ph_ep_skel_prototype f
-    # 受け口スケルトン関数のプロトタイプ宣言を出力
+    # 受け口スケルトン関数のプロトタイプ宣言を出力
     if @n_entry_port >0 then
       f.printf( TECSMsg.get( :EPSP_comment ), "#_EPSP_#" )
@@ -2139 +2099 @@
       next if p.get_port_type != :ENTRY
       next if p.is_omit?
-#      if p.is_skelton_useless? || ! p.is_VMT_useless? then    # 受け口最適化
-      if p.is_skelton_useless? then    # 受け口最適化
+#      if p.is_skelton_useless? || ! p.is_VMT_useless? then    # 受け口最適化
+      if p.is_skelton_useless? then    # 受け口最適化
 #        f.print( "/* #{p.get_name} : omitted by entry port optimize */\n" )
         next
@@ -2159 +2119 @@
           len = items.length
         else
-          # ここで nil になるのは、引数なしの時に void ãŒãªã‹ã£ãŸå ´åˆ
+          # ここで nil になるのは、引数なしの時に void がなかった場合
           items = []
           len = 0
@@ -2182 +2142 @@
 
     if ( $rom )then
-      # 定数部は ROM, 変数部は RAM
+      # 定数部は ROM, 変数部は RAM
 
       if has_INIB? then
@@ -2215 +2175 @@
 
     else
-      # å
-¨ã¦ RAM
+      # 全て RAM
       f.printf( TECSMsg.get( :CCTPO_comment ), "#_CCTPO_#" )
 
@@ -2230 +2189 @@
 
 
-  #===   attribute の型宣言出力
-  #inib_cb::  :INIB または :CB
+  #===   attribute の型宣言出力
+  #inib_cb::  :INIB または :CB
   def gen_cell_cb_type_attribute( f, inib_cb )
     if inib_cb == :INIB && @n_attribute_ro > 0 then
@@ -2264 +2223 @@
       next if v.is_omit?
       next if v.get_size_is == nil
-      next if $rom && inib_cb == :CB      # size_is 指定されたものは INIB にのみ出力する
+      next if $rom && inib_cb == :CB      # size_is 指定されたものは INIB にのみ出力する
 
       f.print "    "
@@ -2273 +2232 @@
 
   def gen_cell_cb_type_var f
-    # 変数の出力
+    # 変数の出力
     if @n_var > 0 then
       f.print "    /* var #_VA_# */ \n"
@@ -2281 +2240 @@
 
       next if v.is_omit?
-      next if v.get_size_is != nil    # size_is 指定された var は attribute へ出力する
+      next if v.get_size_is != nil    # size_is 指定された var は attribute へ出力する
 
       f.print "    "
@@ -2295 +2254 @@
 
   def gen_cell_cb_type_call_port f
-    # 呼び口
+    # 呼び口
     if @n_call_port >0 then
       f.print "    /* call port #_TCP_# */ \n"
@@ -2308 +2267 @@
       if ! p.is_cell_unique? then
         if ! p.is_skelton_useless? then
-          # 標準形
+          # 標準形
           f.print( "    struct tag_#{p.get_signature.get_global_name}_VDES #{ptr}const*#{p.get_name;};\n" )
           if p.get_array_size == "[]" then
@@ -2314 +2273 @@
           end
         else
-          # 最適化 skelton 関数を呼出さない(受け口関数を直接呼出す)
-          # 呼びå
-ˆã‚»ãƒ«ã‚¿ã‚¤ãƒ—の CB の IDX 型
+          # 最適化 skelton 関数を呼出さない(受け口関数を直接呼出す)
+          # 呼び先セルタイプの CB の IDX 型
           if p.get_real_callee_cell then
             f.print( "    " )
             p.get_real_callee_cell.get_celltype.gen_ph_idx_type f
             f.print( " #{ptr}#{p.get_name;};\n" )
-            # 相互参ç
-§ã«å‚™ãˆã¦ã€typedef した型を使わない
+            # 相互参照に備えて、typedef した型を使わない
             # f.print( "    #{p.get_real_callee_cell.get_celltype.get_global_name}_IDX #{ptr}#{p.get_name;};\n" )
             if p.get_array_size == "[]" then
@@ -2328 +2285 @@
             end
           #else
-          #  optional で未結合
+          #  optional で未結合
           end
         end
       # else
-        # 最適化 ä¸€ã¤ã—ã‹ã‚»ãƒ«ãŒãªã„å ´åˆã€å—ã‘å£ãƒ‡ã‚£ã‚¹ã‚¯ãƒªãƒ—ã‚¿ã¾ãŸã¯å—ã‘å´ã® IDX は呼び口関数マクロに埋め込まれる
-      end
-    }
-  end
-
-  #=== Celltype#受け口é
-åˆ—添数を記憶する変数の定義
+        # 最適化 一つしかセルがない場合、受け口ディスクリプタまたは受け側の IDX は呼び口関数マクロに埋め込まれる
+      end
+    }
+  end
+
+  #=== Celltype#受け口配列添数を記憶する変数の定義
   def gen_cell_cb_type_entry_port f
-    # 呼び口
+    # 呼び口
     if @n_entry_port >0 then
       f.print "    /* call port #_NEP_# */ \n"
@@ -2346 +2302 @@
 
     @port.each{ |p|
-      # next if p.is_omit?                       # 受け口é
-åˆ—の個数は省略しない
+      # next if p.is_omit?                       # 受け口配列の個数は省略しない
       if p.get_port_type == :ENTRY && p.get_array_size == "[]"
         f.print( "    int_t n_#{p.get_name};\n" )
@@ -2389 +2344 @@
   end
 
-  #===  イテレータコード (FOREACH_CELL)の生成
-  #      singleton では出力しない
+  #===  イテレータコード (FOREACH_CELL)の生成
+  #      singleton では出力しない
   def gen_ph_foreach_cell f
 
@@ -2431 +2386 @@
 
 
-  #===  変数var初期化コード
+  #===  変数var初期化コード
   #
   def gen_ph_cb_initialize_macro f
@@ -2442 +2397 @@
         type = v.get_type
         if( type.kind_of? PtrType )then
-          # PtrType は ArrayType にすり替える
-
-          # åˆæœŸåŒ–å­ã®è¦ç´ æ•°ã¨ã™ã‚‹ (後は 0 である)
+          # PtrType は ArrayType にすり替える
+
+          # 初期化子の要素数とする (後は 0 である)
           t2 = ArrayType.new( Expression.create_integer_constant( init.length, nil ) )
           t2.set_type( type.get_type )
@@ -2512 +2467 @@
 
     # else
-    #   セルが一つもなければ出力しない
+    #   セルが一つもなければ出力しない
     end
 
@@ -2519 +2474 @@
 
   def gen_ph_inline f
-    # inline ポートが一つでもあれば、inline.h の include
+    # inline ポートが一つでもあれば、inline.h の include
     if @n_entry_port_inline > 0 then
       f.printf( TECSMsg.get( :INL_comment ), "#_INL_#" )
@@ -2571 +2526 @@
       next if p.get_port_type != :ENTRY
       next if p.is_omit?
-      if p.is_skelton_useless?    # 受け口最適化
+      if p.is_skelton_useless?    # 受け口最適化
         f.print( "/* #{p.get_name} : omitted by entry port optimize */\n\n" )
         next
@@ -2582 +2537 @@
         f.print( "    #{@name}_IDX  idx;\n" )
       else
-        # CB も INIB も存在しない (ので、idx として整数で初期化しておく)
+        # CB も INIB も存在しない (ので、idx として整数で初期化しておく)
         f.print( "    int           idx;\n" )
       end
@@ -2600 +2555 @@
       next if p.get_port_type != :ENTRY
       next if p.is_omit?
-      if p.is_skelton_useless? then    # 受け口最適化
+      if p.is_skelton_useless? then    # 受け口最適化
         f.print( "/* #{p.get_name} : omitted by entry port optimize */\n" )
         next
@@ -2619 +2574 @@
           len = items.length
         else
-          # ここで nil になるのは、引数なしの時に void ãŒãªã‹ã£ãŸå ´åˆ
+          # ここで nil になるのは、引数なしの時に void がなかった場合
           items = []
           len = 0
@@ -2641 +2596 @@
         end
 
-        if functype.get_type_str == "void" then # mikan "void" の typedef に未対応
+        if functype.get_type_str == "void" then # mikan "void" の typedef に未対応
           f.print "    "
         else
@@ -2684 +2639 @@
       next if p.get_port_type != :ENTRY
       next if p.is_omit?
-      if p.is_VMT_useless? then    # 受け口最適化
+      if p.is_VMT_useless? then    # 受け口最適化
         f.print "/* #{p.get_name} : omitted by entry port optimize */\n"
         next
@@ -2710 +2665 @@
     end
 
-    # このセルタイプのすべてのセルについて
+    # このセルタイプのすべてのセルについて
     @ordered_cell_list.each{ |c|
-      if c.is_generate? then                           # 生成対象か？
+      if c.is_generate? then                           # 生成対象か？
 
         f = fs[ c.get_region.get_domain_root ]
 
-        # 結合のリスト (NamedList)
+        # 結合のリスト (NamedList)
         jl = c.get_join_list
 
-        # å
-¨ã¦ã®çµåˆãƒªã‚¹ãƒˆã«ã¤ã„て
+        # 全ての結合リストについて
         jl.get_items.each{ |j|
 
-          # 左辺の定義を得る
+          # 左辺の定義を得る
           definition = j.get_definition
 
-          # 呼び口ではない？　（属性）
+          # 呼び口ではない？　（属性）
           next unless definition.instance_of? Port
 
-          port = find j.get_name # celltype の Port (こちらに最適化æƒ
-å ±ãŒã‚ã‚‹)
-          # port = definition    # definition は composite の Port が得られることがある
+          port = find j.get_name # celltype の Port (こちらに最適化情報がある)
+          # port = definition    # definition は composite の Port が得られることがある
           next if port.is_cell_unique?
           next if port.is_omit?
 
-          # é
-åˆ—è¦ç´ を得る（受け口é
-åˆ—でなければ nil が返る）
+          # 配列要素を得る（受け口配列でなければ nil が返る）
           am = j.get_array_member2
 
-          # 呼び口é
-åˆ—か?
+          # 呼び口配列か?
           if am  then
             i = 0
@@ -2748 +2698 @@
               if j then
                 if am[i].get_cell.get_celltype == self then
-                  # åŒã˜ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã¸çµåˆã—ã¦ã„ã‚‹å ´åˆ(VDES では type conflict になる)
+                  # 同じセルタイプへ結合している場合(VDES では type conflict になる)
                   p = am[i].get_rhs_port
                   des_type = "const struct tag_#{@global_name}_#{p.get_name}_DES"
@@ -2755 +2705 @@
                 end
 
-                # 右辺は受け口é
-åˆ—か？
+                # 右辺は受け口配列か？
                 if j.get_rhs_subscript then
 
-                  # 受け口のé
-åˆ—添数
+                  # 受け口の配列添数
                   subscript = j.get_rhs_subscript
 
@@ -2773 +2721 @@
                 end
               #else if j == nil
-              #  optioanl でé
-åˆ—è¦ç´ が初期化されていない
+              #  optioanl で配列要素が初期化されていない
               end
               i += 1
@@ -2780 +2727 @@
           else
             if j.get_cell.get_celltype == self then
-              # åŒã˜ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã¸çµåˆã—ã¦ã„ã‚‹å ´åˆ(VDES では type conflict になる)
+              # 同じセルタイプへ結合している場合(VDES では type conflict になる)
               p = j.get_rhs_port
               des_type = "const struct tag_#{@global_name}_#{p.get_name}_DES"
@@ -2788 +2735 @@
 
             if j.get_rhs_subscript then
-              # 受け口é
-åˆ—
+              # 受け口配列
               subscript = j.get_rhs_subscript
               f.printf( "extern %s %s%d;\n",
@@ -2801 +2747 @@
             end
           end
-          # mikan   cell の namespace 未対応、Join で Cell オブジェクトを引当ておくå¿
-要あり
+          # mikan   cell の namespace 未対応、Join で Cell オブジェクトを引当ておく必要あり
         }
 
@@ -2812 +2757 @@
   def gen_cell_ep_vdes_array fs
     if @n_cell_gen >0 then
-      fs.each{ |r, f| f.printf( TECSMsg.get( :CPA_comment ), "#_CPA_#" ) }  # mikan 呼び口é
-åˆ—ãŒç„¡ã„å ´åˆã‚‚å‡ºã¦ã—ã¾ã†
+      fs.each{ |r, f| f.printf( TECSMsg.get( :CPA_comment ), "#_CPA_#" ) }  # mikan 呼び口配列が無い場合も出てしまう
     end
 
@@ -2824 +2768 @@
           definition = j.get_definition
           next unless definition.instance_of? Port
-          # port = definition    # definition は composite の Port が得られることがある
-          port = find j.get_name # celltype の Port (こちらに最適化æƒ
-å ±ãŒã‚ã‚‹)
+          # port = definition    # definition は composite の Port が得られることがある
+          port = find j.get_name # celltype の Port (こちらに最適化情報がある)
           next if port.is_cell_unique?
           next if port.is_omit?
@@ -2832 +2775 @@
           am = j.get_array_member2
           if am  then
-            # 左辺はé
-åˆ—
+            # 左辺は配列
 
             if ! port.is_skelton_useless? then
@@ -2842 +2784 @@
             else
 
-#              ã‚¹ã‚±ãƒ«ãƒˆãƒ³é–¢æ•°ä¸è¦æœ€é©åŒ–ã®å ´åˆã€ã“ã®é
-åˆ—は参ç
-§ã•ã‚Œãªã„
-              # mikan このケースがテストされていない
+#              スケルトン関数不要最適化の場合、この配列は参照されない
+              # mikan このケースがテストされていない
               f.printf( "const %s_IDX  %s_%s[] = {\n",
-#                        "#{j.get_celltype.get_global_name}",   # 右辺 composite に対応できない
+#                        "#{j.get_celltype.get_global_name}",   # 右辺 composite に対応できない
                         "#{j.get_rhs_cell.get_celltype.get_global_name}",
                         "#{c.get_global_name}",
@@ -2864 +2804 @@
 
               if j then
-                # åŒä¸€ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®çµåˆã®å ´åˆã€VDES 型へのキャストがå¿
-要
+                # 同一セルタイプの結合の場合、VDES 型へのキャストが必要
                 if j.get_rhs_cell.get_celltype == self then
                   definition = j.get_definition
@@ -2875 +2814 @@
                 
                 if j.get_rhs_subscript then
-                  # 右辺é
-åˆ—ã®å ´åˆ(最適化はない)
+                  # 右辺配列の場合(最適化はない)
                   subscript = j.get_rhs_subscript
                   f.printf( "    %s%d,\n",
@@ -2885 +2823 @@
 
                 else
-                  # 右辺非é
-åˆ—ã®å ´åˆ */
+                  # 右辺非配列の場合 */
                   if ! port.is_skelton_useless? then
                     f.printf( "    %s,\n",
@@ -2897 +2834 @@
                 end
               else
-                # optional で呼び口é
-åˆ—è¦ç´ が初期化されていない
+                # optional で呼び口配列要素が初期化されていない
                 f.printf( "    0,\n" )
               end
             # }
             end
-            # mikan   cell の namespace 未対応、Join で Cell オブジェクトを引当ておくå¿
-要あり
+            # mikan   cell の namespace 未対応、Join で Cell オブジェクトを引当ておく必要あり
             f.print "};\n"
           end
@@ -2914 +2849 @@
   end
 
-  #=== CB を初期化するプログラムの生成
+  #=== CB を初期化するプログラムの生成
   def gen_cell_cb_initialize_code f
     if ! need_CB_initializer?
@@ -2946 +2881 @@
   end
 
-  # === CB/INIB の外で初期化される変数の出力
+  # === CB/INIB の外で初期化される変数の出力
   def gen_cell_cb_out_init fs
 
-    # セルがなければ、出力しない
+    # セルがなければ、出力しない
     if @n_cell_gen == 0 then
       return
@@ -2956 +2891 @@
     fs.each{ |r, f| f.printf( TECSMsg.get( :AVAI_comment ), "#_AVAI_#" ) }
 
-    # attribute, var のポインタ型の参ç
-§ã™ã‚‹é
-åˆ—を生成
+    # attribute, var のポインタ型の参照する配列を生成
     @ordered_cell_list.each{ |c|
       next if  ! c.is_generate?
@@ -2968 +2901 @@
       jl = c.get_join_list
 
-      # attribute, var のポインタ変数がé
-åˆ—ã«ã‚ˆã‚ŠåˆæœŸåŒ–ã•ã‚Œã‚‹å ´åˆã®ã€é
-åˆ—を出力
+      # attribute, var のポインタ変数が配列により初期化される場合の、配列を出力
       av_list = ct.get_attribute_list + ct.get_var_list
       if av_list.length != 0 then
@@ -2986 +2917 @@
 
             if size then
-              # 式を評価する(attribute, var に含まれる変数を参ç
-§å¯èƒ½)
+              # 式を評価する(attribute, var に含まれる変数を参照可能)
               sz = size.eval_const( c.get_join_list, c.get_celltype.get_name_list )
-              # 式を生成しなおす (変数を含まない形にする)  不完å
-¨ãªå½¢ã§ Token を生成 (エラー発生しないから)
+              # 式を生成しなおす (変数を含まない形にする)  不完全な形で Token を生成 (エラー発生しないから)
               size = Expression.new( [:INTEGER_CONSTANT, Token.new(sz, nil, 0, 0)] )
               array_type = ArrayType.new( size )
@@ -3004 +2933 @@
                                                                 # name_array[3]: cell_CB_INIT
               if !( $ram_initializer && a.get_kind == :VAR ) then
-                # -R (ram initializer 使用) ã®å ´åˆ var は初期化コードを出力しない
+                # -R (ram initializer 使用) の場合 var は初期化コードを出力しない
                 if( init )then
                   str = " = #{gen_cell_cb_init( f, c, name_array, array_type, init, a.get_identifier, 1, true )}"
@@ -3022 +2951 @@
   end
 
-  #=== var の初期値の ROM 部への
+  #=== var の初期値の ROM 部への
   def gen_cell_var_init f
-    # var の{ }で囲まれた初期値指定があるか調べる
+    # var の{ }で囲まれた初期値指定があるか調べる
     n_init = 0
     @var.each { |v|
@@ -3041 +2970 @@
 
           if( type.kind_of? PtrType )then
-            # PtrType は ArrayType にすり替える
-
-            # åˆæœŸåŒ–å­ã®è¦ç´ æ•°ã ã‘ã¨ã™ã‚‹ï¼ˆå¾Œã¯ 0)
+            # PtrType は ArrayType にすり替える
+
+            # 初期化子の要素数だけとする（後は 0)
             t2 = ArrayType.new( Expression.create_integer_constant( init.length, nil ) )
             t2.set_type( type.get_type )
@@ -3049 +2978 @@
           end
 
-          c = @ordered_cell_list[0]   # 仮の cell (実際には使われない)
+          c = @ordered_cell_list[0]   # 仮の cell (実際には使われない)
           name_array = get_name_array( c )
           # f.print "const #{type0.get_type_str}\t#{@global_name}_#{v.get_name}_VAR_INIT#{type0.get_type_str_post} = "
           f.print "const #{type.get_type_str}\t#{@global_name}_#{v.get_name}_VAR_INIT#{type.get_type_str_post} = "
           if type.kind_of? StructType then
-            # celltype の default の初期値あり
+            # celltype の default の初期値あり
             str = gen_cell_cb_init( f, c, name_array, type, init, v.get_identifier, 1, true )
           elsif( type.kind_of?( PtrType ) || type.kind_of?( ArrayType ) ) then
             str = "{ "
             type = type.get_type
-            # mikan ポインタではなく、é
-åˆ—åž‹ã¨ã—ãªã„ã¨ã€ãƒã‚¤ãƒ³ã‚¿å¤‰æ•°ã®é ˜åŸŸã®åˆ†ã€æã™ã‚‹
+            # mikan ポインタではなく、配列型としないと、ポインタ変数の領域の分、損する
             init.each { |i|
               str += gen_cell_cb_init( f, c, name_array, type, i, v.get_identifier, 1, true )
@@ -3117 +3045 @@
 
         unless @singleton then
-          # 1 つの cell INIB の終わり
+          # 1 つの cell INIB の終わり
           if @idx_is_id_act then
             f.print( "};\n\n" )
@@ -3135 +3063 @@
       end
 
-      # RAM initializer を使用しない、または ROM 化しない
+      # RAM initializer を使用しない、または ROM 化しない
       if $ram_initializer == false || $rom == false then
         if @singleton then
@@ -3177 +3105 @@
 
           unless @singleton then
-            # 1 つの cell CB の終わり
+            # 1 つの cell CB の終わり
             if @idx_is_id_act then
               f.print( "};\n\n" )
@@ -3215 +3143 @@
         f.print "/* ID to INIB table #_INTAB_# */\n"
         @ordered_cell_list.each{ |c|
-          if c.is_generate? && ( c.get_region.get_domain_root != Region.get_root ) then # 生成対象かつ、ルート以外か
+          if c.is_generate? && ( c.get_region.get_domain_root != Region.get_root ) then # 生成対象かつ、ルート以外か
             name_array = get_name_array( c )
             print_indent( f, indent + 1 )
@@ -3224 +3152 @@
         f.print "#{@global_name}_INIB *#{@global_name}_INIB_tab[] ={\n"
         @ordered_cell_list.each{ |c|
-          if c.is_generate? then                           # 生成対象か？
+          if c.is_generate? then                           # 生成対象か？
             name_array = get_name_array( c )
             print_indent( f, indent + 1 )
@@ -3235 +3163 @@
         f.print "/* ID to CB table #_CBTAB_# */\n"
         @ordered_cell_list.each{ |c|
-          if c.is_generate? && ( c.get_region.get_domain_root != Region.get_root ) then # 生成対象かつ、ルート以外か
+          if c.is_generate? && ( c.get_region.get_domain_root != Region.get_root ) then # 生成対象かつ、ルート以外か
             name_array = get_name_array( c )
             print_indent( f, indent + 1 )
@@ -3244 +3172 @@
         f.print "#{@global_name}_CB *#{@global_name}_CB_tab[] ={\n"
         @ordered_cell_list.each{ |c|
-          if c.is_generate? then                           # 生成対象か？
+          if c.is_generate? then                           # 生成対象か？
             name_array = get_name_array( c )
             print_indent( f, indent + 1 )
@@ -3256 +3184 @@
 
 
-  #=== name_array を生成
+  #=== name_array を生成
   # IN:   cell  : Cell
-  #       index : CB, INIB é
-åˆ—の添数
+  #       index : CB, INIB 配列の添数
   # RETURN: name_array
   #   name_array[0] = @name           # celltype name
   #   name_array[1] = cell.get_name   # cell name
   #   name_array[2] = cell_CB_name    # cell_CB_name
-  #   name_array[3] = cell_CB_INIT    # cell_CB_INIT # CB の外側で初期化がå¿
-要なé
-åˆ—の名前
+  #   name_array[3] = cell_CB_INIT    # cell_CB_INIT # CB の外側で初期化が必要な配列の名前
   #   name_array[4] = cell_CB_proto   # CB name for prototype
   #   name_array[5] = cell_INIB       # INIB name
@@ -3305 +3230 @@
 
     if ! has_CB? && ! has_INIB? then
-      cell_CBP = "NULL"    # CB も INIB もなければ NULL に置換
+      cell_CBP = "NULL"    # CB も INIB もなければ NULL に置換
     else
       cell_CBP = "&#{cell_CB_name}"
@@ -3326 +3251 @@
   end
 
-  #=== attribute と size_is 指定された var (ポインタ)の初期化データを出力
+  #=== attribute と size_is 指定された var (ポインタ)の初期化データを出力
   #
-  # ROM 化サポートの有無、および出力対象が CB か INIB かにより出力されるå†
-容が異なる
+  # ROM 化サポートの有無、および出力対象が CB か INIB かにより出力される内容が異なる
   def gen_cell_cb_attribute( cell, indent, f, name_array, cb_inib )
     ct = self
@@ -3339 +3263 @@
       f.print "/* attribute(RO) */ \n"
     elsif $rom then  # && cb_inib == CB
-      # CB で rw と var
+      # CB で rw と var
       return if @n_attribute_rw == 0
       print_indent( f, indent + 1 )
       f.print "/* attribute(RW) */ \n"
     else  # cb_inib == CB && $rom == false
-      # CB にå
-¨éƒ¨
+      # CB に全部
       return if @n_attribute_rw == 0 && @n_attribute_ro == 0 && @n_var_size_is == 0
       print_indent( f, indent + 1 )
@@ -3355 +3278 @@
       next if a.is_omit?
       if cb_inib == :INIB && a.is_rw? == true then
-        # $rom == true でしか、ここへ来ない
+        # $rom == true でしか、ここへ来ない
         next
       elsif cb_inib == :CB && $rom && ! a.is_rw? then
@@ -3363 +3286 @@
       j = jl.get_item( a.get_identifier )
       if j then
-        # cell の初期値指定あり
+        # cell の初期値指定あり
         gen_cell_cb_init( f, cell, name_array, a.get_type, j.get_rhs, a.get_identifier, indent + 1 )
       elsif a.get_initializer then
-        # celltype の default の初期値あり
+        # celltype の default の初期値あり
         gen_cell_cb_init( f, cell, name_array, a.get_type, a.get_initializer, a.get_identifier, indent + 1 )
       else
-        # 初期値未指定
+        # 初期値未指定
         gen_cell_cb_init( f, cell, name_array, a.get_type, nil, a.get_identifier, indent + 1 )
       end
@@ -3375 +3298 @@
     @var.each{ |v|
       next if v.is_omit?
-      next if v.get_size_is == nil   # size_is æŒ‡å®šãŒã‚ã‚‹å ´åˆ attribute の一部として出力
+      next if v.get_size_is == nil   # size_is 指定がある場合 attribute の一部として出力
 
       if v.get_initializer && $ram_initializer == false then
         gen_cell_cb_init( f, cell, name_array, v.get_type, v.get_initializer, v.get_identifier, indent + 1 )
       else
-        # 初期値未指定 または RAM initializer 使用
+        # 初期値未指定 または RAM initializer 使用
         gen_cell_cb_init( f, cell, name_array, v.get_type, nil, v.get_identifier, indent + 1 )
       end
@@ -3386 +3309 @@
   end
 
-  #=== var の初期化データを出力
+  #=== var の初期化データを出力
   def gen_cell_cb_var( cell, indent, f, name_array )
     jl = cell.get_join_list
@@ -3396 +3319 @@
 
         next if v.is_omit?
-        next if v.get_size_is      # size_is æŒ‡å®šãŒã‚ã‚‹å ´åˆ attribute の一部として出力
+        next if v.get_size_is      # size_is 指定がある場合 attribute の一部として出力
 
         if v.get_initializer && $ram_initializer == false then
           gen_cell_cb_init( f, cell, name_array, v.get_type, v.get_initializer, v.get_identifier, indent + 1 )
         else
-          # 初期値未指定 または RAM initializer 使用
+          # 初期値未指定 または RAM initializer 使用
           gen_cell_cb_init( f, cell, name_array, v.get_type, nil, v.get_identifier, indent + 1 )
         end
@@ -3413 +3336 @@
   end
 
-  #=== 呼び口の初期化コードの生成
+  #=== 呼び口の初期化コードの生成
   def gen_cell_cb_call_port( cell, indent, f, name_array )
     jl = cell.get_join_list
@@ -3424 +3347 @@
         next if p.get_port_type != :CALL
         next if p.is_omit?
-        next if p.is_cell_unique?        # 最適化（単一セルで呼び口マクロに埋め込まれる）
+        next if p.is_cell_unique?        # 最適化（単一セルで呼び口マクロに埋め込まれる）
 
         j = jl.get_item( p.get_name )
@@ -3431 +3354 @@
         # debug
         if j == nil then
-          # optional 呼び口
+          # optional 呼び口
           # cdl_error( "H1003 internal error: cell \'$1\' port \'$2\': initializer not found\n" , cell.get_name, p.get_name )
           # exit( 1 )
           f.printf( "%-40s /* #_CCP5_# */\n",  "0," )
           if p.get_array_size == "[]" then
-            # 添数省略の呼び口é
-åˆ—
+            # 添数省略の呼び口配列
             print_indent( f, indent + 1 )
             f.printf( "%-40s /* %s #_CCP6_# */\n", "0,", "length of #{p.get_name} (n_#{p.get_name})" )
@@ -3446 +3368 @@
         am = j.get_array_member2
         if am then
-          # 呼び口é
-åˆ—ã®å ´åˆ
+          # 呼び口配列の場合
           f.printf( "%-40s /* #_CCP3_# */\n",  "#{cell.get_global_name}_#{j.get_name}," )
           if p.get_array_size == "[]" then
-            # 添数省略の呼び口é
-åˆ—
+            # 添数省略の呼び口配列
             print_indent( f, indent + 1 )
             f.printf( "%-40s /* %s #_CCP4_# */\n", "#{am.length},", "length of #{p.get_name} (n_#{p.get_name})" )
           end
         else
-          # åŒä¸€ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®çµåˆã®å ´åˆã€VDES 型へのキャストがå¿
-要
+          # 同一セルタイプの結合の場合、VDES 型へのキャストが必要
           #print "CCP0/CCP1 #{p.get_name}, #{j.get_rhs_cell.get_celltype.get_name}, #{@name}\n"
           if j.get_rhs_cell.get_celltype == self then
@@ -3467 +3386 @@
 
           if j.get_rhs_subscript then
-            # 受け口é
-åˆ—ã®å ´åˆ
+            # 受け口配列の場合
             subscript = j.get_rhs_subscript
             f.printf( "%-40s /* %s #_CCP0_# */\n",
@@ -3475 +3393 @@
                       p.get_name )
           else
-            # 呼び口é
-åˆ—でも、受け口é
-åˆ—でもない
+            # 呼び口配列でも、受け口配列でもない
             if ! p.is_skelton_useless? then
               f.printf( "%-40s /* %s #_CCP1_# */\n",
@@ -3483 +3399 @@
                         p.get_name )
             else
-              # スケルトン不要最適化（CB (INIB) へのポインタを埋め込む）
-              c = j.get_rhs_cell                    # 呼びå
-ˆã‚»ãƒ«
-              ct = c.get_celltype                   # 呼びå
-ˆã‚»ãƒ«ã‚¿ã‚¤ãƒ—
+              # スケルトン不要最適化（CB (INIB) へのポインタを埋め込む）
+              c = j.get_rhs_cell                    # 呼び先セル
+              ct = c.get_celltype                   # 呼び先セルタイプ
               if ct.has_INIB? || ct.has_CB? then
-                name_array = ct.get_name_array( c )   # 呼びå
-ˆã‚»ãƒ«ã‚¿ã‚¤ãƒ—で name_array を得る
+                name_array = ct.get_name_array( c )   # 呼び先セルタイプで name_array を得る
                 f.printf( "%-40s /* %s #_CCP2_# */\n", "#{name_array[7]},", p.get_name )
               else
-                # 呼びå
-ˆã¯ CB も INIB も持たない（NULL に初期化）
+                # 呼び先は CB も INIB も持たない（NULL に初期化）
                 f.printf( "%-40s /* %s #_CCP2_# */\n", "0,", p.get_name )
               end
@@ -3505 +3417 @@
   end
 
-  #=== 受け口の初期化コードの生成
+  #=== 受け口の初期化コードの生成
   def gen_cell_cb_entry_port( cell, indent, f, name_array )
     jl = cell.get_join_list
@@ -3514 +3426 @@
       f.print "/* entry port #_EP_# */ \n"
       @port.each{ |p|
-        # next if p.is_omit?  # 受け口é
-åˆ—の個数は省略しない
+        # next if p.is_omit?  # 受け口配列の個数は省略しない
         if p.get_port_type == :ENTRY && p.get_array_size == "[]"
           print_indent( f, indent + 1 )
@@ -3524 +3435 @@
   end
 
-  #=== セルの attribute の初期値を出力
+  #=== セルの attribute の初期値を出力
   #
-  #f_get_str:: true ã®å ´åˆã€æ–‡å­—åˆ—ã‚’è¿”ã™ã€false ã®å ´åˆã€ãƒ•ã‚¡ã‚¤ãƒ« f に出力する．
-  # 文字列を返すとき、末尾に ',' は含まれない．
-  # ファイルへ出力するとき、末尾に ',' ãŒå‡ºåŠ›ã•ã‚Œã‚‹ï¼Žæ§‹é€ ä½“è¦ç´ ã€é
-åˆ—è¦ç´ の初期値を出力すると ',' が二重に出力される．
-  # ただし現状では、ファイルへ出力することはない
+  #f_get_str:: true の場合、文字列を返す、false の場合、ファイル f に出力する．
+  # 文字列を返すとき、末尾に ',' は含まれない．
+  # ファイルへ出力するとき、末尾に ',' が出力される．構造体要素、配列要素の初期値を出力すると ',' が二重に出力される．
+  # ただし現状では、ファイルへ出力することはない
   #
   def gen_cell_cb_init( f, cell, name_array, type, init, identifier, indent, f_get_str = false )
@@ -3544 +3454 @@
 
       if f_get_str then
-        # 初期値未指定
+        # 初期値未指定
         if type.kind_of?( BoolType ) then
           str = "false"   # formerly tecs_false
@@ -3568 +3478 @@
         return str
       else
-        # 初期値未指定
+        # 初期値未指定
         if type.kind_of?( BoolType ) then
           f.print "    " * indent
@@ -3602 +3512 @@
     end    
 
-    # このメソッドは Celltype のものであるå¿
-要は無い（上に続くのでここに置く）
-    # 初期値指定あり
+    # このメソッドは Celltype のものである必要は無い（上に続くのでここに置く）
+    # 初期値指定あり
     if type.kind_of?( BoolType ) then
       if init.instance_of?( C_EXP ) then
@@ -3670 +3579 @@
 
       len.times {
-        next if ! init[i]        # mikan この処置は適切？
+        next if ! init[i]        # mikan この処置は適切？
         if f_get_str then
           str += gen_cell_cb_init( f, cell, name_array, at, init[i], "#{identifier}[#{i}]", indent + 1, f_get_str )
@@ -3752 +3661 @@
   end
 
-  #== 関数テーブルの外部参ç
-§
+  #== 関数テーブルの外部参照
   def gen_cell_extern_mt fs
     fs.each{ |r, f|
@@ -3768 +3676 @@
   end
 
-  #=== 受け口ディスクリプタの定義を生成
+  #=== 受け口ディスクリプタの定義を生成
   def gen_cell_ep_des fs
     if @n_cell_gen >0 then
@@ -3789 +3697 @@
           next if p.get_port_type != :ENTRY
           next if p.is_omit?
-          if p.is_skelton_useless?       # 受け口最適化n ep_opt
+          if p.is_skelton_useless?       # 受け口最適化n ep_opt
             f.print( "/* #{p.get_name} : omitted by entry port optimize */\n" )
             next
@@ -3800 +3708 @@
 
           if len != nil then
-            # 受け口é
-åˆ—ã®å ´åˆ
+            # 受け口配列の場合
             i = 0
             while i < len
@@ -3882 +3789 @@
     return if @b_reuse && ! $generate_all_template
     if ! ( @plugin && @plugin.gen_ep_func? ) then
-      return if $generate_no_template     # $generate_all_template より優å
-ˆã•ã‚Œã‚‹
-
-      # 参考として出力するテンプレートファイルであることを示すために "_templ" ã‚’ä»˜åŠ ã™ã‚‹
+      return if $generate_no_template     # $generate_all_template より優先される
+
+      # 参考として出力するテンプレートファイルであることを示すために "_templ" を付加する
       fname = "#{$gen}/#{@global_name}_templ.#{$c_suffix}"
     else
-      # Plugin により生成されたセルタイプについては、原則的にテンプレートではなく、
-      # 修正不要なセルタイプの実è£
-コードを生成する．
-      # このため、ファイル名に _temp ã‚’ä»˜åŠ ã—ãªã„
+      # Plugin により生成されたセルタイプについては、原則的にテンプレートではなく、
+      # 修正不要なセルタイプの実装コードを生成する．
+      # このため、ファイル名に _temp を付加しない
       fname = "#{$gen}/#{@global_name}.#{$c_suffix}"
     end
@@ -3906 +3811 @@
     gen_template_attr_access f
     gen_template_cp_fun f
-    # gen_template_types f     # 0805503 è¿½åŠ ã—ã¦ã¿ãŸãŒã€ã‚„ã£ã±ã‚Šã‚„ã‚ã‚‹
+    # gen_template_types f     # 0805503 追加してみたが、やっぱりやめる
     f.print( " *\n * #[</PREAMBLE>]# */\n\n" )
     f.printf TECSMsg.get( :PAC_comment ), "#_PAC_#"
@@ -3912 +3817 @@
     gen_template_private_header f
     if ( @plugin ) then
-      # このメソッドの引数は plugin.rb の説明を見よ
+      # このメソッドの引数は plugin.rb の説明を見よ
       @plugin.gen_preamble( f, @singleton, @name, @global_name )
     end
@@ -3921 +3826 @@
 
     if ( @plugin ) then
-      # このメソッドの引数は plugin.rb の説明を見よ
+      # このメソッドの引数は plugin.rb の説明を見よ
       @plugin.gen_postamble( f, @singleton, @name, @global_name )
     end
@@ -4075 +3980 @@
       next if p.get_port_type != :ENTRY
       next if p.is_omit?
-      next if b_inline && ! p.is_inline?  # inline ポート
-      next if ! b_inline && p.is_inline?  # 非 inline ポート
+      next if b_inline && ! p.is_inline?  # inline ポート
+      next if ! b_inline && p.is_inline?  # 非 inline ポート
 
       inline_prefix = ""
@@ -4133 +4038 @@
           len = items.length
         else
-          # ここで nil になるのは、引数なしの時に void ãŒãªã‹ã£ãŸå ´åˆ
+          # ここで nil になるのは、引数なしの時に void がなかった場合
           items = []
           len = 0
@@ -4153 +4058 @@
 
         if ( @plugin && @plugin.gen_ep_func? ) then
-          # このメソッドの引数は plugin.rb の説明を見よ
+          # このメソッドの引数は plugin.rb の説明を見よ
           @plugin.gen_ep_func_body( f, @singleton, @name, @global_name, p.get_signature.get_global_name, p.get_name, fun.get_name, "#{@global_name}_#{p.get_name}_#{fun.get_name}", functype, items )
 
@@ -4200 +4105 @@
     if ! ( @plugin && @plugin.gen_ep_func? ) then
       return if @b_reuse && ! $generate_all_template
-      return if $generate_no_template     # $generate_all_template より優å
-ˆã•ã‚Œã‚‹
-
-      # 参考として出力するテンプレートファイルであることを示すために "_templ" ã‚’ä»˜åŠ ã™ã‚‹
+      return if $generate_no_template     # $generate_all_template より優先される
+
+      # 参考として出力するテンプレートファイルであることを示すために "_templ" を付加する
       fname = "#{$gen}/#{@global_name}_inline_templ.#{$h_suffix}"
     else
-      # Plugin により生成されたセルタイプについては、原則的にテンプレートではなく、
-      # 修正不要なセルタイプの実è£
-コードを生成する．
-      # このため、ファイル名に _temp ã‚’ä»˜åŠ ã—ãªã„
+      # Plugin により生成されたセルタイプについては、原則的にテンプレートではなく、
+      # 修正不要なセルタイプの実装コードを生成する．
+      # このため、ファイル名に _temp を付加しない
       fname = "#{$gen}/#{@global_name}_inline.#{$h_suffix}"
     end
@@ -4232 +4135 @@
 
     if ( @plugin ) then
-      # このメソッドの引数は plugin.rb の説明を見よ
+      # このメソッドの引数は plugin.rb の説明を見よ
       @plugin.gen_postamble( f, @singleton, @name, @global_name )
     end
@@ -4249 +4152 @@
       if fa.get_name == :write then
 
-        # 前後の " を取り除く
+        # 前後の " を取り除く
         # file_name = fa.get_file_name.sub( /^\"(.*)\"$/, "\\1" )
         file_name = CDLString.remove_dquote fa.get_file_name
         format = CDLString.remove_dquote fa.get_format
-        # format    = fa.get_format.sub( /^\"(.*)/, "\\1" )        # 前の " を取り除く
-        # format    = format.sub( /(.*)\"\z/, "\\1" )              # 後の " を取り除く
+        # format    = fa.get_format.sub( /^\"(.*)/, "\\1" )        # 前の " を取り除く
+        # format    = format.sub( /(.*)\"\z/, "\\1" )              # 後の " を取り除く
         format    = format.gsub( /\\\n/, "\n" )                  # \\\n => \n
 
 
-        # mikan 以下は subst_name で置換するように変更すべき
-        file_name = file_name.gsub( /(^|[^\$])\$ct\$/, "\\1#{@name}" )   # $ct$ をセルタイプ名に置換
-        file_name = file_name.gsub( /(^|[^\$])\$ct_global\$/, "\\1#{@global_name}" )   # $ct$ をセルタイプ名に置換
-        format    = format.gsub( /(^|[^\$])\$ct\$/, "\\1#{@name}" )   # $ct$ をセルタイプ名に置換
-        format    = format.gsub( /(^|[^\$])\$ct_global\$/, "\\1#{@global_name}" )   # $ct$ をセルタイプ名に置換
-        format    = format.gsub( /\$\$/, "\$" )                # $$ を $ に置換
+        # mikan 以下は subst_name で置換するように変更すべき
+        file_name = file_name.gsub( /(^|[^\$])\$ct\$/, "\\1#{@name}" )   # $ct$ をセルタイプ名に置換
+        file_name = file_name.gsub( /(^|[^\$])\$ct_global\$/, "\\1#{@global_name}" )   # $ct$ をセルタイプ名に置換
+        format    = format.gsub( /(^|[^\$])\$ct\$/, "\\1#{@name}" )   # $ct$ をセルタイプ名に置換
+        format    = format.gsub( /(^|[^\$])\$ct_global\$/, "\\1#{@global_name}" )   # $ct$ をセルタイプ名に置換
+        format    = format.gsub( /\$\$/, "\$" )                # $$ を $ に置換
 
         if file_name[0] != ?/ then
@@ -4275 +4178 @@
             puts( format )
           end
-          # format 中の \n, \r, \t, \f と \" などを置換
+          # format 中の \n, \r, \t, \f と \" などを置換
           fmt = CDLString.escape format
           cfg_file.print( fmt )
@@ -4292 +4195 @@
     @ordered_cell_list.each{ |c|
 
-      # cell のプロトタイプ宣言なら無視
+      # cell のプロトタイプ宣言なら無視
       next if ! c.is_generate?
 
@@ -4301 +4204 @@
         if fa.get_name == :write then
 
-          # 前後の " を取り除く
+          # 前後の " を取り除く
           # file_name = fa.get_file_name.sub( /^\"(.*)\"$/, "\\1" )
           file_name = CDLString.remove_dquote fa.get_file_name
           file_name = subst_name( file_name, name_array )
-          # format    = fa.get_format.sub( /^\"(.*)\"$/, "\\1" )        # 前後の "" を取り除く
+          # format    = fa.get_format.sub( /^\"(.*)\"$/, "\\1" )        # 前後の "" を取り除く
           format    = CDLString.remove_dquote fa.get_format
-          # format    = fa.get_format.sub( /^\"(.*)/, "\\1" )        # 前の " を取り除く
-          # format    = format.sub( /(.*)\"\z/, "\\1" )              # 後の " を取り除く
+          # format    = fa.get_format.sub( /^\"(.*)/, "\\1" )        # 前の " を取り除く
+          # format    = format.sub( /(.*)\"\z/, "\\1" )              # 後の " を取り除く
           format    = format.gsub( /\\\n/, "\n" )                  # \\\n => \n
 
@@ -4319 +4222 @@
           end
 
-          na = []     # シンボルを attribute の値に置き換えた後の引数
+          na = []     # シンボルを attribute の値に置き換えた後の引数
           if arg_list then
             arg_list.each { |a|
               case a[0]
-              when :STRING_LITERAL   # 文字列定数
-                # s = a[1].sub( /^\"(.*)\"$/, "\\1" )            # 前後の "" を取り除く
+              when :STRING_LITERAL   # 文字列定数
+                # s = a[1].sub( /^\"(.*)\"$/, "\\1" )            # 前後の "" を取り除く
                 s = CDLString.remove_dquote a[1]
                 s = subst_name( s, name_array )
@@ -4331 +4234 @@
                 na << s
               when :IDENTIFIER
-                param_name = a[1]    # 識別子（属性の名前）
+                param_name = a[1]    # 識別子（属性の名前）
                 attr = self.find( param_name )
-                init = attr.get_initializer      # celltype で指定された初期値
-
-                # cell の join のリストから名前を探す
+                init = attr.get_initializer      # celltype で指定された初期値
+
+                # cell の join のリストから名前を探す
                 j = c.get_join_list.get_item( param_name )
-                if j then    # param_name の cell のジョインがあるか
-                  init = j.get_rhs                    # cell で指定された初期値を優å
-ˆ
+                if j then    # param_name の cell のジョインがあるか
+                  init = j.get_rhs                    # cell で指定された初期値を優先
                 end
 
@@ -4345 +4247 @@
                                       # file,cell, name_array, type,          init, identifier,       indent, f_get_str
 
-                # str = str.sub( /^\"(.*)\"$/, "\\1" )            # 前後の "" を取り除く mikan ここで置換でよい？
+                # str = str.sub( /^\"(.*)\"$/, "\\1" )            # 前後の "" を取り除く mikan ここで置換でよい？
                 str = CDLString.remove_dquote str
                 na << str
@@ -4363 +4265 @@
             end
 
-            # format 中の \n, \r, \t, \f と \" などを置換
+            # format 中の \n, \r, \t, \f と \" などを置換
             fmt = CDLString.escape format
             cfg_file.printf( fmt, *na )
@@ -4387 +4289 @@
     return if $generate_no_template
 
-    # Makefile.templ の生成（追記）
+    # Makefile.templ の生成（追記）
 
     f = AppFile.open( "#{$gen}/Makefile.templ" )
@@ -4395 +4297 @@
  
 EOT
-# この生成規則は2点で意味がない
-#  ・$(GEN_DIR) に .o を生成するルールがない
-#  ・テンプレートコードをそのままビルドするのは紛らわしい
+# この生成規則は2点で意味がない
+#  ・$(GEN_DIR) に .o を生成するルールがない
+#  ・テンプレートコードをそのままビルドするのは紛らわしい
 # # Celltype: #{@name}
 # $(GEN_DIR)/#{@global_name}_tecsgen.o : $(GEN_DIR)/#{@global_name}_tecsgen.#{$c_suffix}
@@ -4414 +4316 @@
     headers = [ "$(GEN_DIR)/#{@global_name}_tecsgen.#{$h_suffix}", "$(GEN_DIR)/#{@global_name}_factory.#{$h_suffix}", "$(GEN_DIR)/global_tecsgen.#{$h_suffix}" ]
 
-    # inline 受け口を持つか？
+    # inline 受け口を持つか？
     if @n_entry_port_inline > 0 then
       headers << "#{@global_name}_inline.#{$h_suffix}"
     end
 
-    # 呼び口または受け口のシグニチャのヘッダ
+    # 呼び口または受け口のシグニチャのヘッダ
     @port.each { |p|
       next if p.is_omit?
@@ -4444 +4346 @@
   end
 
-  #=== decl 用の dealloc コードを生成
-  #b_reset:: Bool:  リセット用の dealloc コードの生成 (NULL ãƒã‚¤ãƒ³ã‚¿ã®å ´åˆ dealloc しない)
-  # mikan string 修飾されたポインタのå
-ˆã«ãƒã‚¤ãƒ³ã‚¿ãŒæ¥ãªã„ã¨ä»®å®šã€‚ãƒã‚¤ãƒ³ã‚¿åž‹ã‚’æŒã¤æ§‹é€ 体の可能性を排除していない
-  # このメソッドでは、行を出力する直前に " \\\n" を出力し、行末で改行文字を出力しない
+  #=== decl 用の dealloc コードを生成
+  #b_reset:: Bool:  リセット用の dealloc コードの生成 (NULL ポインタの場合 dealloc しない)
+  # mikan string 修飾されたポインタの先にポインタが来ないと仮定。ポインタ型を持つ構造体の可能性を排除していない
+  # このメソッドでは、行を出力する直前に " \\\n" を出力し、行末で改行文字を出力しない
   def gen_dealloc_code_for_type( f, type, dealloc_func_name, pre, name, post, level, b_reset, count_str = nil )
     type = type.get_original_type
@@ -4477 +4378 @@
         post2 = ""
         type2 = md.get_type.get_original_type
-        if type2.kind_of? PtrType then   # mikan typedef された型
+        if type2.kind_of? PtrType then   # mikan typedef された型
           if type2.get_count then
             count_str = type2.get_count.to_str( members_decl, pre2, post2 )
@@ -4550 +4451 @@
     end
 
-    # 呼び口の結合å
-ˆã®ã‚»ãƒ«ã‚¿ã‚¤ãƒ—ã®ãƒ˜ãƒƒãƒ€ï¼ˆæœ€é©åŒ–ã®å ´åˆã®ã¿ï¼‰
-    # 結合å
-ˆã®å—け口が inline ã®å ´åˆã€inline ヘッダも
+    # 呼び口の結合先のセルタイプのヘッダ（最適化の場合のみ）
+    # 結合先の受け口が inline の場合、inline ヘッダも
     @port.each { |p|
       next if p.get_port_type != :CALL
@@ -4559 +4458 @@
 
       if p.is_skelton_useless? || p.is_cell_unique? || p.is_VMT_useless? then
-        # 最適化コード (optimize) # スケルトン不要など
+        # 最適化コード (optimize) # スケルトン不要など
         p2 = p.get_real_callee_port
         if p2 then
@@ -4569 +4468 @@
           headers += ct.get_depend_header_list_( celltype_list )
         #else
-        #  optional で未結合  
+        #  optional で未結合  
         end
       end
@@ -4577 +4476 @@
 
 
-  #=== $id$, $ct$, $cb$, $idx$ 置換
+  #=== $id$, $ct$, $cb$, $idx$ 置換
   #
-  #  str に以下の置換を行う
-  #-   $ct$ ⇒ セルタイプ名(ct)
-  #-   $cell$ ⇒ セル名(cell)   cell が nil ならば3つの置換は行われない
-  #-   $cb$ ⇒ CB の C 言語名(cb)
-  #-   $cbp$ ⇒ CB へのポインタ(cbp)
-  #-   $cb_proto$ ⇒ CB の C 言語名プロトタイプ宣言用(cb_proto)
-  #-   $id$ ⇒ ct_cell
-  #-   $idx$ ⇒ idx
-  #-   $ID$ ⇒ id (整数の番号)
-  #-   $ct_global$ ⇒ セルタイプ名(ct)
-  #-   $cell_global$ ⇒ セル名(cell)   cell が nil ならば3つの置換は行われない
-  #-   $$   ⇒ $
+  #  str に以下の置換を行う
+  #-   $ct$ ⇒ セルタイプ名(ct)
+  #-   $cell$ ⇒ セル名(cell)   cell が nil ならば3つの置換は行われない
+  #-   $cb$ ⇒ CB の C 言語名(cb)
+  #-   $cbp$ ⇒ CB へのポインタ(cbp)
+  #-   $cb_proto$ ⇒ CB の C 言語名プロトタイプ宣言用(cb_proto)
+  #-   $id$ ⇒ ct_cell
+  #-   $idx$ ⇒ idx
+  #-   $ID$ ⇒ id (整数の番号)
+  #-   $ct_global$ ⇒ セルタイプ名(ct)
+  #-   $cell_global$ ⇒ セル名(cell)   cell が nil ならば3つの置換は行われない
+  #-   $$   ⇒ $
   def subst_name( str, name_array )
     ct   = name_array[0]    # celltype name
     cell = name_array[1]    # cell name
     cb   = name_array[2]    # cell CB name
-    cb_init = name_array[3] # cell CB INIT, これは置換に使われない
+    cb_init = name_array[3] # cell CB INIT, これは置換に使われない
     cb_proto = name_array[4] # cell CB name for prototype
     id   = name_array[6]    # cell ID
@@ -4615 +4514 @@
       str = str.gsub( /(^|[^\$])\$cell_global\$/, "\\1#{cell_global}" )
     end
-    str = str.gsub( /\$\$/, "\$" )                       # $$ を $ に置換
+    str = str.gsub( /\$\$/, "\$" )                       # $$ を $ に置換
 
     return str
@@ -4622 +4521 @@
 end
 
-# Appendable File（追記可能ファイル）
+# Appendable File（追記可能ファイル）
 class AppFile
-  # 開いたファイルのリスト
+  # 開いたファイルのリスト
   @@file_name_list = {}
 
@@ -4641 +4540 @@
     end
 
-    # 既に開いているか？
+    # 既に開いているか？
     if @@file_name_list[ name ] then
 #2.0
       mode = "a" + mode
-      # 追記モードで開く
+      # 追記モードで開く
       file = File.open( real_name, mode )
     else
 #2.0
       mode = "w" + mode
-      # 新規モードで開く（既にあれば、サイズを０にする）
+      # 新規モードで開く（既にあれば、サイズを０にする）
       file = File.open( real_name, mode )
       @@file_name_list[ name ] = true
     end
-    # File クラスのオブジェクトを返す
+    # File クラスのオブジェクトを返す
     return file
   end