y_support 2.0.21 → 2.0.23

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: 6981d4eb5fdec5cb5eaf09321d4081c39b65c4db
-  data.tar.gz: 472b3008961422d3823f0b5b654ca2ecfadbd4f1
+  metadata.gz: 0143322533b38e137de87f30d4d5d94021a0e211
+  data.tar.gz: f086f7e148dbd589c5f4007e689c4519c09c80b9
 SHA512:
-  metadata.gz: c0fe48e25cd93a0b8abce16b12b227d408f1f2e99b5f0275abd13a56735ef78e7b303ad22f18fa9ff15e695f02cd050e3ae32cd3d2130786e9c479ffacc2549f
-  data.tar.gz: dbcfa5713ba17cbc1dc64e65f18ad31497faeb82d6943cead57f1504b9e78e1c3ef17bf61d9b18a1684ca8be7e0f224c21b935c16884e3abe2cb0fcc726265a6
+  metadata.gz: 602b5759bd46e3138145086c168cb695a0433f6efa3d114d4437186eec2b16507167326bbbb3247d058d1e69f0deae3b8d1e16a3b1d60bd4fbe127bd24ff66fc
+  data.tar.gz: 6473a5334642f9d423495aa02e925532dc7e1a44074d4a4b8d41760756084bb0401686a75b1a371f577927e655dcf2dc4758647111321136eebf368e0f7db5e3

data/lib/y_support/abstract_algebra.rb

@@ -209,7 +209,7 @@ class Matrix
         end
       end
       return new_matrix( rows, arg.column_size )
-    when SY::Magnitude # newly added - multiplication by a magnitude
+    when ( SY::Magnitude rescue :SY_Magnitude_absent ) # newly added - multiplication by a magnitude
       # I am not happy with this explicit switch on SY::Magnitude type here.
       # Perhaps coerce should handle this?
       rows = Array.new row_size do |i|

data/lib/y_support/core_ext/array/misc.rb

@@ -86,7 +86,20 @@ class Array
   def to_column_vector
     Matrix.column_vector self
   end
+
+  # Returns correspondence matrix to another array.
+  # 
+  def correspondence_matrix other
+    Matrix.correspondence_matrix self, other
+  end
   
+  # Returns indices of elements of another array in this array (inverse of
+  # #values_at).
+  # 
+  def indices_of other
+    other.map { |e| index e }
+  end
+
   # TEST ME
   # def pretty_inspect
   #   each_slice( 4 ) { |slice|

data/lib/y_support/core_ext/class/misc.rb

@@ -0,0 +1,16 @@
+#encoding: utf-8
+
+class Class
+  # Creates a subclass of the current class parametrized with a given set of
+  # parameters. The parameters have form { symbol: value } and they cause
+  # singleton method(s) named "symbol" be defined on the subclass, returning
+  # "value".
+  # 
+  def parametrize **parameters
+    Class.new( self ).tap do |subclass|
+      parameters.each_pair { |symbol, value|
+        subclass.define_singleton_method symbol do value end
+      }
+    end
+  end
+end

data/lib/y_support/core_ext/class.rb

@@ -0,0 +1,2 @@
+require 'y_support'
+require 'y_support/core_ext/class/misc'

data/lib/y_support/core_ext/hash/misc.rb

@@ -6,48 +6,46 @@ class Hash
   # reversed merge!: defaults.merge( self! )
   alias :default! :reverse_merge!
   
-  # Applies a block as a mapping on all keys, returning a new hash
+  # Applies a block as a mapping on all keys, returning a new hash.
+  # 
   def with_keys
-    keys.each_with_object self.class.new do |hash_key, ꜧ|
-      ꜧ[ yield( hash_key ) ] = self[ hash_key ]
+    keys.each_with_object self.class.new do |hash_key, hsh|
+      hsh[ yield hash_key ] = self[ hash_key ]
     end
   end
-  alias :do_with_keys :with_keys
   
-  # The difference from do_with_keys is that modify_keys expects block
-  # that takes 2 arguments (key: value pair) and returns the new key.
+  # The difference from #with_keys is that modify_keys expects block that takes
+  # 2 arguments (key: value pair) and returns the new key.
+  # 
   def modify_keys
-    each_with_object self.class.new do |hash_pair, ꜧ|
-      ꜧ[ yield( hash_pair ) ] = self[ hash_pair[0] ]
+    each_with_object self.class.new do |hash_pair, hsh|
+      hsh[ yield( hash_pair ) ] = self[ hash_pair[0] ]
     end
   end
   
-  # Applies a block as a mapping on all values, returning a new hash
+  # Applies a block as a mapping on all values, returning a new hash.
+  # 
   def with_values
-    each_with_object self.class.new do |hash_pair, ꜧ|
-      ꜧ[ hash_pair[0] ] = yield( hash_pair[1] )
-    end
+    each_with_object self.class.new do |(k, v), hsh| hsh[ k ] = yield v end
   end
-  alias :do_with_values :with_values
   
   # Like #do_with_values, but modifies the receiver.
+  # 
   def with_values!
-    each_with_object self do |hash_pair, ꜧ|
-      hash_key, hash_val = hash_pair
-      ꜧ[ hash_key ] = yield( hash_val )
-    end
+    each_with_object self do |(k, v), hsh| hsh[ k ] = yield v end
   end
-  alias :do_with_values! :with_values!
   
   # The difference from #do_with_values is that modify_values expects block
   # that takes 2 arguments (key: value pair) and returns the new value.
+  # 
   def modify_values
     each_with_object self.class.new do |hash_pair, ꜧ|
       ꜧ[ hash_pair[0] ] = yield( hash_pair )
     end
   end
   
-  # Like #modify_values, but modifies the receiver
+  # Like #modify_values, but modifies the receiver.
+  # 
   def modify_values!
     each_with_object self do |hash_pair, ꜧ|
       ꜧ[ hash_pair[0] ] = yield( hash_pair )
@@ -55,35 +53,37 @@ class Hash
   end
   
   # Like #map that returns a hash.
+  # 
   def modify
     each_with_object self.class.new do |hash_pair, ꜧ|
       key, val = yield hash_pair
       ꜧ[key] = val
     end
   end
+
+  # A bit like Array#slice, but only takes 1 argument, which is either a Range,
+  # or an Array, and returns the selection of the hash for the keys that match
+  # the range or are present in the array. 
+  # 
+  def slice matcher
+    case matcher
+    when Array then select { |key, _| matcher.include? key }
+    else select { |key, _| matcher === key } end
+  end
   
   # Makes hash keys accessible as methods. If the hash keys collide with
   # its methods, ArgumentError is raised, unless :overwrite_methods
   # option == true.
   # 
-  def dot!( oo = {} )
+  def dot! overwrite_methods: false
     keys.each do |key|
       msg = "key #{key} of #dot!-ted hash is not convertible to a symbol"
-      raise ArgumentError, msg unless key.respond_to? :to_sym
-      unless oo[:overwrite_methods]
-        if methods.include? key.to_sym
-          raise ArgumentError, "#dot!-ted hash must not have key names " +
-            "colliding with its methods"
-        end
-      end
-      
-      define_singleton_method key.to_sym do
-        self[key]
-      end
-      
-      define_singleton_method "#{key}=".to_sym do |value|
-        self[key] = value
-      end
+      fail ArgumentError, msg unless key.respond_to? :to_sym
+      msg = "#dot!-ted hash must not have key names colliding with its methods"
+      fail ArgumentError, msg if methods.include? key.to_sym unless
+        overwrite_methods
+      define_singleton_method key.to_sym do self[key] end
+      define_singleton_method "#{key}=".to_sym do |value| self[key] = value end
     end
     return self
   end

data/lib/y_support/name_magic/hash.rb

@@ -0,0 +1,17 @@
+# -*- coding: utf-8 -*-
+
+class Hash
+  # Maps a hash into a hash, whose keys have been replaced with names of the
+  # key objects (which are assumed to respond to +#name+ method).
+  # 
+  def keys_to_names
+    with_keys do |key| key.name || key end
+  end
+
+  # Modifies a hash in place so that the keys are replaced with key names (key
+  # objects are assumed to respond to +#name+ method).
+  # 
+  def keys_to_names!
+    with_keys! do |key| key.name || key end
+  end
+end

data/lib/y_support/name_magic.rb

@@ -1,7 +1,10 @@
 # -*- coding: utf-8 -*-
 
 require 'y_support'
+require 'y_support/core_ext/hash/misc'
+
 require_relative 'name_magic/array'
+require_relative 'name_magic/hash'
 require_relative 'name_magic/namespace_methods'
 require_relative 'name_magic/class_methods'
 

data/lib/y_support/try.rb

@@ -129,4 +129,5 @@ class Object
                          text: attempt_NL_description,
                          &block ).__invoke__
   end
+  alias consciously try
 end

data/lib/y_support/version.rb

@@ -1,3 +1,3 @@
 module YSupport
-  VERSION = "2.0.21"
+  VERSION = "2.0.23"
 end

data/test/misc_test.rb

@@ -34,6 +34,20 @@ describe Module do
 end
 
 
+describe Class do
+  before do
+    require 'y_support/core_ext/class'
+  end
+
+  it "has #parametrize method" do
+    a = Class.new
+    -> { a.foo }.must_raise NoMethodError
+    b = a.parametrize foo: 42
+    b.foo.must_equal 42
+  end
+end
+
+
 describe Enumerable do
   before do
     require 'y_support/core_ext/enumerable'
@@ -94,7 +108,7 @@ describe Array do
   end
 
   it "has #to_column_vector" do
-    [1, 2, 3].to_column_vector.must_equal Matrix[[1, 2, 3]]
+    [1, 2, 3].to_column_vector.must_equal Matrix[[1], [2], [3]]
   end
 end
 
@@ -146,6 +160,13 @@ describe Hash do
                     .modify { |k, v| ["#{k}#{v}".to_sym, "#{v}#{k}"] } )
   end
 
+  it "should have #slice" do
+    { a: 1, b: 2, c: 3 }.slice( [:a, :b] ).must_equal( { a: 1, b: 2 } )
+    { 1 => :a, 2 => :b, 3 => :c, 4 => :d }.slice( 2..3.5 )
+      .must_equal( { 2 => :b, 3 => :c } )
+    { 0.0 => :a, 1.1 => :b }.slice( 1..2 ).must_equal( { 1.1 => :b } )
+  end
+
   it "should have #dot! meta patcher for dotted access to keys" do
     h = Hash.new.merge!(aaa: 1, taint: 2)
     -> { h.dot! }.must_raise ArgumentError

data/test/name_magic_test.rb

@@ -58,10 +58,15 @@ describe NameMagic do
     Rover = @ç.new
     @ç.const_magic
     XXX::Rover.must_be_kind_of @ç
+    Rover.name.must_equal :Rover
     @ç.namespace!
     Spot = @ç.new
     @ç.const_magic
+    Spot.name.must_equal :Spot
     -> { XXX::Spot }.must_raise NameError
     @ç.const_get( :Spot ).must_be_kind_of @ç
+    # Array
+    [ Spot ].names.must_equal [ :Spot ]
+    { Spot => 42 }.keys_to_names.must_equal( { Spot: 42 } )
   end
-end
+end    

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: y_support
 version: !ruby/object:Gem::Version
-  version: 2.0.21
+  version: 2.0.23
 platform: ruby
 authors:
 - boris
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2013-07-06 00:00:00.000000000 Z
+date: 2013-07-25 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: activesupport
@@ -56,6 +56,8 @@ files:
 - lib/y_support/core_ext.rb
 - lib/y_support/core_ext/array.rb
 - lib/y_support/core_ext/array/misc.rb
+- lib/y_support/core_ext/class.rb
+- lib/y_support/core_ext/class/misc.rb
 - lib/y_support/core_ext/enumerable.rb
 - lib/y_support/core_ext/enumerable/misc.rb
 - lib/y_support/core_ext/hash.rb
@@ -77,6 +79,7 @@ files:
 - lib/y_support/name_magic.rb
 - lib/y_support/name_magic/array.rb
 - lib/y_support/name_magic/class_methods.rb
+- lib/y_support/name_magic/hash.rb
 - lib/y_support/name_magic/namespace_methods.rb
 - lib/y_support/null_object.rb
 - lib/y_support/respond_to.rb