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

Timestamp:

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

Author:

coas-nagasima

Message:

文字コードを設定

File:

• EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/C_parser.tab.rb (modified) (10 diffs, 1 prop)

EcnlProtoTool/trunk/asp3_dcre/tecsgen/tecslib/core/C_parser.tab.rb

@@ -102 +102 @@
     comment = false
 
-    # euc のコメントを utf8 として扱うと、コメントの終わりを誤る問題の対策
+    # euc のコメントを utf8 として扱うと、コメントの終わりを誤る問題の対策
     TECS_LANG::set_kcode_binary
 
-    # 800U, 0xffLL など (整数リテラルにå
-±é€šã®ä¿®é£¾å­)
+    # 800U, 0xffLL など (整数リテラルに共通の修飾子)
     integer_qualifier = "([Uu][Ll][Ll]|[Uu][Ll]|[Uu]|[Ll][Ll]|[Ll])?"
 
@@ -121 +120 @@
           if comment
             case line
-            # コメント終了
+            # コメント終了
             when /\A\*\//
               comment = false
@@ -129 +128 @@
           else
             case line
-            # 空白、プリプロセスディレクティブ
+            # 空白、プリプロセスディレクティブ
             when /\A\s+/
               ;
-            # 識別子
+            # 識別子
             when /\A[a-zA-Z_]\w*/
               word = $&
               @q << [RESERVED[word] || :IDENTIFIER, Token.new(word.intern, file, lineno, col)]
-            # 16 進数定数
+            # 16 進数定数
             when /\A0x[0-9A-Fa-f]+#{integer_qualifier}/
               @q << [:HEX_CONSTANT, Token.new($&, file, lineno, col)]
-            # 8 進数定数
+            # 8 進数定数
             when /\A0[0-7]+#{integer_qualifier}/
               @q << [:OCTAL_CONSTANT, Token.new($&, file, lineno, col)]
-            # 浮動小数定数
+            # 浮動小数定数
             when /\A[0-9]+\.([0-9]*)?([Ee][+-]?[0-9]+)?/
               @q << [:FLOATING_CONSTANT, Token.new($&, file, lineno, col)]
-            # 整数定数
+            # 整数定数
             when /\A\d+#{integer_qualifier}/
             # when /\A\d+/
               @q << [:INTEGER_CONSTANT, Token.new($&.to_i, file, lineno, col)]
-            # 文字
+            # 文字
             when /\A'(?:[^'\\]|\\.)'/
               @q << [:CHARACTER_LITERAL, Token.new($&, file, lineno, col)]
-            # 文字列
-#              "#include  #include #include \"../systask/logtask.cfg\"       最後の " 忘れ)で無限ループ
+            # 文字列
+#              "#include  #include #include \"../systask/logtask.cfg\"       最後の " 忘れ)で無限ループ
 #            when /\A"(?:[^"\\]+|\\.)*"/
-            when /\A"(?:[^"\\]|\\.)*"/   # これはうまく行くようだ
+            when /\A"(?:[^"\\]|\\.)*"/   # これはうまく行くようだ
               @q << [:STRING_LITERAL, Token.new($&, file, lineno, col)]
-            # 行コメント
+            # 行コメント
             when /\A\/\/.*$/
-              # 読み飛ばすだけ
-            # コメント開始
+              # 読み飛ばすだけ
+            # コメント開始
             when /\A\/\*/
               comment = true
@@ -189 +188 @@
     }
 
-    # 終了の印
+    # 終了の印
     @q << nil
 
@@ -216 +215 @@
       end
 
-      # TYPE_NAME トークンへ置き換え
+      # TYPE_NAME トークンへ置き換え
       if @b_no_type_name == false
         if token[0] == :IDENTIFIER && Namespace.is_typename?( token[1].val ) then
@@ -223 +222 @@
       end
 
-      if $debug then     # 070107 token 無効時ここを通さないようした (through 対応 -d の時に例外発生) 
+      if $debug then     # 070107 token 無効時ここを通さないようした (through 対応 -d の時に例外発生) 
         locale = @@current_locale[@@generator_nest]
         if token then
@@ -252 +251 @@
   @@n_warning = 0
 
-  # このメソッドは構文解析、意味解析からのみ呼出し可（コード生成でエラー発生は不適切）
+  # このメソッドは構文解析、意味解析からのみ呼出し可（コード生成でエラー発生は不適切）
   def self.error( msg )
     @@n_error += 1
@@ -264 +263 @@
   end
 
-  # このメソッドは構文解析、意味解析からのみ呼出し可（コード生成でウォーニング発生は不適切）
+  # このメソッドは構文解析、意味解析からのみ呼出し可（コード生成でウォーニング発生は不適切）
   def self.warning( msg )
     @@n_warning += 1
@@ -1676 +1675 @@
 module_eval(<<'.,.,', 'C_parser.y.rb', 237)
   def _reduce_70(val, _values, result)
-                        result = CIntType.new( -3 )    # storage class は無視
+                        result = CIntType.new( -3 )    # storage class は無視
                 
     result
@@ -1695 +1694 @@
 module_eval(<<'.,.,', 'C_parser.y.rb', 247)
   def _reduce_73(val, _values, result)
-                        result = val[1]                # storage class は無視
+                        result = val[1]                # storage class は無視
                 
     result