Changeset 20 for ruby/trunk/adl_parser/lib/parser.y

Timestamp:

Apr 29, 2008, 9:57:31 AM (16 years ago)

Author:

Tatsukawa, Akimichi

Message:

successful parsing 27 archtypes

File:

• ruby/trunk/adl_parser/lib/parser.y (modified) (12 diffs)

ruby/trunk/adl_parser/lib/parser.y

@@ -237 +237 @@
 attr_val: attr_id SYM_EQ object_block
   {
-    @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[1]} at #{@filename}:#{@lineno}")
+    @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
   }
 
@@ -258 +258 @@
 
 multiple_attr_object_block_head: SYM_START_DBLOCK
+  {
+    @@log.info("SYM_START_DBLOCK: #{val[0]} at #{@filename}:#{@lineno}")
+  }
 
 keyed_objects: keyed_object
@@ -263 +266 @@
 
 keyed_object: object_key SYM_EQ object_block
+  {
+    @@log.info("#{__FILE__}:#{__LINE__}: keyed_object = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
+  }
 
 object_key: Left_bracket_code simple_value Right_bracket_code
@@ -277 +283 @@
   | type_identifier untyped_primitive_object_block
 untyped_primitive_object_block: SYM_START_DBLOCK primitive_object_value SYM_END_DBLOCK
+  {
+    @@log.info("#{__FILE__}:#{__LINE__}: primitive_object_block = <#{val[2]}> at #{@filename}:#{@lineno}")
+  }
 primitive_object_value: simple_value
   | simple_list_value
@@ -479 +488 @@
 
 term_code: V_QUALIFIED_TERM_CODE_REF
+  {
+    @@log.info("#{__FILE__}:#{__LINE__}: V_QUALIFIED_TERM_CODE_REF = #{val[0]} at #{@filename}:#{@lineno}")
+  }
 
 term_code_list_value: term_code Comma_code term_code
@@ -485 +497 @@
 
 uri_value: V_URI
+  {
+    @@log.info("#{__FILE__}:#{__LINE__}: V_URI = #{val[0]} at #{@filename}:#{@lineno}")
+  }
 
 
@@ -674 +689 @@
 
 ordinal: integer_value SYM_INTERVAL_DELIM V_QUALIFIED_TERM_CODE_REF
+  {
+    @in_interval = false
+    @@log.info("#{__FILE__}:#{__LINE__}, #{val[0]}|#{val[2]} at #{@filename}") 
+  }
 
 #c_code_phrase: V_TERM_CODE_CONSTRAINT #-- e.g. "[local::at0040, at0041; at0040]"
@@ -919 +938 @@
         if @in_interval
           @in_interval = false
-#        elsif @start_block_received
         else
           @in_interval = true
-#          @start_block_received = false
         end
         yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
@@ -1097 +1114 @@
         yield :Question_mark_code, :Question_mark_code
       when /\A\|/   # |
+        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
         if @in_interval
           @in_interval = false
         else
-          @in_interval = false
-#          @in_interval = true
+#          @in_interval = false
+          @in_interval = true
         end
+        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
         yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
 
@@ -1226 +1245 @@
         if @in_interval
           yield :SYM_LT, :SYM_LT
-#        elsif
         else
           @adl_type.push(:dadl)
@@ -1233 +1251 @@
       when /\A\>/   # >
         if @in_interval
-          @in_interval = false
+#          @in_interval = false
           yield :SYM_GT, :SYM_GT
         elsif @in_c_domain_type == true
@@ -1287 +1305 @@
         yield :Question_mark_code, :Question_mark_code
       when /\A\|/   # |
+        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
         if @in_interval
           @in_interval = false
         else
-          @in_interval = false
-#          @in_interval = true
+#          @in_interval = false
+          @in_interval = true
         end
+        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
         yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
 ###       when /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/   #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23]