test/test_basic_parsing.rb in ruby-hl7-0.2.50 vs test/test_basic_parsing.rb in ruby-hl7-0.3

@@ -1,21 +1,32 @@
-# $Id: test_basic_parsing.rb 41 2007-06-30 08:06:04Z segfault $
+# $Id$
 $: << '../lib'
 require 'test/unit'
 require 'ruby-hl7'
 
 class BasicParsing < Test::Unit::TestCase
   def setup
     @simple_msh_txt = open( './test_data/test.hl7' ).readlines.first
     @empty_txt = open( './test_data/empty.hl7' ).readlines.first
     @empty_segments_txt = open( './test_data/empty_segments.hl7' ).readlines.first
     @base_msh = "MSH|^~\\&|LAB1||DESTINATION||19910127105114||ORU^R03|LAB1003929"
+    @base_msh_alt_delims = "MSH$@~\\&|LAB1||DESTINATION||19910127105114||ORU^R03|LAB1003929"
   end
 
   def test_simple_msh
     msg = HL7::Message.new
     msg.parse @simple_msh_txt
     assert_equal( @simple_msh_txt, msg.to_hl7 )
+  end
+  
+  def test_parse_delims
+    msg = HL7::Message.new( @base_msh )
+    assert_equal( "|", msg.element_delim )
+    assert_equal( "^", msg.item_delim )
+    
+    msg = HL7::Message.new( @base_msh_alt_delims )
+    assert_equal( "$", msg.element_delim )
+    assert_equal( "@", msg.item_delim )
   end
 
   def test_constructor_parse
     msg = HL7::Message.new( @simple_msh_txt )
     assert_equal( @simple_msh_txt, msg.to_hl7 )