home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ruby164.zip / rbemx164.zip / ruby / share / doc / rdtool-0.6.10 / test / test-rdvisitor.rb < prev    next >
Text File  |  2001-04-15  |  980b  |  37 lines

  1. require 'runit/testcase'
  2. require 'runit/cui/testrunner'
  3. require 'runit/topublic'
  4.  
  5. require 'rd/rdvisitor'
  6. require 'rd/rd-struct'
  7.  
  8. include RD
  9. class TestRDVisitor < RUNIT::TestCase
  10.   include RUNIT::ToPublic
  11.  
  12.   def test_refer_external
  13.     tr_ext = Tree.new_with_document_struct(DocumentStructure::RD,
  14.                         ["test/data"])
  15.     label_ext = Reference::RDLabel.new("label1", "label.rd")
  16.     tr_ext.root = DocumentElement.new
  17.     ref_ext = nil
  18.     tr_ext.root.build do
  19.       new TextBlock do
  20.     StringElement.new "label"
  21.     ref_ext = new Reference, label_ext
  22.       end
  23.     end
  24.     vis_ext = to_public(RDVisitor).new
  25.     vis_ext.prepare_labels(tr_ext)
  26.     label_not_exist = Reference::RDLabel.new("label3", "label.rd")
  27.  
  28.     assert_equal("label:0", vis_ext.refer_external(ref_ext))
  29.     assert_equal( "label:0", vis_ext.refer_external(label_ext))
  30.     assert_equal(nil, vis_ext.refer_external(label_not_exist))
  31.   end
  32. end
  33.  
  34. if $0 == __FILE__
  35.   RUNIT::CUI::TestRunner.run(TestRDVisitor.suite)
  36. end
  37.