treevisitor 0.2.3 → 0.2.4

data/spec/treevisitor/tree_dsl_spec.rb

@@ -1,57 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe "TreeNodeDsl" do
-
-  it "should build tree with dsl" do
-    tree = TreeNode.create do
-      node "root" do
-        leaf "l1"
-        leaf "l2"
-        node "sub" do
-          leaf "l3"
-        end
-        node "wo leaves"
-      end
-    end
-
-    # puts tree.to_str
-    out =<<EOS
-root
-|-- l1
-|-- l2
-|-- sub
-|   `-- l3
-`-- wo leaves
-EOS
-    tree.to_str.should == out
-  end
-
-  it "test_dsl_block_with_arg" do
-    tree = TreeNode.create do
-      node "root" do |node|
-        node.prefix_path=("pre/")        
-        leaf "l1"
-        leaf "l2"
-        node "sub" do
-          leaf "l3" do |leaf|            
-          end
-        end
-        node "woleaves"
-      end
-    end
-
-    # puts tree.to_str
-    out =<<EOS
-root
-|-- l1
-|-- l2
-|-- sub
-|   `-- l3
-`-- woleaves
-EOS
-    tree.to_str.should ==  out
-    tree.find("l3").path_with_prefix.should == "pre/root/sub/l3"
-  end
-
-end

data/spec/treevisitor/tree_dsl_with_derived_class1_spec.rb

@@ -1,53 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe "Tree Node Dsl Derived Class with n-arg constructor" do
-
-  class ArgsTreeNode < TreeNode
-    attr_reader :description
-
-    def initialize(name, description, parent)
-      super(name, parent)
-      @description =  description
-    end
-
-    def to_s
-      "a: #{description}"
-    end
-  end
-
-  class ArgsLeafNode < LeafNode
-    attr_reader :description
-
-    def initialize(name, description, parent)
-      super(name, parent)
-      @description =  description
-    end
-
-    def to_s
-      "a: #{description}"
-    end
-  end
-
-  it "test_derivated_args" do
-    tree = TreeNode.create(ArgsTreeNode, ArgsLeafNode) do
-      node "root", "droot" do
-        leaf "l1", "dl1"
-        leaf "l2", "dl2"
-        node "sub", "dsub" do
-          leaf "l3", "dl3"
-        end
-      end
-    end
-
-    # puts tree.to_str
-    out =<<EOS
-a: droot
-|-- a: dl1
-|-- a: dl2
-`-- a: dsub
-    `-- a: dl3
-EOS
-    tree.to_str.should == out
-  end
-end

data/spec/treevisitor/tree_dsl_with_derived_class_spec.rb

@@ -1,51 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe "Tree Node Dsl Derived Class with no-arg constructor " do
-
-  class DTreeNode < TreeNode
-    def to_s
-      "dt: #{content}"
-    end
-  end
-
-  class DLeafNode < LeafNode
-    def to_s
-      "dl: #{content}"
-    end
-  end
-
-  it "dsl with non-arg constructor" do
-    tree = TreeNode.create(DTreeNode, DLeafNode) do
-      node "root" do
-        leaf "l1"
-        leaf "l2"
-        node "sub" do
-          leaf "l3"
-        end
-      end
-    end
-
-    # puts tree.to_str
-    out =<<EOS
-dt: root
-|-- dl: l1
-|-- dl: l2
-`-- dt: sub
-    `-- dl: l3
-EOS
-    tree.to_str.should == out
-
-    tree = DTreeNode.create(DLeafNode) do
-      node "root" do
-        leaf "l1"
-        leaf "l2"
-        node "sub" do
-          leaf "l3"
-        end
-      end
-    end
-    tree.to_str.should == out
-  end
-
-end

data/spec/treevisitor/tree_node_paths_spec.rb

@@ -1,70 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe TreeNode do
-
-  context "paths" do
-
-    before do
-      @tree     = TreeNode.new("a")
-      ln1       = LeafNode.new("1", @tree)
-      ln2       = LeafNode.new("2", @tree)
-      @sub_tree = TreeNode.new("b", @tree)
-      @ln3      = LeafNode.new("3", @sub_tree)
-      @ln4      = LeafNode.new("12", @sub_tree)
-    end
-
-    it "correct path" do
-      @tree.path.should == "a"
-      @sub_tree.path.should == "a/b"
-      @tree.path_with_prefix.should == "a"
-      @sub_tree.path_with_prefix.should == "a/b"
-    end
-
-    it "assign prefix path with a /" do
-      @tree.prefix_path= "<root>/"
-
-      @tree.prefix_path.should == "<root>/"
-      @tree.path.should == "a"
-      @sub_tree.path.should == "a/b"
-      @tree.path_with_prefix.should == "<root>/a"
-      @sub_tree.path_with_prefix.should == "<root>/a/b"
-    end
-
-    it "assign empty prefix path" do
-      @tree.prefix_path= ""
-
-      @tree.prefix_path.should == "/"
-      @tree.path.should == "a"
-      @sub_tree.path.should == "a/b"
-      @tree.path_with_prefix.should == "/a"
-      @sub_tree.path_with_prefix.should == "/a/b"
-    end
-
-    it "assign prefix path wo a /" do
-      @tree.prefix_path= "<root>"
-
-      @tree.prefix_path.should == "<root>/"
-      @tree.path_with_prefix.should == "<root>/a"
-      @sub_tree.path_with_prefix.should == "<root>/a/b"
-    end
-
-    it "invalidate" do
-      @tree.prefix_path="root/"
-      @sub_tree.path.should == "a/b"
-      @sub_tree.path_with_prefix.should == "root/a/b"
-      @sub_tree.depth.should == 2
-
-      r = TreeNode.new("r")
-      r.add_child(@tree)
-      @sub_tree.path.should == "r/a/b"
-      @sub_tree.path_with_prefix.should == "r/a/b"
-
-      r.prefix_path="new_root/"
-      @sub_tree.path.should == "r/a/b"
-      @sub_tree.path_with_prefix.should == "new_root/r/a/b"
-      @sub_tree.depth.should == 3
-    end
-
-  end
-end

data/spec/treevisitor/tree_node_spec.rb

@@ -1,135 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe TreeNode do
-
-  it "should initialize correctly" do
-    ta = TreeNode.new("a")
-    ta.should be_root
-
-    ln1 = LeafNode.new("1", ta)
-    ln1.parent.should == ta
-    ln1.should_not be_root
-
-    ln2 = LeafNode.new("2", ta)
-    tb  = TreeNode.new("b", ta)
-    ln3 = LeafNode.new("3", tb)
-    ln3.parent.should == tb
-
-    # test depth
-    tb.depth.should == 2
-    ln3.depth.should == 3
-
-    # test nr_nodes
-    tb.nr_nodes.should == 1
-    ta.nr_nodes.should == 4
-
-    # puts ta.to_str
-  end
-
-  it "should add child and leaf" do
-    ta = TreeNode.new("a")
-    ta.should be_root
-
-    ln1 = LeafNode.new("1")
-    ta.add_leaf(ln1)
-    ln1.parent.should == ta
-
-    ln2 = LeafNode.new("2", ta)
-    ta.add_leaf(ln2)
-
-    tb  = TreeNode.new("b", ta)
-    ln3 = LeafNode.new("3", tb)
-    tb.add_leaf(ln3)
-    ln3.parent.should == tb
-
-    ta.add_child(tb)
-    # puts ta.to_str
-  end
-
-  it "next and prev" do
-    ta = TreeNode.new("a")
-    ta.prev.should be_nil
-    ta.next.should be_nil
-
-    ln1 = LeafNode.new("1", ta)
-    ln1.prev.should be_nil
-    ln1.next.should be_nil
-
-    ln2 = LeafNode.new("2", ta)
-    ln2.prev.should == ln1
-    ln2.next.should be_nil
-
-    ln3 = LeafNode.new("3", ta)
-    ln2.next.should == ln3
-
-    tb = TreeNode.new("b", ta)
-    tb.next.should be_nil
-    tb.prev.should be_nil
-
-    tc = TreeNode.new("c", ta)
-    tc.prev.should == tb
-    tc.next.should be_nil
-  end
-
-  context "navigate tree" do
-
-    before do
-      @tree     = TreeNode.new("a")
-      ln1       = LeafNode.new("1", @tree)
-      ln2       = LeafNode.new("2", @tree)
-      @sub_tree = TreeNode.new("b", @tree)
-      @ln3      = LeafNode.new("3", @sub_tree)
-      @ln4      = LeafNode.new("12", @sub_tree)
-    end
-
-    it "nr_nodes and nr_leaves and nr_children" do
-      @tree.nr_nodes.should == 5
-      @tree.nr_leaves.should == 4
-      @tree.nr_children.should == 1
-
-      @sub_tree.nr_nodes.should == 2
-      @sub_tree.nr_leaves.should == 2
-      @sub_tree.nr_children.should == 0
-    end
-
-
-    context "find" do
-
-      it "find by string" do
-        @tree.find("a").should === @tree
-        @tree.find("b").should === @sub_tree
-        @tree.find("3").should === @ln3
-        @tree.find("not existent").should be_nil
-      end
-
-      it "find by regex" do
-        @tree.find(/[a,b]/).should === @tree
-        @tree.find(/[b,c]/).should === @sub_tree
-        @tree.find(/\d\d/).should === @ln4
-        @tree.find(/not existent/).should be_nil
-      end
-
-      it "find with block" do
-        @tree.find { |e| e.content == "a" }.should === @tree
-        @tree.find { |e| e.content == "b" }.should === @sub_tree
-        @tree.find { |e| e.content == "3" }.should === @ln3
-        @tree.find { |e| e.content == "not existent" }.should be_nil
-      end
-
-      it "to_str" do
-        out = <<EOS
-a
-|-- 1
-|-- 2
-`-- b
-    |-- 3
-    `-- 12
-EOS
-        @tree.to_str.should == out
-      end
-
-    end
-
-  end
-end

data/spec/treevisitor/tree_node_visitor_delegate_spec.rb

@@ -1,35 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe TreeNodeVisitor do
-
-  class Delegate
-    def enter_node(node)
-      @entered_node= true
-    end
-
-    def exit_node(node)
-      @exit_node= true
-    end
-
-    def visit_leaf(leaf)
-      @visited_leaf= true
-    end
-  end
-
-  it "should use a delegate" do
-
-    delegate = Delegate.new
-    visitor = TreeNodeVisitor.new(delegate)
-
-    visitor.enter_node(nil)
-    delegate.instance_eval{ @entered_node }.should be_true
-
-    visitor.exit_node(nil)
-    delegate.instance_eval{ @exit_node }.should be_true
-
-    visitor.visit_leaf(nil)
-    delegate.instance_eval{ @visited_leaf }.should be_true
-  end
-
-end

data/spec/treevisitor/tree_node_visitor_dsl_spec.rb

@@ -1,66 +0,0 @@
-# -*- coding: utf-8 -*-
-require File.join(File.dirname(__FILE__), "..", "spec_helper")
-
-describe TreeNodeVisitor do
-
-  it "should initialize correctly" do
-    visitor = TreeNodeVisitor.new do
-
-      on_enter_node do |tree_node|
-        @entered_node = true
-      end
-
-      on_exit_node do |tree_node|
-        @exit_node = true
-      end
-
-      on_leaf do |leaf_node|
-        @visit_leaf = true
-      end
-    end
-
-    visitor.enter_node(nil)
-    visitor.instance_eval{ @entered_node }.should be_true
-
-    visitor.exit_node(nil)
-    visitor.instance_eval{ @exit_node }.should be_true
-
-    visitor.visit_leaf(nil)
-    visitor.instance_eval{ @visit_leaf }.should be_true
-  end
-
-  it "should initialize correctly" do
-    visitor = TreeNodeVisitor.new do
-
-      on_enter_node do |node, parent|
-        @node = node
-        @parent = parent
-      end
-
-      on_exit_node do |node, parent|
-        @node = node
-        @parent = parent
-      end
-
-      on_leaf do |leaf, parent|
-        @leaf = leaf
-        @parent = parent
-      end
-    end
-
-    visitor.instance_eval{ @stack = ["p"] }
-    visitor.enter_node("n")
-    visitor.instance_eval{ @node }.should == "n"
-    visitor.instance_eval{ @parent }.should == "p"
-    visitor.instance_eval{ @stack }.should have(2).node
-
-    visitor.exit_node("n")
-    visitor.instance_eval{ @node }.should == "n"
-    visitor.instance_eval{ @stack }.should have(1).node
-
-    visitor.instance_eval{ @stack = ["p"] }
-    visitor.visit_leaf("l")
-    visitor.instance_eval{ @leaf }.should == "l"
-    visitor.instance_eval{ @parent }.should == "p"
-  end
-end