sbyc 0.1.0 → 0.1.1

data/test/spec/unit/sbyc/codetree/proc_parser/expr.spec

@@ -2,7 +2,7 @@ require File.expand_path('../../../../../spec_helper', __FILE__)
 
 describe "CodeTree::ProcParser::Expr" do
 
-  let(:the_expr) { CodeTree::ProcParser::Expr.new }
+  let(:the_expr) { CodeTree::ProcParser::Expr.new(nil, nil, nil) }
 
   describe("should not have access to Kernel methods") do
     specify{ 

data/test/spec/unit/sbyc/codetree/proc_parser/parse.spec

@@ -69,7 +69,7 @@ describe "CodeTree::ProcParser#parse" do
   end
   
   context "when call on expressions that refer to ruby Kernel methods" do
-    let(:expected) { "(puts (to_s (? (_ :x))))"}
+    let(:expected) { "(puts (to_s (? (_ :x))))" }
     let(:code)     { lambda { (puts (to_s x)) } }
     specify{ subject.inspect.should == expected }
   end
@@ -80,4 +80,37 @@ describe "CodeTree::ProcParser#parse" do
     specify{ subject.inspect.should == expected }
   end
   
+  context "when called with a multiline option set to false" do
+    let(:expected) { "(puts (to_s (? (_ :x))))" }
+    let(:code)     { lambda { (puts (to_s x)) } }
+    subject { CodeTree::ProcParser::parse(code, :multiline => false) }
+    specify{
+      subject.inspect.should == expected
+    }
+  end
+  
+  context "when called with a multiline option set to true" do
+    let(:expected) { "(puts (to_s (? (_ :x))))" }
+    let(:code)     { lambda { (puts (to_s x)) } }
+    subject { CodeTree::ProcParser::parse(code, :multiline => true) }
+    specify{
+      subject.should be_kind_of(Array)
+      subject[0].inspect.should == expected
+    }
+  end
+  
+  context "when called with a multiline option set to true and multiple lines" do
+    let(:code)     { lambda { 
+      (puts (to_s x)) 
+      (say "hello")
+    } }
+    subject { CodeTree::ProcParser::parse(code, :multiline => true) }
+    specify{
+      subject.should be_kind_of(Array)
+      subject.size.should == 2
+      subject[0].inspect.should == "(puts (to_s (? (_ :x))))"
+      subject[1].inspect.should == '(say (_ "hello"))'
+    }
+  end
+  
 end

data/test/spec/unit/sbyc/codetree/producing/producer/add_extension.spec

@@ -0,0 +1,62 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::Producer#apply_args_conventions" do
+  
+  let(:producer)  { ::CodeTree::producer }
+
+  context "whitout options at all (not provided, no default)" do
+    let(:extension) { module Ext; def hello() "hello"; end end; Ext }
+  
+    subject { producer.add_extension(extension) }
+    it      { should == producer                }
+    it      { should be_kind_of(extension)      }
+    it      { should respond_to(:hello)         }
+    specify { producer.extension_options[extension].should be_nil }
+  end
+
+  context "with default options only" do
+    let(:extension) { 
+      module ::Ext
+        def self.prepare_options(options)
+          { :who => "blambeau", :times => 3 }.merge(options)
+        end
+        def hello() 
+          extension_options[Ext][:who]*extension_options[Ext][:times]
+        end
+      end; 
+      ::Ext 
+    }
+    subject { producer.add_extension(extension) }
+    it      { should == producer                }
+    it      { should be_kind_of(extension)      }
+    it      { should respond_to(:hello)         }
+    specify { 
+      subject.extension_options[extension].should == { :who => "blambeau", :times => 3 } 
+      subject.hello.should == "blambeaublambeaublambeau"
+    }
+  end
+
+
+  context "with both" do
+    let(:extension) { 
+      module ::Ext
+        def self.prepare_options(options)
+          { :who => "blambeau", :times => 3 }.merge(options)
+        end
+        def hello() 
+          extension_options[Ext][:who]*extension_options[Ext][:times]
+        end
+      end; 
+      ::Ext 
+    }
+    subject { producer.add_extension(extension, :times => 1) }
+    it      { should == producer                }
+    it      { should be_kind_of(extension)      }
+    it      { should respond_to(:hello)         }
+    specify { 
+      subject.extension_options[extension].should == { :who => "blambeau", :times => 1 } 
+      subject.hello.should == "blambeau"
+    }
+  end
+
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods.spec

@@ -0,0 +1,36 @@
+require File.expand_path('../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingOptions" do
+  
+  let(:producer) {
+    ::CodeTree::producer{|p|
+      p.rule(:'_') do |engine, node|
+        engine.trace("On: #{node.literal.inspect}")
+      end
+      p.rule("*") do |engine, node| 
+        engine.trace_rule_entered("Before: #{node}")
+        engine.apply(node.children)
+        engine.trace_rule_exited("After: #{node}")
+        nil
+      end
+    }
+  }
+
+  let(:expr) { CodeTree::parse{ (concat "hello ", who) } }
+
+  subject { producer.tracing_options[:io] }
+  
+  context("With default options but io") do
+    before do 
+      producer.add_extension(::CodeTree::Producing::TracingMethods, :io => [])
+      producer.apply(expr)
+    end
+    it { should == ['Before: (concat "hello ", who)' + "\n",
+                    '  On: "hello "' + "\n",
+                    '  Before: who' + "\n",
+                    '    On: :who' + "\n",
+                    '  After: who' + "\n",
+                    'After: (concat "hello ", who)' + "\n"] }
+  end
+  
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods/default_options.spec

@@ -0,0 +1,10 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingMethods#default_options" do
+  
+  subject{ CodeTree::Producing::TracingMethods.default_options }
+  
+  it { should be_kind_of(Hash) }
+  specify { subject[:io].should_not be_nil }
+  
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods/prepare_options.spec

@@ -0,0 +1,18 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingMethods#prepare_options" do
+  
+  subject{ CodeTree::Producing::TracingMethods.prepare_options(options) }
+  
+  context "When called without options" do
+    let(:options){ {} }
+    it { should == CodeTree::Producing::TracingMethods.default_options }
+    specify { subject[:io].should == STDOUT }
+  end 
+  
+  context "When called with overriding option" do
+    let(:options){ {:io => []} }
+    specify { subject[:io].should == [] }
+  end 
+  
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods/trace.spec

@@ -0,0 +1,59 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingMethods#trace" do
+  
+  context("Without indentation support") do
+    let(:tracer) {
+      t = Object.new
+      t.extend(CodeTree::Producing::TracingMethods)
+      def t.tracing_options 
+        @options ||= {:newline_support => false,
+                      :indent_support  => false,
+                      :indent_level    => 12,
+                      :io              => []}
+      end 
+      t
+    }
+    specify {
+      tracer.trace("This is a first message\n")
+      tracer.tracing_io.should == ["This is a first message\n"]
+    }
+  end
+  
+  context("With indent support") do
+    let(:tracer) {
+      t = Object.new
+      t.extend(CodeTree::Producing::TracingMethods)
+      def t.tracing_options 
+        @options ||= {:newline_support => false,
+                      :indent_support  => true,
+                      :indent_level    => 2,
+                      :indent_string   => "aaa ",
+                      :io              => []}
+      end 
+      t
+    }
+    specify {
+      tracer.trace("This is a first message")
+      tracer.tracing_io.should == ["aaa aaa This is a first message"]
+    }
+  end
+  
+  context("With newline support") do
+    let(:tracer) {
+      t = Object.new
+      t.extend(CodeTree::Producing::TracingMethods)
+      def t.tracing_options 
+        @options ||= {:newline_support => true,
+                      :indent_support  => false,
+                      :io              => []}
+      end 
+      t
+    }
+    specify {
+      tracer.trace("This is a first message")
+      tracer.tracing_io.should == ["This is a first message\n"]
+    }
+  end
+  
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods/trace_rule_entered.spec

@@ -0,0 +1,25 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingMethods#trace_rule_entered" do
+  
+  let(:tracer) { 
+    t = Object.new.extend(CodeTree::Producing::TracingMethods) 
+    def t.tracing_options 
+      @options ||= CodeTree::Producing::TracingMethods.prepare_options(:io => [])
+    end
+    t
+  }
+  
+  it "Should increment the indent level" do
+    bef = tracer.tracing_indent_level
+    tracer.trace_rule_entered("A message")
+    aft = tracer.tracing_indent_level
+    aft.should == bef+1
+  end
+  
+  it "Should log the message" do
+    tracer.trace_rule_entered("A message")
+    tracer.tracing_io.should == ["A message\n"]
+  end
+  
+end

data/test/spec/unit/sbyc/codetree/producing/tracing_methods/trace_rule_exited.spec

@@ -0,0 +1,25 @@
+require File.expand_path('../../../../../../spec_helper', __FILE__)
+
+describe "CodeTree::Producing::TracingMethods#trace_rule_exited" do
+  
+  let(:tracer) { 
+    t = Object.new.extend(CodeTree::Producing::TracingMethods) 
+    def t.tracing_options 
+      @options ||= CodeTree::Producing::TracingMethods.prepare_options(:io => [])
+    end
+    t
+  }
+  
+  it "Should increment the indent level" do
+    bef = tracer.tracing_indent_level
+    tracer.trace_rule_exited("A message")
+    aft = tracer.tracing_indent_level
+    aft.should == bef-1
+  end
+  
+  it "Should log the message" do
+    tracer.trace_rule_exited("A message")
+    tracer.tracing_io.should == ["A message\n"]
+  end
+  
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: sbyc
 version: !ruby/object:Gem::Version 
-  hash: 27
+  hash: 25
   prerelease: false
   segments: 
   - 0
   - 1
-  - 0
-  version: 0.1.0
+  - 1
+  version: 0.1.1
 platform: ruby
 authors: 
 - Bernard Lambeau
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-05-20 00:00:00 +02:00
+date: 2010-06-14 00:00:00 +02:00
 default_executable: 
 dependencies: []
 
@@ -38,8 +38,12 @@ files:
 - lib/sbyc/codetree/matching/match_data.rb
 - lib/sbyc/codetree/matching/matcher.rb
 - lib/sbyc/codetree/matching.rb
+- lib/sbyc/codetree/name2x/delegate.rb
+- lib/sbyc/codetree/name2x/module_delegate.rb
+- lib/sbyc/codetree/name2x.rb
 - lib/sbyc/codetree/proc_parser.rb
 - lib/sbyc/codetree/producing/producer.rb
+- lib/sbyc/codetree/producing/tracing_methods.rb
 - lib/sbyc/codetree/producing.rb
 - lib/sbyc/codetree/rewriting/class_methods.rb
 - lib/sbyc/codetree/rewriting/compiler.rb
@@ -58,10 +62,13 @@ files:
 - test/spec/documentation/readme/syntax.spec
 - test/spec/spec_helper.rb
 - test/spec/test_all.rb
+- test/spec/unit/sbyc/codetree/ast_node/code_inject.spec
 - test/spec/unit/sbyc/codetree/ast_node/coerce.spec
+- test/spec/unit/sbyc/codetree/ast_node/digest.spec
 - test/spec/unit/sbyc/codetree/ast_node/equality.spec
 - test/spec/unit/sbyc/codetree/ast_node/inspect.spec
 - test/spec/unit/sbyc/codetree/ast_node/literal.spec
+- test/spec/unit/sbyc/codetree/ast_node/rename.spec
 - test/spec/unit/sbyc/codetree/ast_node/to_a.spec
 - test/spec/unit/sbyc/codetree/ast_node/to_s.spec
 - test/spec/unit/sbyc/codetree/ast_node/visit.spec
@@ -75,10 +82,26 @@ files:
 - test/spec/unit/sbyc/codetree/matching/matcher/do_match.spec
 - test/spec/unit/sbyc/codetree/matching/matcher/function_match.spec
 - test/spec/unit/sbyc/codetree/matching/matcher/match.spec
+- test/spec/unit/sbyc/codetree/name2x/delegate/coerce.spec
+- test/spec/unit/sbyc/codetree/name2x/delegate/fetch.spec
+- test/spec/unit/sbyc/codetree/name2x/delegate/name2class.spec
+- test/spec/unit/sbyc/codetree/name2x/delegate/name2module.spec
+- test/spec/unit/sbyc/codetree/name2x/delegate/name2name.spec
+- test/spec/unit/sbyc/codetree/name2x/module_delegate/name2class.spec
+- test/spec/unit/sbyc/codetree/name2x/module_delegate/name2module.spec
+- test/spec/unit/sbyc/codetree/name2x/module_delegate/name2name.spec
+- test/spec/unit/sbyc/codetree/parse.spec
 - test/spec/unit/sbyc/codetree/proc_parser/expr.spec
 - test/spec/unit/sbyc/codetree/proc_parser/parse.spec
+- test/spec/unit/sbyc/codetree/producing/producer/add_extension.spec
 - test/spec/unit/sbyc/codetree/producing/producer/apply_args_conventions.spec
 - test/spec/unit/sbyc/codetree/producing/producer.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods/default_options.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods/prepare_options.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods/trace.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods/trace_rule_entered.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods/trace_rule_exited.spec
+- test/spec/unit/sbyc/codetree/producing/tracing_methods.spec
 - test/spec/unit/sbyc/codetree/rewriting/instance_methods/apply_args_conventions.spec
 - test/spec/unit/sbyc/codetree/rewriting/instance_methods/node.spec
 - test/spec/unit/sbyc/codetree/rewriting/instance_methods/rewrite.spec