striuct 0.4.4.1 → 0.8.0

data/lib/striuct/classmethods/enum.rb

@@ -1,45 +1,47 @@
-class Striuct; module ClassMethods
-
-  # @group Enumerative
-
-  # @yield [autonym] 
-  # @yieldparam [Symbol] autonym - sequential under defined
-  # @yieldreturn [Class] self
-  # @return [Enumerator]
-  def each_autonym
-    return to_enum(__callee__) unless block_given?
-
-    @autonyms.each{|autonym|yield autonym}
-    self
+# frozen_string_literal: true
+
+class Striuct
+  module ClassMethods
+    # @group Enumerative
+
+    # @yield [autonym]
+    # @yieldparam [Symbol] autonym - sequential under defined
+    # @yieldreturn [Class] self
+    # @return [Enumerator]
+    def each_autonym
+      return to_enum(__callee__) { size } unless block_given?
+
+      @autonyms.each { |autonym| yield autonym }
+      self
+    end
+
+    alias_method :each_member, :each_autonym
+
+    # @yield [index]
+    # @yieldparam [Integer] Index
+    # @yieldreturn [Class] self
+    # @return [Enumerator]
+    def each_index
+      return to_enum(__callee__) { size } unless block_given?
+
+      @autonyms.each_index { |index| yield index }
+      self
+    end
+
+    # @yield [autonym, index]
+    # @yieldparam [Symbol] autonym
+    # @yieldparam [Integer] index
+    # @yieldreturn [Class] self
+    # @return [Enumerator]
+    def each_autonym_with_index
+      return to_enum(__callee__) { size } unless block_given?
+
+      @autonyms.each_with_index { |autonym, index| yield autonym, index }
+      self
+    end
+
+    alias_method :each_member_with_index, :each_autonym_with_index
+
+    # @endgroup
   end
-
-  alias_method :each_member, :each_autonym
-  
-  # @yield [index] 
-  # @yieldparam [Integer] Index
-  # @yieldreturn [Class] self
-  # @return [Enumerator]
-  def each_index
-    return to_enum(__callee__) unless block_given?
-
-    @autonyms.each_index{|index|yield index}
-    self
-  end
-
-  # @yield [autonym, index]
-  # @yieldparam [Symbol] autonym
-  # @yieldparam [Integer] index
-  # @yieldreturn [Class] self
-  # @return [Enumerator]
-  def each_autonym_with_index
-    return to_enum(__callee__) unless block_given?
-
-    @autonyms.each_with_index{|autonym, index|yield autonym, index}
-    self
-  end
-
-  alias_method :each_member_with_index, :each_autonym_with_index
-
-  # @endgroup
-
-end; end
+end

data/lib/striuct/classmethods/fix.rb

@@ -1,28 +1,30 @@
-class Striuct; module ClassMethods
+# frozen_string_literal: true
 
-  # @group Fix inner data structures 
+class Striuct
+  module ClassMethods
+    # @group Fix inner data structures
 
-  # @return [self]
-  def freeze
-    [@autonyms, @attributes, @aliases].each(&:freeze)
-    super
-  end
+    # @return [self]
+    def freeze
+      [@autonyms, @attributes, @aliases].each(&:freeze)
+      super
+    end
 
-  def closed?
-    [@autonyms, @attributes, @aliases].any?(&:frozen?)
-  end
+    def closed?
+      [@autonyms, @attributes, @aliases].any?(&:frozen?)
+    end
 
-  private
+    private
 
-  # @return [self]
-  def close_member
-    [@autonyms, @attributes, @aliases].each(&:freeze)
-    self
-  end
-  
-  alias_method :fix_structural, :close_member
-  alias_method :close, :close_member
+    # @return [self]
+    def close_member
+      [@autonyms, @attributes, @aliases].each(&:freeze)
+      self
+    end
 
-  # @endgroup
+    alias_method :fix_structural, :close_member
+    alias_method :close, :close_member
 
-end; end
+    # @endgroup
+  end
+end

data/lib/striuct/classmethods/hashdeepdupulicatable.rb

@@ -1,19 +1,19 @@
-class Striuct; module ClassMethods
+# frozen_string_literal: true
 
-  module HashDeepDupulicatable
-
-    # @return [Hash]
-    def deep_dup
-      dup.tap {|h|
-        each_pair do |key, value|
-          h[key] = value.dup
-        end
-        h.extend HashDeepDupulicatable
-      }
+class Striuct
+  module ClassMethods
+    module HashDeepDupulicatable
+      # @return [Hash]
+      def deep_dup
+        dup.tap { |h|
+          each_pair do |key, value|
+            h[key] = value.dup
+          end
+          h.extend HashDeepDupulicatable
+        }
+      end
     end
 
+    private_constant :HashDeepDupulicatable
   end
-
-  private_constant :HashDeepDupulicatable
-
-end; end
+end

data/lib/striuct/classmethods/inner.rb

@@ -1,80 +1,73 @@
-class Striuct; module ClassMethods
-
-  # @group Inner Methods
-
-  # for debug
-  # @return [Hash]
-  def attributes
-    {
-      autonyms: @autonyms.dup,
-      aliases: @aliases.dup,
-      conflict_management_level: @conflict_management_level,
-      attributes_each_autonym: @attributes.dup
-    }
-  end
-
-  private
-
-  def _init
-    @autonyms      = []
-    @attributes    = {}.extend HashDeepDupulicatable # autonym => Attributes
-    @aliases       = {} # aliased => autonym
-    @conflict_management_level = DEFAULT_CONFLICT_MANAGEMENT_LEVEL
-  end
-
-  def _add_autonym(autonym)
-    autonym = autonym.to_sym
-    raise NameError, 'already defined' if member? autonym
+# frozen_string_literal: true
+
+class Striuct
+  module ClassMethods
+    # @group Inner Methods
+
+    # for debug
+    # @return [Hash]
+    def attributes
+      {
+        autonyms: @autonyms.dup,
+        aliases: @aliases.dup,
+        conflict_management_level: @conflict_management_level,
+        attributes_each_autonym: @attributes.dup
+      }
+    end
 
-    @attributes[autonym] = Attributes.new
-    @autonyms << autonym
-  end
+    private
 
-  def _attributes_for(autonym)
-    @attributes.fetch autonym
-  end
+    def _init
+      @autonyms      = []
+      @attributes    = {}.extend HashDeepDupulicatable # autonym => Attributes
+      @aliases       = {} # aliased => autonym
+      @conflict_management_level = DEFAULT_CONFLICT_MANAGEMENT_LEVEL
+    end
 
-  def _check_frozen
-    raise "can't modify frozen Class" if frozen?
-  end
+    def _add_autonym(autonym)
+      autonym = autonym.to_sym
+      raise NameError, 'already defined' if member?(autonym)
 
-  def _check_closed
-    raise "can't modify closed member attributes in #{self}" if closed?
-  end
+      @attributes[autonym] = Attributes.new
+      @autonyms << autonym
+    end
 
-  def _def_getter(autonym) 
-    define_method autonym do
-      _get autonym
+    def _attributes_for(autonym)
+      @attributes.fetch(autonym)
     end
-    
-    nil
-  end
 
-  def _def_setter(autonym, condition, &adjuster)
-    unless ANYTHING.equal? condition
-      _attributes_for(autonym).condition = condition
+    def _check_frozen
+      raise "can't modify frozen Class" if frozen?
     end
 
-    if block_given?
-      _attributes_for(autonym).adjuster = adjuster
+    def _check_closed
+      raise "can't modify closed member attributes in #{self}" if closed?
     end
 
-    define_method :"#{autonym}=" do |value|
-      _set autonym, value
+    def _def_getter(autonym)
+      define_method(autonym) do
+        _get(autonym)
+      end
+
+      nil
     end
- 
-    nil
-  end
 
-  def _found_family(autonym, other)
-    family = other.class
+    def _def_setter(autonym, condition, &adjuster)
+      unless ANYTHING.equal?(condition)
+        _attributes_for(autonym).condition = condition
+      end
 
-    _attributes_for(autonym).condition = family
-    _attributes_for(autonym).inference = false
+      if adjuster
+        _attributes_for(autonym).adjuster = adjuster
+      end
 
-    nil
-  end
-  
-  # @endgroup
+      define_method(:"#{autonym}=") do |value|
+        _set(autonym, value)
+      end
+
+      nil
+    end
 
-end; end
+    # @endgroup
+  end
+end

data/lib/striuct/classmethods/length.rb

@@ -1,14 +1,16 @@
-class Striuct; module ClassMethods
+# frozen_string_literal: true
 
-  # @group Length/Size
+class Striuct
+  module ClassMethods
+    # @group Length/Size
 
-  # @return [Integer]
-  def length
-    @autonyms.length
-  end
-  
-  alias_method :size, :length
+    # @return [Integer]
+    def length
+      @autonyms.length
+    end
 
-  # @endgroup
+    alias_method :size, :length
 
-end; end
+    # @endgroup
+  end
+end

data/lib/striuct/classmethods/macro.rb

@@ -1,122 +1,109 @@
-class Striuct; module ClassMethods
-
-  # @group Macro for Member Definition
-
-  ANYTHING = ::Validation::Condition::ANYTHING
-  
-  # @return [Class]
-  ADD_MEMBER_OptArg = OptionalArgument.define {
-    opt :default_value, aliases: [:default]
-    opt :default_proc, aliases: [:lazy_default]
-    conflict :default_value, :default_proc
-    opt :inference, default: false
-    opt :must, default: false
-    opt :setter_validation, aliases: [:writer_validation], default: true
-    opt :getter_validation, aliases: [:reader_validation], default: false
-  }
-
-  private
-
-  # @param [Symbol, String, #to_sym] autonym
-  # @param [#===, Proc, Method, ANYTHING] condition
-  # @param [Hash] options
-  # @option options [BasicObject] :default
-  # @option options [Proc] :default_proc
-  # @option options [Boolean] :inference
-  # @option options [Boolean] :must
-  # @option options [Boolean] :reader_validation
-  # @option options [Boolean] :getter_validation
-  # @option options [Boolean] :writer_validation
-  # @option options [Boolean] :setter_validation
-  # @return [nil]
-  def add_member(autonym, condition=ANYTHING, options={}, &adjuster)
-    _check_frozen
-    _check_closed
-    
-    options = ADD_MEMBER_OptArg.parse options
-    autonym = autonym.to_sym # First difinition for an autonym
-
-    raise ArgumentError, %Q!already exist name "#{autonym}"! if member? autonym
-    _check_safety_naming autonym
-    _add_autonym autonym
-
-    _attributes_for(autonym).safety_setter = !!options.setter_validation
-    _attributes_for(autonym).safety_getter = !!options.getter_validation
-
-    if options.inference
-      _attributes_for(autonym).inference = true
-    end
+# frozen_string_literal: true
+
+class Striuct
+  module ClassMethods
+    # @group Macro for Member Definition
+
+    ANYTHING = Eqq.ANYTHING()
+
+    # @return [Class]
+
+    private
+
+    # @param [Symbol, String, #to_sym] autonym
+    # @param [#===, Proc, Method] pattern
+    # @param [Proc] default_proc
+    # @param [Boolean] must
+    # @param [Boolean] writer_validation
+    # @param [Boolean] reader_validation
+    # @return [void]
+    def add_member(autonym, pattern=ANYTHING, default_value: nil, default_proc: nil, must: false, writer_validation: true, reader_validation: false, &adjuster)
+      _check_frozen
+      _check_closed
+
+      raise ArgumentError if !default_value.nil? && default_proc
+
+      autonym = autonym.to_sym # First definition for an autonym
+
+      raise ArgumentError, %Q!already exist name "#{autonym}"! if member?(autonym)
+
+      _check_safety_naming(autonym)
+      _add_autonym(autonym)
+
+      _attributes_for(autonym).safety_setter = writer_validation
+      _attributes_for(autonym).safety_getter = reader_validation
+
+      if must
+        _attributes_for(autonym).must = true
+      end
+
+      _def_getter(autonym)
+      _def_setter(autonym, pattern, &adjuster)
+
+      case
+      when !default_value.nil?
+        set_default_value(autonym, default_value)
+      when default_proc
+        set_default_value(autonym, &default_proc)
+      end
 
-    if options.must
-      _attributes_for(autonym).must = true
+      nil
     end
 
-    _def_getter autonym
-    _def_setter autonym, condition, &adjuster
-    
-    case
-    when options.default_value?
-      set_default_value autonym, options.default_value
-    when options.default_proc?
-      set_default_value autonym, &options.default_proc
+    alias_method :member, :add_member
+
+    # @param [Symbol, String, #to_sym] autonym
+    # @param [Symbol, String, #to_sym] autonyms
+    # @return [nil]
+    def add_members(autonym, *autonyms)
+      _check_frozen
+      _check_closed
+
+      [autonym, *autonyms].each { |name| add_member(name) }
+      nil
     end
-    
-    nil
-  end
 
-  alias_method :member, :add_member
-
-  # @param [Symbol, String, #to_sym] autonym
-  # @param [Symbol, String, #to_sym] autonyms
-  # @return [nil]
-  def add_members(autonym, *autonyms)
-    _check_frozen
-    _check_closed
-    
-    [autonym, *autonyms].each {|_autonym|add_member _autonym}
-    nil
-  end
+    # @param [Symbol, String, #to_sym] aliased
+    # @param [Symbol, String, #to_sym] autonym
+    # @return [nil]
+    def alias_member(aliased, autonym)
+      _check_frozen
+      _check_closed
+      autonym = autonym_for_member(autonym)
+      aliased = aliased.to_sym
+      raise ArgumentError, %Q!already exist name "#{aliased}"! if member?(aliased)
+
+      _check_safety_naming(aliased)
+
+      alias_method(aliased, autonym)
+      alias_method(:"#{aliased}=", :"#{autonym}=")
+      @aliases[aliased] = autonym
+      nil
+    end
 
-  # @param [Symbol, String, #to_sym] aliased
-  # @param [Symbol, String, #to_sym] autonym
-  # @return [nil]
-  def alias_member(aliased, autonym)
-    _check_frozen
-    _check_closed
-    autonym = autonym_for_member autonym
-    aliased  = aliased.to_sym
-    raise ArgumentError, %Q!already exist name "#{aliased}"! if member? aliased
-    _check_safety_naming aliased
-
-    alias_method aliased, autonym
-    alias_method :"#{aliased}=", :"#{autonym}="
-    @aliases[aliased] = autonym
-    nil
-  end
-  
-  # @param [Symbol, String, #to_sym] name
-  # @return [nil]
-  def set_default_value(name, value=nil, &block)
-    _check_frozen
-    _check_closed
-    autonym = autonym_for_member name
-    raise "already settled default value for #{name}" if with_default? autonym
-
-    if block_given?
-      unless value.nil?
-        raise ArgumentError, 'can not use default-value with default-proc'
+    # @param [Symbol, String, #to_sym] name
+    # @return [nil]
+    def set_default_value(name, value=nil, &block)
+      _check_frozen
+      _check_closed
+      autonym = autonym_for_member(name)
+      raise "already settled default value for #{name}" if with_default?(autonym)
+
+      if block
+        unless value.nil?
+          raise ArgumentError, 'can not use default-value with default-proc'
+        end
+
+        _attributes_for(autonym).set_default(block, :lazy)
+      else
+        _attributes_for(autonym).set_default(value, :value)
       end
 
-      _attributes_for(autonym).set_default block, :lazy
-    else
-      _attributes_for(autonym).set_default value, :value
+      nil
     end
-    
-    nil
-  end
-  
-  alias_method :default, :set_default_value
 
-  # @endgroup
+    alias_method :default, :set_default_value
 
-end; end
+    # @endgroup
+  end
+end