Changeset 20


Ignore:
Timestamp:
Apr 29, 2008, 9:57:31 AM (16 years ago)
Author:
Tatsukawa, Akimichi
Message:

successful parsing 27 archtypes

Location:
ruby/trunk/adl_parser
Files:
5 edited

Legend:

Unmodified
Added
Removed

  • ruby/trunk/adl_parser/lib/parser.rb

    r19 r20  
    2525    class Parser < Racc::Parser
    2626
    27 module_eval <<'..end lib/parser.y modeval..ide0b42f72dd', 'lib/parser.y', 720
     27module_eval <<'..end lib/parser.y modeval..id134a7f5a66', 'lib/parser.y', 739
    2828
    2929@@log = Logger.new('log/parser.log','daily')
    … …  
    227227        if @in_interval
    228228          @in_interval = false
    229 #        elsif @start_block_received
    230229        else
    231230          @in_interval = true
    232 #          @start_block_received = false
    233231        end
    234232        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    … …  
    405403        yield :Question_mark_code, :Question_mark_code
    406404      when /\A\|/   # |
     405        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
    407406        if @in_interval
    408407          @in_interval = false
    409408        else
    410           @in_interval = false
    411 #          @in_interval = true
     409#          @in_interval = false
     410          @in_interval = true
    412411        end
     412        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
    413413        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    414414
    … …  
    534534        if @in_interval
    535535          yield :SYM_LT, :SYM_LT
    536 #        elsif
    537536        else
    538537          @adl_type.push(:dadl)
    … …  
    541540      when /\A\>/   # >
    542541        if @in_interval
    543           @in_interval = false
     542#          @in_interval = false
    544543          yield :SYM_GT, :SYM_GT
    545544        elsif @in_c_domain_type == true
    … …  
    595594        yield :Question_mark_code, :Question_mark_code
    596595      when /\A\|/   # |
     596        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
    597597        if @in_interval
    598598          @in_interval = false
    599599        else
    600           @in_interval = false
    601 #          @in_interval = true
     600#          @in_interval = false
     601          @in_interval = true
    602602        end
     603        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
    603604        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    604605###       when /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/   #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23]
    … …  
    811812
    812813
    813 ..end lib/parser.y modeval..ide0b42f72dd
     814..end lib/parser.y modeval..id134a7f5a66
    814815
    815816##### racc 1.4.5 generates ###
    … …  
    919920 2, 159, :_reduce_none,
    920921 3, 160, :_reduce_none,
    921  1, 161, :_reduce_none,
     922 1, 161, :_reduce_103,
    922923 1, 162, :_reduce_none,
    923924 2, 162, :_reduce_none,
    924  3, 163, :_reduce_none,
     925 3, 163, :_reduce_106,
    925926 3, 164, :_reduce_107,
    926927 1, 158, :_reduce_none,
    … …  
    931932 1, 157, :_reduce_none,
    932933 2, 157, :_reduce_none,
    933  3, 168, :_reduce_none,
     934 3, 168, :_reduce_115,
    934935 1, 169, :_reduce_none,
    935936 1, 169, :_reduce_none,
    … …  
    10591060 4, 198, :_reduce_none,
    10601061 3, 198, :_reduce_none,
    1061  1, 172, :_reduce_none,
     1062 1, 172, :_reduce_243,
    10621063 3, 173, :_reduce_none,
    10631064 3, 173, :_reduce_none,
    10641065 3, 173, :_reduce_none,
    1065  1, 183, :_reduce_none,
     1066 1, 183, :_reduce_247,
    10661067 1, 112, :_reduce_none,
    10671068 2, 112, :_reduce_none,
    … …  
    11811182 1, 220, :_reduce_none,
    11821183 3, 220, :_reduce_none,
    1183  3, 221, :_reduce_none,
     1184 3, 221, :_reduce_365,
    11841185 1, 125, :_reduce_none,
    11851186 1, 125, :_reduce_none,
    … …  
    22222223module_eval <<'.,.,', 'lib/parser.y', 240
    22232224  def _reduce_93( val, _values, result )
    2224     @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[1]} at #{@filename}:#{@lineno}")
     2225    @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
    22252226   result
    22262227  end
    … …  
    22502251 # reduce 102 omitted
    22512252
    2252  # reduce 103 omitted
     2253module_eval <<'.,.,', 'lib/parser.y', 262
     2254  def _reduce_103( val, _values, result )
     2255    @@log.info("SYM_START_DBLOCK: #{val[0]} at #{@filename}:#{@lineno}")
     2256   result
     2257  end
     2258.,.,
    22532259
    22542260 # reduce 104 omitted
    … …  
    22562262 # reduce 105 omitted
    22572263
    2258  # reduce 106 omitted
    2259 
    2260 module_eval <<'.,.,', 'lib/parser.y', 269
     2264module_eval <<'.,.,', 'lib/parser.y', 270
     2265  def _reduce_106( val, _values, result )
     2266    @@log.info("#{__FILE__}:#{__LINE__}: keyed_object = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
     2267   result
     2268  end
     2269.,.,
     2270
     2271module_eval <<'.,.,', 'lib/parser.y', 275
    22612272  def _reduce_107( val, _values, result )
    22622273    @@log.info("object_key: [#{val[1]}] at #{@filename}:#{@lineno}")
    … …  
    22792290 # reduce 114 omitted
    22802291
    2281  # reduce 115 omitted
     2292module_eval <<'.,.,', 'lib/parser.y', 287
     2293  def _reduce_115( val, _values, result )
     2294    @@log.info("#{__FILE__}:#{__LINE__}: primitive_object_block = <#{val[2]}> at #{@filename}:#{@lineno}")
     2295   result
     2296  end
     2297.,.,
    22822298
    22832299 # reduce 116 omitted
    … …  
    22912307 # reduce 120 omitted
    22922308
    2293 module_eval <<'.,.,', 'lib/parser.y', 287
     2309module_eval <<'.,.,', 'lib/parser.y', 296
    22942310  def _reduce_121( val, _values, result )
    22952311    @@log.info("string_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    22982314.,.,
    22992315
    2300 module_eval <<'.,.,', 'lib/parser.y', 291
     2316module_eval <<'.,.,', 'lib/parser.y', 300
    23012317  def _reduce_122( val, _values, result )
    23022318    @@log.info("integer_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23052321.,.,
    23062322
    2307 module_eval <<'.,.,', 'lib/parser.y', 295
     2323module_eval <<'.,.,', 'lib/parser.y', 304
    23082324  def _reduce_123( val, _values, result )
    23092325    @@log.info("real_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23122328.,.,
    23132329
    2314 module_eval <<'.,.,', 'lib/parser.y', 299
     2330module_eval <<'.,.,', 'lib/parser.y', 308
    23152331  def _reduce_124( val, _values, result )
    23162332    @@log.info("boolean_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23192335.,.,
    23202336
    2321 module_eval <<'.,.,', 'lib/parser.y', 303
     2337module_eval <<'.,.,', 'lib/parser.y', 312
    23222338  def _reduce_125( val, _values, result )
    23232339    @@log.info("character_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23262342.,.,
    23272343
    2328 module_eval <<'.,.,', 'lib/parser.y', 307
     2344module_eval <<'.,.,', 'lib/parser.y', 316
    23292345  def _reduce_126( val, _values, result )
    23302346    @@log.info("date_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23332349.,.,
    23342350
    2335 module_eval <<'.,.,', 'lib/parser.y', 311
     2351module_eval <<'.,.,', 'lib/parser.y', 320
    23362352  def _reduce_127( val, _values, result )
    23372353    @@log.info("time_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23402356.,.,
    23412357
    2342 module_eval <<'.,.,', 'lib/parser.y', 315
     2358module_eval <<'.,.,', 'lib/parser.y', 324
    23432359  def _reduce_128( val, _values, result )
    23442360    @@log.info("date_time_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23472363.,.,
    23482364
    2349 module_eval <<'.,.,', 'lib/parser.y', 319
     2365module_eval <<'.,.,', 'lib/parser.y', 328
    23502366  def _reduce_129( val, _values, result )
    23512367    @@log.info("duration_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23542370.,.,
    23552371
    2356 module_eval <<'.,.,', 'lib/parser.y', 323
     2372module_eval <<'.,.,', 'lib/parser.y', 332
    23572373  def _reduce_130( val, _values, result )
    23582374    @@log.info("uri_value: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23912407 # reduce 145 omitted
    23922408
    2393 module_eval <<'.,.,', 'lib/parser.y', 344
     2409module_eval <<'.,.,', 'lib/parser.y', 353
    23942410  def _reduce_146( val, _values, result )
    23952411    @@log.info("V_TYPE_IDENTIFIER: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    23982414.,.,
    23992415
    2400 module_eval <<'.,.,', 'lib/parser.y', 348
     2416module_eval <<'.,.,', 'lib/parser.y', 357
    24012417  def _reduce_147( val, _values, result )
    24022418    @@log.info("V_GENERIC_TYPE_IDENTIFIER: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    24052421.,.,
    24062422
    2407 module_eval <<'.,.,', 'lib/parser.y', 353
     2423module_eval <<'.,.,', 'lib/parser.y', 362
    24082424  def _reduce_148( val, _values, result )
    24092425    @@log.info("V_STRING: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    25742590 # reduce 229 omitted
    25752591
    2576 module_eval <<'.,.,', 'lib/parser.y', 464
     2592module_eval <<'.,.,', 'lib/parser.y', 473
    25772593  def _reduce_230( val, _values, result )
    25782594    @@log.info("V_ISO8601_DURATION: #{val[0]} at #{@filename}:#{@lineno}")
    … …  
    26052621 # reduce 242 omitted
    26062622
    2607  # reduce 243 omitted
     2623module_eval <<'.,.,', 'lib/parser.y', 492
     2624  def _reduce_243( val, _values, result )
     2625    @@log.info("#{__FILE__}:#{__LINE__}: V_QUALIFIED_TERM_CODE_REF = #{val[0]} at #{@filename}:#{@lineno}")
     2626   result
     2627  end
     2628.,.,
    26082629
    26092630 # reduce 244 omitted
    … …  
    26132634 # reduce 246 omitted
    26142635
    2615  # reduce 247 omitted
     2636module_eval <<'.,.,', 'lib/parser.y', 501
     2637  def _reduce_247( val, _values, result )
     2638    @@log.info("#{__FILE__}:#{__LINE__}: V_URI = #{val[0]} at #{@filename}:#{@lineno}")
     2639   result
     2640  end
     2641.,.,
    26162642
    26172643 # reduce 248 omitted
    … …  
    26952721 # reduce 287 omitted
    26962722
    2697 module_eval <<'.,.,', 'lib/parser.y', 555
     2723module_eval <<'.,.,', 'lib/parser.y', 570
    26982724  def _reduce_288( val, _values, result )
    26992725    @@log.info("#{__FILE__}:#{__LINE__}, V_ATTRIBUTE_IDENTIFIER = #{val[0]} at #{@filename}")
    … …  
    27022728.,.,
    27032729
    2704 module_eval <<'.,.,', 'lib/parser.y', 559
     2730module_eval <<'.,.,', 'lib/parser.y', 574
    27052731  def _reduce_289( val, _values, result )
    27062732    @@log.info("#{__FILE__}:#{__LINE__}, V_ATTRIBUTE_IDENTIFIER = #{val[0]} at #{@filename}")
    … …  
    28592885 # reduce 364 omitted
    28602886
    2861  # reduce 365 omitted
     2887module_eval <<'.,.,', 'lib/parser.y', 694
     2888  def _reduce_365( val, _values, result )
     2889    @in_interval = false
     2890    @@log.info("#{__FILE__}:#{__LINE__}, #{val[0]}|#{val[2]} at #{@filename}")
     2891   result
     2892  end
     2893.,.,
    28622894
    28632895 # reduce 366 omitted
    … …  
    28772909 # reduce 373 omitted
    28782910
    2879 module_eval <<'.,.,', 'lib/parser.y', 697
     2911module_eval <<'.,.,', 'lib/parser.y', 716
    28802912  def _reduce_374( val, _values, result )
    28812913    @@log.info("#{__FILE__}:#{__LINE__}, V_ATTRIBUTE_IDENTIFIER = #{word} at #{@filename}")

  • ruby/trunk/adl_parser/lib/parser.y

    r19 r20  
    237237attr_val: attr_id SYM_EQ object_block
    238238  {
    239     @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[1]} at #{@filename}:#{@lineno}")
     239    @@log.info("#{__FILE__}:#{__LINE__}: attr_id = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
    240240  }
    241241
    … …  
    258258
    259259multiple_attr_object_block_head: SYM_START_DBLOCK
     260  {
     261    @@log.info("SYM_START_DBLOCK: #{val[0]} at #{@filename}:#{@lineno}")
     262  }
    260263
    261264keyed_objects: keyed_object
    … …  
    263266
    264267keyed_object: object_key SYM_EQ object_block
     268  {
     269    @@log.info("#{__FILE__}:#{__LINE__}: keyed_object = #{val[0]}, object_block = #{val[2]} at #{@filename}:#{@lineno}")
     270  }
    265271
    266272object_key: Left_bracket_code simple_value Right_bracket_code
    … …  
    277283  | type_identifier untyped_primitive_object_block
    278284untyped_primitive_object_block: SYM_START_DBLOCK primitive_object_value SYM_END_DBLOCK
     285  {
     286    @@log.info("#{__FILE__}:#{__LINE__}: primitive_object_block = <#{val[2]}> at #{@filename}:#{@lineno}")
     287  }
    279288primitive_object_value: simple_value
    280289  | simple_list_value
    … …  
    479488
    480489term_code: V_QUALIFIED_TERM_CODE_REF
     490  {
     491    @@log.info("#{__FILE__}:#{__LINE__}: V_QUALIFIED_TERM_CODE_REF = #{val[0]} at #{@filename}:#{@lineno}")
     492  }
    481493
    482494term_code_list_value: term_code Comma_code term_code
    … …  
    485497
    486498uri_value: V_URI
     499  {
     500    @@log.info("#{__FILE__}:#{__LINE__}: V_URI = #{val[0]} at #{@filename}:#{@lineno}")
     501  }
    487502
    488503
    … …  
    674689
    675690ordinal: integer_value SYM_INTERVAL_DELIM V_QUALIFIED_TERM_CODE_REF
     691  {
     692    @in_interval = false
     693    @@log.info("#{__FILE__}:#{__LINE__}, #{val[0]}|#{val[2]} at #{@filename}")
     694  }
    676695
    677696#c_code_phrase: V_TERM_CODE_CONSTRAINT #-- e.g. "[local::at0040, at0041; at0040]"
    … …  
    919938        if @in_interval
    920939          @in_interval = false
    921 #        elsif @start_block_received
    922940        else
    923941          @in_interval = true
    924 #          @start_block_received = false
    925942        end
    926943        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    … …  
    10971114        yield :Question_mark_code, :Question_mark_code
    10981115      when /\A\|/   # |
     1116        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
    10991117        if @in_interval
    11001118          @in_interval = false
    11011119        else
    1102           @in_interval = false
    1103 #          @in_interval = true
     1120#          @in_interval = false
     1121          @in_interval = true
    11041122        end
     1123        @@log.info("#{__FILE__}:#{__LINE__}: scan_cadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
    11051124        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    11061125
    … …  
    12261245        if @in_interval
    12271246          yield :SYM_LT, :SYM_LT
    1228 #        elsif
    12291247        else
    12301248          @adl_type.push(:dadl)
    … …  
    12331251      when /\A\>/   # >
    12341252        if @in_interval
    1235           @in_interval = false
     1253#          @in_interval = false
    12361254          yield :SYM_GT, :SYM_GT
    12371255        elsif @in_c_domain_type == true
    … …  
    12871305        yield :Question_mark_code, :Question_mark_code
    12881306      when /\A\|/   # |
     1307        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: @in_interval = #{@in_interval} at #{@filename}:#{@lineno}")
    12891308        if @in_interval
    12901309          @in_interval = false
    12911310        else
    1292           @in_interval = false
    1293 #          @in_interval = true
     1311#          @in_interval = false
     1312          @in_interval = true
    12941313        end
     1314        @@log.info("#{__FILE__}:#{__LINE__}: scan_dadl: SYM_INTERVAL_DELIM at #{@filename}:#{@lineno}")
    12951315        yield :SYM_INTERVAL_DELIM, :SYM_INTERVAL_DELIM
    12961316###       when /\A\[[a-zA-Z0-9()\._-]+::[a-zA-Z0-9\._-]+\]/   #V_QUALIFIED_TERM_CODE_REF form [ICD10AM(1998)::F23]

  • ruby/trunk/adl_parser/lib/scanner.rb

    r19 r20  
    114114            @parser = lambda do |input|
    115115              Yaparc::Apply.new(
    116                                 Yaparc::Alt.new(Yaparc::Regex.new(/\AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?T([0-9]+[hH])?([0-9]+[mM])?([0-9]+[sS])?/),
    117                                                 Yaparc::Regex.new(/AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?/))) do |match|
     116                                Yaparc::Alt.new(Yaparc::Regex.new(/\AP([0-9]+|[yY])?([0-9]+|[mM])?([0-9]+|[wW])?([0-9]+|[dD])?T([0-9]+|[hH])?([0-9]+|[mM])?([0-9]+|[sS])?/),
     117                                                Yaparc::Regex.new(/AP([0-9]+|[yY])?([0-9]+|[mM])?([0-9]+|[wW])?([0-9]+|[dD])?/))) do |match|
     118#                                 Yaparc::Alt.new(Yaparc::Regex.new(/\AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?T([0-9]+[hH])?([0-9]+[mM])?([0-9]+[sS])?/),
     119#                                                 Yaparc::Regex.new(/AP([0-9]+[yY])?([0-9]+[mM])?([0-9]+[wW])?([0-9]+[dD])?/))) do |match|
    118120                LOG.info("V_ISO8601_DURATION: #{match}")
    119121                [:V_ISO8601_DURATION, match]
    … …  
    255257                [:START_V_C_DOMAIN_TYPE_BLOCK, match]
    256258              end
    257 #               parser = Yaparc::Regex.new(/\A[A-Z][a-zA-Z0-9_]*[ \n]*\</)
    258 #               case result = parser.parse(input)
    259 #               when Yaparc::Result::OK
    260 #                 OpenEHR::ADL::Scanner::Common::LOG.info("V_C_DOMAIN_TYPE: #{result.value}")
    261 #                 Yaparc::Result::Fail.new
    262 #               else
    263 #                 Yaparc::Result::Fail.new
    264 #               end
    265259            end
    266260          end

  • ruby/trunk/adl_parser/tests/parser_test.rb

    r19 r20  
    1414
    1515  def test_parse
     16    laboratory_request = File.read('tests/openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl')
     17    assert_nothing_raised do
     18      @parser.parse(laboratory_request, 'openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl')
     19    end
     20
     21    apgar = File.read('tests/openEHR-EHR-OBSERVATION.apgar.v1.adl')
     22    assert_nothing_raised do
     23      result = @parser.parse(apgar, 'openEHR-EHR-OBSERVATION.apgar.v1.adl')
     24      #       assert_equal "", result
     25    end
     26
     27    evaluation = File.read('tests/openEHR-EHR-EVALUATION.adverse.v1.adl')
     28    assert_nothing_raised do
     29      @parser.parse(evaluation, 'openEHR-EHR-EVALUATION.adverse.v1.adl')
     30    end
     31
     32
     33#     medication = File.read('tests/openEHR-EHR-ITEM_TREE.medication.v1.adl')
     34#     assert_nothing_raised do
     35#       @parser.parse(medication, 'openEHR-EHR-ITEM_TREE.medication.v1.adl')
     36#     end
     37
     38    referral = File.read('tests/openEHR-EHR-ITEM_TREE.referral.v1.adl')
     39    assert_nothing_raised do
     40      @parser.parse(referral, 'openEHR-EHR-ITEM_TREE.referral.v1.adl')
     41    end
     42
     43    exam_fetus = File.read('tests/openEHR-EHR-CLUSTER.exam-fetus.v1.adl')
     44    assert_nothing_raised do
     45      @parser.parse(exam_fetus, 'openEHR-EHR-CLUSTER.exam-fetus.v1.adl')
     46    end
     47
     48    exam_uterine_cervix = File.read('tests/openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl')
     49    assert_nothing_raised do
     50      @parser.parse(exam_uterine_cervix, 'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl')
     51    end
     52
    1653    imaging = File.read('tests/openEHR-EHR-ACTION.imaging.v1.adl')
    1754    assert_nothing_raised do
    … …  
    63100      @parser.parse(summary, 'openEHR-EHR-SECTION.summary.v1.adl')
    64101    end
     102
    65103    findings = File.read('tests/openEHR-EHR-SECTION.findings.v1.adl')
    66104    assert_nothing_raised do
    67105      @parser.parse(findings, 'openEHR-EHR-SECTION.findings.v1.adl')
    68106    end
     107
     108    reason_for_encounter = File.read('tests/openEHR-EHR-SECTION.reason_for_encounter.v1.adl')
     109    assert_nothing_raised do
     110      @parser.parse(reason_for_encounter, 'openEHR-EHR-SECTION.reason_for_encounter.v1.adl')
     111    end
     112
    69113    imaging = File.read('tests/openEHR-EHR-ITEM_TREE.imaging.v1.adl')
    70114    assert_nothing_raised do
    71115      @parser.parse(imaging, 'openEHR-EHR-ITEM_TREE.imaging.v1.adl')
    72     end
    73     reason_for_encounter = File.read('tests/openEHR-EHR-SECTION.reason_for_encounter.v1.adl')
    74     assert_nothing_raised do
    75       @parser.parse(reason_for_encounter, 'openEHR-EHR-SECTION.reason_for_encounter.v1.adl')
    76116    end
    77117    instruction_referral = File.read('tests/openEHR-EHR-INSTRUCTION.referral.v1.adl')
    … …  
    92132      @parser.parse(dimensions_circumference, 'openEHR-EHR-CLUSTER.dimensions.v1.adl')
    93133    end
     134
    94135    discharge = File.read('tests/openEHR-EHR-COMPOSITION.discharge.v1draft.adl')
    95136    assert_nothing_raised do
    96137      @parser.parse(discharge, 'openEHR-EHR-COMPOSITION.discharge.v1draft.adl')
    97138    end
    98      laboratory_request = File.read('tests/openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl')
    99      assert_nothing_raised do
    100        @parser.parse(laboratory_request, 'openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl')
    101      end
    102      apgar = File.read('tests/openEHR-EHR-OBSERVATION.apgar.v1.adl')
    103      assert_nothing_raised do
    104        result = @parser.parse(apgar, 'openEHR-EHR-OBSERVATION.apgar.v1.adl')
    105 #       assert_equal "", result
    106      end
    107 #     evaluation = File.read('tests/openEHR-EHR-EVALUATION.adverse.v1.adl')
    108 #     assert_nothing_raised do
    109 #       @parser.parse(evaluation, 'openEHR-EHR-EVALUATION.adverse.v1.adl')
    110 #     end
    111      encounter = File.read('tests/openEHR-EHR-COMPOSITION.encounter.v1draft.adl')
    112      assert_nothing_raised do
    113        @parser.parse(encounter, 'openEHR-EHR-COMPOSITION.encounter.v1draft.adl')
    114      end
    115 #      medication = File.read('tests/openEHR-EHR-ITEM_TREE.medication.v1.adl')
    116 #      assert_nothing_raised do
    117 #        @parser.parse(medication, 'openEHR-EHR-ITEM_TREE.medication.v1.adl')
    118 #      end
    119 #       referral = File.read('tests/openEHR-EHR-ITEM_TREE.referral.v1.adl')
    120 #       assert_nothing_raised do
    121 #         @parser.parse(referral, 'openEHR-EHR-ITEM_TREE.referral.v1.adl')
    122 #       end
    123       exam_fetus = File.read('tests/openEHR-EHR-CLUSTER.exam-fetus.v1.adl')
    124       assert_nothing_raised do
    125         @parser.parse(exam_fetus, 'openEHR-EHR-CLUSTER.exam-fetus.v1.adl')
    126       end
    127      exam_uterine_cervix = File.read('tests/openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl')
    128      assert_nothing_raised do
    129        @parser.parse(exam_uterine_cervix, 'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl')
    130      end
     139
     140    encounter = File.read('tests/openEHR-EHR-COMPOSITION.encounter.v1draft.adl')
     141    assert_nothing_raised do
     142      @parser.parse(encounter, 'openEHR-EHR-COMPOSITION.encounter.v1draft.adl')
     143    end
     144
    131145
    132146  end

  • ruby/trunk/adl_parser/tests/scanner_test.rb

    r19 r20  
    5050    result = parser.parse('PT1M')
    5151    assert_instance_of Yaparc::Result::OK, result
     52    result = parser.parse('PYMWDTHMS')
     53    assert_instance_of Yaparc::Result::OK, result
     54    assert_equal [:V_ISO8601_DURATION, "PYMWDTHMS"], result.value
    5255  end
    5356
    … …  
    8891    assert_instance_of Yaparc::Result::OK, result
    8992    assert_equal [:V_ISO8601_DURATION, "PT1M"], result.value
     93    result = parser.parse('PYMWDTHMS')
     94    assert_instance_of Yaparc::Result::OK, result
     95    assert_equal [:V_ISO8601_DURATION, "PYMWDTHMS"], result.value
    9096  end
    9197
Note: See TracChangeset for help on using the changeset viewer.