add network.rb, kanjilist.rb, defkanji.rb, graphviz.rb,

[chise/ruby.git] / t / tc_network.rb

diff --git a/t/tc_network.rb b/t/tc_network.rb
new file mode 100755 (executable)
index 0000000..b0519d1
--- /dev/null
+++ b/t/tc_network.rb
@@ -0,0 +1,26 @@
+#!/usr/bin/env ruby
+# testcase for KanjiNetwork by eto 2003-0227
+
+require 'test/unit'
+$LOAD_PATH << '../src'
+require 'chise'
+require 'network'
+include CHISE
+
+class TC_KanjiNetwork < Test::Unit::TestCase
+  def test_network
+    @kl = KanjiList.instance
+    @kn = KanjiNetwork.new
+    @kn.make_network(@kl.awase(0))
+    @kn.out("min.dot") #途中状態を保存
+
+    @gv = GraphvizOLE.new() #OLE version
+    @gv.type = Graphviz::TWOPI
+    @gv.target = 'svg'
+    @gv.in  = "min.dot"
+    @gv.out = "min.svg"
+    @gv.generate()
+  end
+end
+
+#----------------------------------------------------------------------end.