Class: Binding

Inherits:

Object

• Object
• Binding

Defined in:

lib/ron.rb

Class Method Summary

• .-(*args) ⇒ Object (also: from_h)

Instance Method Summary

• #to_h ⇒ Object
• #to_ron_list(session) ⇒ Object

Class Method Details

.-(*args) ⇒ Object Also known as: from_h

# File 'lib/ron.rb', line 350

def -(*args)
  h=args.first
  return super unless ::Hash===h
  h=h.dup
  the_self=h.delete :self
  the_block=(h.delete :yield) || nil
  keys=h.keys
  keys.empty? or
  code=keys.map{|k| 
    k.to_s
  }.join(',')+',=*Thread.current[:$__Ron__CaptureCtx]'
  mname="Ron__capture_binding#{Thread.current.object_id}" #unlikely method name
  oldmname=newmname=result=nil

  eval "
         newmname=class<<the_self;
           mname=oldmname='#{mname}'
           im=instance_methods
           im.map!{|sym| sym.to_s} if Symbol===im.first
           mname+='-' while im.include? mname
           alias_method mname, oldmname if im.include? oldmname
           def #{mname}
             #{code}
             binding
           end
           mname
         end
       " 
        Thread.current[:$__Ron__CaptureCtx]= h.values
        result=the_self.send mname, &the_block
        Thread.current[:$__Ron__CaptureCtx]=nil
        class<<the_self;
           self
        end.send(*if newmname==mname
         [:remove_method, mname]
        else
         [:alias_method, mname, oldmname]
        end)
        result
end

Instance Method Details

#to_h ⇒ Object

# File 'lib/ron.rb', line 340

def to_h
  l=Kernel::eval "local_variables", self
  l<<"self"
  h={}
  l.each{|i| h[i.to_sym]=Kernel::eval i, self }
  h[:yield]=Kernel::eval "block_given? and proc{|*a__| #,&b__\n yield(*a__) #,&b__\n}", self
  h
end

#to_ron_list(session) ⇒ Object

# File 'lib/ron.rb', line 393

def to_ron_list session
  result=to_h.to_ron_list2(session).unshift("Binding-")
  result=["(",result,")"].flatten unless instance_variables.empty?
  result
end