Changeset 315 for ruby/trunk


Ignore:
Timestamp:
Oct 12, 2009, 3:56:13 PM (15 years ago)
Author:
Tatsukawa, Akimichi
Message:

adl_scanner should properly change cADL or dADL scanners

Location:
ruby/trunk/lib/adl_parser
Files:
4 edited

Legend:

Unmodified
Added
Removed

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

    r314 r315  
    271271                ;
    272272              when /\A[ \t\r\f]+/ #just drop it
    273                 #@@logger.debug("DADLScanner#scan:  white space, data = #{data.inspect}")
     273                ##@@logger.debug("DADLScanner#scan:  white space, data = #{data.inspect}")
    274274                ;
    275275              when /\A--.*/ # single line comment
    276 #                @lineno += 1
    277276                @@logger.debug("DADLScanner#scan: COMMENT = #{$&} at #{@filename}:#{@lineno}")
    278277                ;
    … …  
    399398                @@logger.debug("DADLScanner#scan: V_STRING, #{$1}")
    400399                yield :V_STRING, $1
     400              when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ /   #V_REAL
     401                yield :V_REAL, $&
    401402              when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/   #V_INTEGER
    402403                @@logger.debug("DADLScanner#scan: V_INTEGER = #{$&}")
    … …  
    631632              when /\A[0-9]{4}-[0-1][0-9]-[0-3][0-9]|[0-9]{4}-[0-1][0-9]/   #V_ISO8601_EXTENDED_DATE YYYY-MM-DD
    632633                yield :V_ISO8601_EXTENDED_DATE, $&
    633               when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/   #V_INTEGER
    634                 @@logger.debug("CADLScanner#scan: V_INTEGER = #{$&}")
    635                 yield :V_INTEGER, $&
    636               when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ /   #V_REAL
    637                 yield :V_REAL, $&
    638634              when /\A"((?:[^"\\]+|\\.)*)"/ #V_STRING
    639635                yield :V_STRING, $1
    640636              when /\A"([^"]*)"/m #V_STRING
    641637                yield :V_STRING, $1
     638              when /\A[0-9]+\.[0-9]+|[0-9]+\.[0-9]+[eE][+-]?[0-9]+ /   #V_REAL
     639                yield :V_REAL, $&
     640              when /\A[0-9]+|[0-9]+[eE][+-]?[0-9]+/   #V_INTEGER
     641                @@logger.debug("CADLScanner#scan: V_INTEGER = #{$&}")
     642                yield :V_INTEGER, $&
    642643              when /\A[a-z]+:\/\/[^<>|\\{}^~"\[\] ]*/ #V_URI
    643644                yield :V_URI, $&

  • ruby/trunk/lib/adl_parser/test/adl/openEHR-EHR-OBSERVATION.body_mass_index.v1.adl

    r257 r315  
    1 archetype (adl_version=1.4)
     1archetype (adl_version=1.4)
    22    openEHR-EHR-OBSERVATION.body_mass_index.v1
    33
    … …  
    4242Obesity: Preventing and Managing the Global Epidemic: Report of a WHO Consultation [Internet]. Geneva, Switzerland: World Health Organisation; 2000 [cited 2009 Jul 28]. Available from: http://www.who.int/nutrition/publications/obesity/WHO_TRS_894/en/index.html
    4343
    44 Tzamaloukas AH, Patron A, Malhotra D. Body Mass Index in Amputees. Journal of Parenteral and Enteral Nutrition [Internet]. 1994 [cited 2009 Jul 28]; 18 (4): 355. Available from: http://pen.sagepub.com/cgi/content/abstract/18/4/355">
    45        >
     44Tzamaloukas AH, Patron A, Malhotra D. Body Mass Index in Amputees. Journal of Parenteral and Enteral Nutrition [Internet]. 1994 [cited 2009 Jul 28]; 18 (4): 355. Available from: http://pen.sagepub.com/cgi/content/abstract/18/4/355 
     45
     46
     47
     48">
     49    >
    4650
    4751definition

  • ruby/trunk/lib/adl_parser/test/parser_test.rb

    r314 r315  
    66  end
    77
    8   must "assert parser instance" do
    9     assert_instance_of ::OpenEhr::ADL::Parser,@parser
    10   end
    11 
    12   must "openEHR-EHR-SECTION.summary.v1.adl be properly parsed" do
    13     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.summary.v1.adl")
    14     assert_nothing_raised do
    15       ast = @parser.parse(file, 'openEHR-EHR-SECTION.summary.v1')
    16       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    17     end
    18   end
    19 
    20   must "openEHR-EHR-ACTION.imaging.v1.adl be properly parsed" do
    21     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ACTION.imaging.v1.adl")
    22     assert_nothing_raised do
    23       ast = @parser.parse(file, 'openEHR-EHR-ACTION.imaging.v1')
    24       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    25     end
    26   end
    27 
    28   must "openEHR-EHR-ACTION.referral.v1.adl be properly parsed" do
    29     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ACTION.referral.v1.adl")
    30     assert_nothing_raised do
    31       ast = @parser.parse(file, 'openEHR-EHR-ACTION.referral.v1')
    32       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    33     end
    34   end
    35 
    36   must "openEHR-EHR-CLUSTER.auscultation-chest.v1.adl be properly parsed" do
    37     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.auscultation-chest.v1.adl")
    38     assert_nothing_raised do
    39       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation-chest.v1')
    40       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    41     end
    42   end
    43 
    44   must "openEHR-EHR-CLUSTER.auscultation.v1.adl be properly parsed" do
    45     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.auscultation.v1.adl")
    46     assert_nothing_raised do
    47       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation.v1')
    48       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    49     end
    50   end
    51 
    52 
    53   must "openEHR-EHR-CLUSTER.exam-abdomen.v1.adl be properly parsed" do
    54     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-abdomen.v1.adl")
    55     assert_nothing_raised do
    56       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-abdomen.v1')
    57       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    58     end
    59   end
    60 
    61   must "openEHR-EHR-CLUSTER.exam-chest.v1.adl be properly parsed" do
    62     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-chest.v1.adl")
    63     assert_nothing_raised do
    64       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-chest.v1')
    65       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    66     end
    67   end
    68 
    69   must "openEHR-EHR-CLUSTER.exam-generic-joint.v1.adl be properly parsed" do
    70     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-joint.v1.adl")
    71     assert_nothing_raised do
    72       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-joint.v1')
    73       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    74     end
    75   end
    76 
    77   must "openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1.adl be properly parsed" do
    78     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1.adl")
    79     assert_nothing_raised do
    80       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1')
    81       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    82     end
    83   end
    84 
    85   must "openEHR-EHR-CLUSTER.exam-generic-mass.v1.adl be properly parsed" do
    86     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-mass.v1.adl")
    87     assert_nothing_raised do
    88       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-mass.v1')
    89       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    90     end
    91   end
    92 
    93   must "openEHR-EHR-CLUSTER.exam-generic.v1.adl be properly parsed" do
    94     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic.v1.adl")
    95     assert_nothing_raised do
    96       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic.v1')
    97       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    98     end
    99   end
    100 
    101   must "openEHR-EHR-CLUSTER.exam-nervous_system.v1.adl be properly parsed" do
    102     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-nervous_system.v1.adl")
    103     assert_nothing_raised do
    104       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-nervous_system.v1')
    105       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    106     end
    107   end
    108 
    109   must "openEHR-EHR-COMPOSITION.discharge.v1draft.adl be properly parsed" do
    110     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-COMPOSITION.discharge.v1draft.adl")
    111     assert_nothing_raised do
    112       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.discharge.v1draft')
    113       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    114     end
    115   end
    116 
    117   must "openEHR-EHR-COMPOSITION.encounter.v1draft.adl be properly parsed" do
    118     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-COMPOSITION.encounter.v1draft.adl")
    119     assert_nothing_raised do
    120       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.encounter.v1draft')
    121       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    122     end
    123   end
    124 
    125   must "openEHR-EHR-INSTRUCTION.medication.v1.adl be properly parsed" do
    126     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-INSTRUCTION.medication.v1.adl")
    127     assert_nothing_raised do
    128       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.medication.v1')
    129       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    130     end
    131   end
    132 
    133   must "openEHR-EHR-INSTRUCTION.referral.v1.adl be properly parsed" do
    134     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-INSTRUCTION.referral.v1.adl")
    135     assert_nothing_raised do
    136       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.referral.v1')
    137       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    138     end
    139   end
    140 
    141   must "openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl be properly parsed" do
    142     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl")
    143     assert_nothing_raised do
    144       ast = @parser.parse(file, 'openEHR-EHR-ITEM_TREE.Laboratory_request.v1')
    145       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    146     end
    147   end
    148 
    149 
    150   must "openEHR-EHR-OBSERVATION.apgar.v1.adl be properly parsed" do
    151     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-OBSERVATION.apgar.v1.adl")
    152     assert_nothing_raised do
    153       ast = @parser.parse(file, 'openEHR-EHR-OBSERVATION.apgar.v1')
    154       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    155     end
    156   end
    157 
    158   must "openEHR-EHR-SECTION.findings.v1.adl be properly parsed" do
    159     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.findings.v1.adl")
    160     assert_nothing_raised do
    161       ast = @parser.parse(file, 'openEHR-EHR-SECTION.findings.v1')
    162       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    163     end
    164   end
    165 
    166   must "openEHR-EHR-SECTION.reason_for_encounter.v1.adl be properly parsed" do
    167     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.reason_for_encounter.v1.adl")
    168     assert_nothing_raised do
    169       ast = @parser.parse(file, 'openEHR-EHR-SECTION.reason_for_encounter.v1')
    170       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    171     end
    172   end
    173 
    174 
    175   must "openEHR-EHR-SECTION.vital_signs.v1.adl be properly parsed" do
    176     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.vital_signs.v1.adl")
    177     assert_nothing_raised do
    178       ast = @parser.parse(file, 'openEHR-EHR-SECTION.vital_signs.v1')
    179       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    180     end
    181   end
    182 
    183 
    184 # C_DV_QUANTITY parse error
    185   must "openEHR-EHR-CLUSTER.dimensions-circumference.v1.adl be properly parsed" do
    186     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.dimensions-circumference.v1.adl")
    187     assert_nothing_raised do
    188       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions-circumference.v1')
    189       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    190     end
    191   end
    192 
    193   must "openEHR-EHR-CLUSTER.dimensions.v1.adl be properly parsed" do
    194     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.dimensions.v1.adl")
    195     assert_nothing_raised do
    196       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions.v1')
    197       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    198     end
    199   end
    200 
    201   must "openEHR-EHR-CLUSTER.exam-fetus.v1.adl be properly parsed" do
    202     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-fetus.v1.adl")
    203     assert_nothing_raised do
    204       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-fetus.v1')
    205       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    206     end
    207   end
    208 
    209   must "openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl be properly parsed" do
    210     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl")
    211     assert_nothing_raised do
    212       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1')
    213       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    214     end
    215   end
    216 
    217   must "openEHR-EHR-EVALUATION.adverse.v1.adl be properly parsed" do
    218     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-EVALUATION.adverse.v1.adl")
    219     assert_nothing_raised do
    220       ast = @parser.parse(file, 'openEHR-EHR-EVALUATION.adverse.v1')
    221       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
    222     end
    223   end
     8#   must "assert parser instance" do
     9#     assert_instance_of ::OpenEhr::ADL::Parser,@parser
     10#   end
     11
     12#   must "openEHR-EHR-SECTION.summary.v1.adl be properly parsed" do
     13#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.summary.v1.adl")
     14#     assert_nothing_raised do
     15#       ast = @parser.parse(file, 'openEHR-EHR-SECTION.summary.v1')
     16#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     17#     end
     18#   end
     19
     20#   must "openEHR-EHR-ACTION.imaging.v1.adl be properly parsed" do
     21#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ACTION.imaging.v1.adl")
     22#     assert_nothing_raised do
     23#       ast = @parser.parse(file, 'openEHR-EHR-ACTION.imaging.v1')
     24#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     25#     end
     26#   end
     27
     28#   must "openEHR-EHR-ACTION.referral.v1.adl be properly parsed" do
     29#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ACTION.referral.v1.adl")
     30#     assert_nothing_raised do
     31#       ast = @parser.parse(file, 'openEHR-EHR-ACTION.referral.v1')
     32#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     33#     end
     34#   end
     35
     36#   must "openEHR-EHR-CLUSTER.auscultation-chest.v1.adl be properly parsed" do
     37#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.auscultation-chest.v1.adl")
     38#     assert_nothing_raised do
     39#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation-chest.v1')
     40#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     41#     end
     42#   end
     43
     44#   must "openEHR-EHR-CLUSTER.auscultation.v1.adl be properly parsed" do
     45#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.auscultation.v1.adl")
     46#     assert_nothing_raised do
     47#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation.v1')
     48#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     49#     end
     50#   end
     51
     52
     53#   must "openEHR-EHR-CLUSTER.exam-abdomen.v1.adl be properly parsed" do
     54#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-abdomen.v1.adl")
     55#     assert_nothing_raised do
     56#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-abdomen.v1')
     57#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     58#     end
     59#   end
     60
     61#   must "openEHR-EHR-CLUSTER.exam-chest.v1.adl be properly parsed" do
     62#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-chest.v1.adl")
     63#     assert_nothing_raised do
     64#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-chest.v1')
     65#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     66#     end
     67#   end
     68
     69#   must "openEHR-EHR-CLUSTER.exam-generic-joint.v1.adl be properly parsed" do
     70#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-joint.v1.adl")
     71#     assert_nothing_raised do
     72#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-joint.v1')
     73#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     74#     end
     75#   end
     76
     77#   must "openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1.adl be properly parsed" do
     78#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1.adl")
     79#     assert_nothing_raised do
     80#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1')
     81#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     82#     end
     83#   end
     84
     85#   must "openEHR-EHR-CLUSTER.exam-generic-mass.v1.adl be properly parsed" do
     86#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic-mass.v1.adl")
     87#     assert_nothing_raised do
     88#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-mass.v1')
     89#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     90#     end
     91#   end
     92
     93#   must "openEHR-EHR-CLUSTER.exam-generic.v1.adl be properly parsed" do
     94#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-generic.v1.adl")
     95#     assert_nothing_raised do
     96#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic.v1')
     97#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     98#     end
     99#   end
     100
     101#   must "openEHR-EHR-CLUSTER.exam-nervous_system.v1.adl be properly parsed" do
     102#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-nervous_system.v1.adl")
     103#     assert_nothing_raised do
     104#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-nervous_system.v1')
     105#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     106#     end
     107#   end
     108
     109#   must "openEHR-EHR-COMPOSITION.discharge.v1draft.adl be properly parsed" do
     110#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-COMPOSITION.discharge.v1draft.adl")
     111#     assert_nothing_raised do
     112#       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.discharge.v1draft')
     113#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     114#     end
     115#   end
     116
     117#   must "openEHR-EHR-COMPOSITION.encounter.v1draft.adl be properly parsed" do
     118#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-COMPOSITION.encounter.v1draft.adl")
     119#     assert_nothing_raised do
     120#       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.encounter.v1draft')
     121#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     122#     end
     123#   end
     124
     125#   must "openEHR-EHR-INSTRUCTION.medication.v1.adl be properly parsed" do
     126#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-INSTRUCTION.medication.v1.adl")
     127#     assert_nothing_raised do
     128#       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.medication.v1')
     129#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     130#     end
     131#   end
     132
     133#   must "openEHR-EHR-INSTRUCTION.referral.v1.adl be properly parsed" do
     134#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-INSTRUCTION.referral.v1.adl")
     135#     assert_nothing_raised do
     136#       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.referral.v1')
     137#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     138#     end
     139#   end
     140
     141#   must "openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl be properly parsed" do
     142#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-ITEM_TREE.Laboratory_request.v1.adl")
     143#     assert_nothing_raised do
     144#       ast = @parser.parse(file, 'openEHR-EHR-ITEM_TREE.Laboratory_request.v1')
     145#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     146#     end
     147#   end
     148
     149
     150#   must "openEHR-EHR-OBSERVATION.apgar.v1.adl be properly parsed" do
     151#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-OBSERVATION.apgar.v1.adl")
     152#     assert_nothing_raised do
     153#       ast = @parser.parse(file, 'openEHR-EHR-OBSERVATION.apgar.v1')
     154#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     155#     end
     156#   end
     157
     158#   must "openEHR-EHR-SECTION.findings.v1.adl be properly parsed" do
     159#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.findings.v1.adl")
     160#     assert_nothing_raised do
     161#       ast = @parser.parse(file, 'openEHR-EHR-SECTION.findings.v1')
     162#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     163#     end
     164#   end
     165
     166#   must "openEHR-EHR-SECTION.reason_for_encounter.v1.adl be properly parsed" do
     167#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.reason_for_encounter.v1.adl")
     168#     assert_nothing_raised do
     169#       ast = @parser.parse(file, 'openEHR-EHR-SECTION.reason_for_encounter.v1')
     170#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     171#     end
     172#   end
     173
     174
     175#   must "openEHR-EHR-SECTION.vital_signs.v1.adl be properly parsed" do
     176#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.vital_signs.v1.adl")
     177#     assert_nothing_raised do
     178#       ast = @parser.parse(file, 'openEHR-EHR-SECTION.vital_signs.v1')
     179#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     180#     end
     181#   end
     182
     183
     184# # C_DV_QUANTITY parse error
     185#   must "openEHR-EHR-EVALUATION.adverse.v1.adl be properly parsed" do
     186#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-EVALUATION.adverse.v1.adl")
     187#     assert_nothing_raised do
     188#       ast = @parser.parse(file, 'openEHR-EHR-EVALUATION.adverse.v1')
     189#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     190#     end
     191#   end
     192
     193#   must "openEHR-EHR-CLUSTER.dimensions-circumference.v1.adl be properly parsed" do
     194#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.dimensions-circumference.v1.adl")
     195#     assert_nothing_raised do
     196#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions-circumference.v1')
     197#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     198#     end
     199#   end
     200
     201#   must "openEHR-EHR-CLUSTER.dimensions.v1.adl be properly parsed" do
     202#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.dimensions.v1.adl")
     203#     assert_nothing_raised do
     204#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions.v1')
     205#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     206#     end
     207#   end
     208
     209#   must "openEHR-EHR-CLUSTER.exam-fetus.v1.adl be properly parsed" do
     210#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-fetus.v1.adl")
     211#     assert_nothing_raised do
     212#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-fetus.v1')
     213#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     214#     end
     215#   end
     216
     217#   must "openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl be properly parsed" do
     218#     file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-CLUSTER.exam-uterine_cervix.v1.adl")
     219#     assert_nothing_raised do
     220#       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1')
     221#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     222#     end
     223#   end
     224
    224225  must "openEHR-EHR-OBSERVATION.body_mass_index.v1.adl be properly parsed" do
    225226    file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-OBSERVATION.body_mass_index.v1.adl")

  • ruby/trunk/lib/adl_parser/test/scanner_test.rb

    r307 r315  
    3434      assert_equal :V_QUALIFIED_TERM_CODE_REF,sym
    3535      assert_equal "ICD10AM(1998)::F23",val
     36    end
     37  end
     38
     39  must "assert ADLScanner scanner scan V_STRING" do
     40    @scanner.scan("\"string\"") do |sym, val|
     41      assert_equal :V_STRING,sym
     42      assert_equal "string",val
     43    end
     44    @scanner.scan("\"1605E211E9BFB4093A72CCE7A9792FF9\"") do |sym, val|
     45      assert_equal :V_STRING,sym
     46      assert_equal "1605E211E9BFB4093A72CCE7A9792FF9",val
    3647    end
    3748  end
    … …  
    7687    end
    7788  end
     89
     90  must "assert CADLScanner scanner scan V_STRING" do
     91    @scanner.scan("\"string\"") do |sym, val|
     92      assert_equal :V_STRING,sym
     93      assert_equal "string",val
     94    end
     95    @scanner.scan("\"1605E211E9BFB4093A72CCE7A9792FF9\"") do |sym, val|
     96      assert_equal :V_STRING,sym
     97      assert_equal "1605E211E9BFB4093A72CCE7A9792FF9",val
     98    end
     99  end
    78100end
    79101
    … …  
    102124      assert_equal "string",val
    103125    end
     126    @scanner.scan("\"1605E211E9BFB4093A72CCE7A9792FF9\"") do |sym, val|
     127      assert_equal :V_STRING,sym
     128      assert_equal "1605E211E9BFB4093A72CCE7A9792FF9",val
     129    end
    104130  end
    105131end
Note: See TracChangeset for help on using the changeset viewer.