Changeset 307 for ruby/trunk/lib/adl_parser/test

Timestamp:

Sep 27, 2009, 9:24:19 PM (15 years ago)

Author:

Tatsukawa, Akimichi

Message:

ADL parser is roughly coupled with open_ehr model classes

Location:

ruby/trunk/lib/adl_parser/test

Files:

• dadl_embedded_cadl.dadl (deleted)
• dadl_line_break.dadl (deleted)
• parser_test.rb (modified) (27 diffs)
• scanner_test.rb (modified) (4 diffs)
• shell_test.rb (modified) (1 diff)
• test_helper.rb (modified) (1 diff)
• validator_test.rb (modified) (1 diff)

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

@@ -3 +3 @@
 class ADLParserTest < Test::Unit::TestCase
   def setup
-    @parser = ::OpenEHR::ADL::Parser.new
+    @parser = ::OpenEhr::ADL::Parser.new
   end
 
   must "assert parser instance" do
-    assert_instance_of ::OpenEHR::ADL::Parser,@parser
-  end
-
-  must "test_archetype_id.adl be properly parsed" do
-    file =  File.read("#{TEST_ROOT_DIR}/adl/test_archetype_id.adl")
+    assert_instance_of ::OpenEhr::ADL::Parser,@parser
+  end
+
+  must "openEHR-EHR-SECTION.summary.v1.adl be properly parsed" do
+    file =  File.read("#{TEST_ROOT_DIR}/adl/openEHR-EHR-SECTION.summary.v1.adl")
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-SECTION.summary.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -22 +22 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-ACTION.imaging.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -30 +30 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-ACTION.referral.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -38 +38 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation-chest.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -46 +46 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.auscultation.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -55 +55 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-abdomen.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -63 +63 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-chest.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -71 +71 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-joint.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -79 +79 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-lymphnode.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -87 +87 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic-mass.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -95 +95 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-generic.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -103 +103 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-nervous_system.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -111 +111 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.discharge.v1draft')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -119 +119 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-COMPOSITION.encounter.v1draft')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -127 +127 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.medication.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -135 +135 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-INSTRUCTION.referral.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -143 +143 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-ITEM_TREE.Laboratory_request.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -152 +152 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-OBSERVATION.apgar.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -160 +160 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-SECTION.findings.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -168 +168 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-SECTION.reason_for_encounter.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -177 +177 @@
     assert_nothing_raised do
       ast = @parser.parse(file, 'openEHR-EHR-SECTION.vital_signs.v1')
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
     end
   end
@@ -187 +187 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions-circumference.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end
@@ -195 +195 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.dimensions.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end
@@ -203 +203 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-fetus.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end
@@ -211 +211 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-CLUSTER.exam-uterine_cervix.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end
@@ -219 +219 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-EVALUATION.adverse.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end
@@ -226 +226 @@
 #     assert_nothing_raised do
 #       ast = @parser.parse(file, 'openEHR-EHR-OBSERVATION.body_mass_index.v1')
-#       assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID, ast.archetype_id
+#       assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID, ast.archetype_id
 #     end
 #   end

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

@@ -3 +3 @@
 class ADLScannerTest < Test::Unit::TestCase
   def setup
-    @scanner = OpenEHR::ADL::Scanner::ADLScanner.new([:adl], "filename")
+    @scanner = OpenEhr::ADL::Scanner::ADLScanner.new([:adl], "filename")
   end
 
-  must "assert OpenEHR::ADL::Scanner::ADLScanner scanner instance" do
-    assert_instance_of OpenEHR::ADL::Scanner::ADLScanner, @scanner
+  must "assert OpenEhr::ADL::Scanner::ADLScanner scanner instance" do
+    assert_instance_of OpenEhr::ADL::Scanner::ADLScanner, @scanner
   end
 
@@ -20 +20 @@
     @scanner.scan("openEHR-EHR-OBSERVATION.body_mass_index.v1") do |sym, val|
       assert_equal :V_ARCHETYPE_ID,sym
-      assert_instance_of OpenEHR::RM::Support::Identification::Archetype_ID,val
+      assert_instance_of OpenEhr::RM::Support::Identification::ArchetypeID,val
     end
   end
@@ -40 +40 @@
 class CADLScannerTest < Test::Unit::TestCase
   def setup
-    @scanner = OpenEHR::ADL::Scanner::CADLScanner.new([:cadl], "filename")
+    @scanner = OpenEhr::ADL::Scanner::CADLScanner.new([:cadl], "filename")
   end
 
-  must "assert OpenEHR::ADL::Scanner::CADLScanner scanner instance" do
-    assert_instance_of OpenEHR::ADL::Scanner::CADLScanner, @scanner
+  must "assert OpenEhr::ADL::Scanner::CADLScanner scanner instance" do
+    assert_instance_of OpenEhr::ADL::Scanner::CADLScanner, @scanner
   end
 
@@ -80 +80 @@
 class DADLScannerTest < Test::Unit::TestCase
   def setup
-    @scanner = OpenEHR::ADL::Scanner::DADLScanner.new([:dadl], "filename")
+    @scanner = OpenEhr::ADL::Scanner::DADLScanner.new([:dadl], "filename")
   end
 

ruby/trunk/lib/adl_parser/test/shell_test.rb

@@ -3 +3 @@
 class ShellADLValidatorTest < Test::Unit::TestCase
   def setup
-    @adl_validator = ::OpenEHR::Application::ADLValidator.new(::OpenEHR::ADL::Validator.new(::OpenEHR::ADL::Parser.new))
+    @adl_validator = ::OpenEhr::Application::ADLValidator.new(::OpenEhr::ADL::Validator.new(::OpenEhr::ADL::Parser.new))
   end
 
   must "assert application validator instance" do
-    assert_instance_of ::OpenEHR::Application::ADLValidator,@adl_validator
+    assert_instance_of ::OpenEhr::Application::ADLValidator,@adl_validator
   end
 

ruby/trunk/lib/adl_parser/test/test_helper.rb

@@ -5 +5 @@
 require "rubygems"
 require 'adl_parser.rb'
-require 'adl_scanner.rb'
-require 'rm.rb'
-require 'am.rb'
+#require 'adl_scanner.rb'
+#require 'open_ehr'
+#require 'rm.rb'
+#require 'am.rb'
 
 

ruby/trunk/lib/adl_parser/test/validator_test.rb

@@ -4 +4 @@
 class ADLValidatorTest < Test::Unit::TestCase
   def setup
-    @validator = ::OpenEHR::ADL::Validator.new(::OpenEHR::ADL::Parser.new)
+    @validator = ::OpenEhr::ADL::Validator.new(::OpenEhr::ADL::Parser.new)
   end
 
   must "assert adl validator instance" do
-    assert_instance_of ::OpenEHR::ADL::Validator,@validator
+    assert_instance_of ::OpenEhr::ADL::Validator,@validator
   end