Changeset 320 for ruby/trunk/lib/adl_parser/test/scanner_test.rb

Timestamp:

Oct 15, 2009, 7:28:12 AM (15 years ago)

Author:

Tatsukawa, Akimichi

Message:

refactoring scanner for regex

File:

• ruby/trunk/lib/adl_parser/test/scanner_test.rb (modified) (3 diffs)

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

@@ -74 +74 @@
   end
 
+  must "assert CADLScanner scanner scan V_STRING" do
+    @scanner.scan("\"string\"") do |sym, val|
+      assert_equal :V_STRING,sym
+      assert_equal "string",val
+    end
+    @scanner.scan("\"1605E211E9BFB4093A72CCE7A9792FF9\"") do |sym, val|
+      assert_equal :V_STRING,sym
+      assert_equal "1605E211E9BFB4093A72CCE7A9792FF9",val
+    end
+  end
+
   must "assert CADLScanner scanner scan V_QUALIFIED_TERM_CODE_REF" do
     @scanner.scan("[ICD10AM(1998)::F23]") do |sym, val|
       assert_equal :V_QUALIFIED_TERM_CODE_REF,sym
       assert_equal "ICD10AM(1998)::F23",val
+    end
+  end
+
+
+  must "assert CADLScanner scanner scan V_ISO8601_DURATION_CONSTRAINT_PATTERN" do
+    @scanner.scan("PW") do |sym, val|
+      assert_equal :V_ISO8601_DURATION_CONSTRAINT_PATTERN,sym
+      assert_equal "PW",val
+    end
+    @scanner.scan("PTs") do |sym, val|
+      assert_equal :V_ISO8601_DURATION_CONSTRAINT_PATTERN,sym
+      assert_equal "PTs",val
     end
   end
@@ -89 +112 @@
     @scanner.scan("P1D") do |sym, val|
       assert_equal :V_ISO8601_DURATION,sym
-      assert_equal "PT1M",val
+      assert_equal "P1D",val
+    end
+
+    @scanner.scan("PT1H30M") do |sym, val|
+      assert_equal :V_ISO8601_DURATION,sym
+      assert_equal "PT1H30M",val
     end
   end
 
-  must "assert CADLScanner scanner scan V_STRING" do
-    @scanner.scan("\"string\"") do |sym, val|
-      assert_equal :V_STRING,sym
-      assert_equal "string",val
-    end
-    @scanner.scan("\"1605E211E9BFB4093A72CCE7A9792FF9\"") do |sym, val|
-      assert_equal :V_STRING,sym
-      assert_equal "1605E211E9BFB4093A72CCE7A9792FF9",val
+  must "assert CADLScanner scanner scan V_ISO8601_EXTENDED_DATE_TIME" do
+    @scanner.scan("2000-01-01T01:00:00") do |sym, val|
+      assert_equal :V_ISO8601_EXTENDED_DATE_TIME,sym
+      assert_equal "2000-01-01T01:00:00",val
     end
   end
 
-  must "assert CADLScanner scanner scan V_ISO8601_DURATION_CONSTRAINT_PATTERN" do
-    @scanner.scan("PW") do |sym, val|
-      assert_equal :V_ISO8601_DURATION_CONSTRAINT_PATTERN,sym
-      assert_equal "PW",val
-    end
-  end
 end
 
@@ -155 +173 @@
   end
 end
+
+class RegexScannerTest < Test::Unit::TestCase
+  def setup
+    @scanner = OpenEhr::ADL::Scanner::RegexScanner.new([:regexp], "filename")
+  end
+
+  must "assert RegexScanner scanner scan " do
+    @scanner.scan("this|that|something else") do |sym, val|
+      assert_equal :REGEXP_BODY,sym
+      assert_equal "this|that|something else",val
+    end
+  end
+end