striuct 0.4.4 → 0.7.0

data/MIT-LICENSE

@@ -1,22 +0,0 @@
-(The MIT X11 License)
-
-Copyright (c) 2011 Kenichi Kamiya
-
-Permission is hereby granted, free of charge, to any person obtaining
-a copy of this software and associated documentation files (the
-'Software'), to deal in the Software without restriction, including
-without limitation the rights to use, copy, modify, merge, publish,
-distribute, sublicense, and/or sell copies of the Software, and to
-permit persons to whom the Software is furnished to do so, subject to
-the following conditions:
-
-The above copyright notice and this permission notice shall be
-included in all copies or substantial portions of the Software.
-
-THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
-EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
-IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
-CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
-TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
-SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -1,10 +0,0 @@
-#!/usr/bin/env rake
-require 'bundler/gem_tasks'
-
-require 'rake/testtask'
-
-task default: [:test]
-
-Rake::TestTask.new do |tt|
-  tt.verbose = true
-end

data/benchmark/basics.rb

@@ -1,56 +0,0 @@
-#/usr/bin/ruby -w
-
-require 'benchmark'
-require_relative '../lib/striuct'
-
-XStruct = Struct.new :any, :no_use1, :no_use2
-
-XStriuct = Striuct.define do
-  member :any
-  member :int, Integer
-  member :truthy, ->v{v}
-end
-
-xstruct = XStruct.new
-xstriuct = XStriuct.new
-
-TIMES = 100000
-OBJ = 123
-
-Benchmark.bm do |bm|
-  bm.report 'Struct(equal Noguard): Setter' do
-    TIMES.times do
-      xstruct.any = OBJ
-    end
-  end
-  
-  bm.report 'Struct: Reader' do
-    TIMES.times do
-      xstruct.any
-    end
-  end
-  
-  bm.report 'Striuct(when Noguard): Setter' do
-    TIMES.times do
-      xstriuct.any = OBJ
-    end
-  end
-
-  bm.report 'Striuct(guard under class): Setter' do
-    TIMES.times do
-      xstriuct.int = OBJ
-    end
-  end
-  
-  bm.report 'Striuct(guard under function)' do
-    TIMES.times do
-      xstriuct.truthy = OBJ
-    end
-  end
-  
-  bm.report 'Striuct: Reader' do
-    TIMES.times do
-      xstriuct.any
-    end
-  end
-end

data/example/README.rb

@@ -1,53 +0,0 @@
-$VERBOSE = true
-
-require_relative '../lib/striuct'
-
-class Person < Striuct
-  member :fullname, AND(String, /\A.+\z/)     # Flexible Validation
-  alias_member :name, :fullname               # Use other name
-end
-
-class User < Person                           # Inheritable
-  member :id, Integer,                        # Looks typed validation
-              default_proc: ->{User.next_id}  # With default value
-
-  @id = 0
-  def self.next_id
-    @id += 1
-  end
-end
-
-john = User.new 'john'
-p john[:name]      #=> 'john' 
-#~ p john.name = ''  #=> error
-p john.id          #=> 1
-ken = User[name: 'ken']                       # Construct from hash
-p ken.id           #=> 2
-
-class Foo < Striuct
-  member :foo
-  member :bar, Numeric,
-               inference: true
-  member :with_adjuster, Integer,
-                         &->v{Integer v}
-end
-
-foo = Foo.new
-p foo.foo           #=> nil
-p foo.assigned?(:foo) #=> false
-foo.foo = nil
-p foo.assigned?(:foo) #=> true
-foo.lock(:foo)
-#~ foo.foo = nil       #=> error
-foo.bar = 1.2
-#~ foo.bar = 1          #=> error
-
-foo.with_adjuster = '5'
-p foo.with_adjuster
-
-class UseMustOption < Striuct
-  member :foo, Integer, must: true
-end
-
-#~ p UseMustOption.new #=> InvalidOperationError
-p UseMustOption.new(1)

data/example/example1.rb

@@ -1,235 +0,0 @@
-#/usr/bin/ruby -w
-
-require_relative '../lib/striuct'
-
-def debug(message)
-  puts "line: #{caller.first.slice(/:(\w+)/, 1)}"
-  puts message.inspect, '-' * 80
-end
-
-
-# 1. Struct+ "Secure"
-
-# macro "member" provides to use condtions
-class User < Striuct.new
-  member :id,   Integer
-  member :age,  (20..140)
-  member :name, OR(/\A\w+\z/, /\A\w+ \w+\z/)
-end
-
-user = User.new 128381, 20
-debug user
-
-user.age = 30
-user[2] = 'taro yamada'
-debug user
-
-# fail (Exception  Striuct::ConditionError)
-begin
-  user[:id] = 10.0
-rescue
-  debug $!
-end
-
-begin
-  user.age = 19
-rescue
-  debug $!
-end
-
-begin
-  user[2] = 'typo! name'
-rescue
-  debug $!
-end
-
-# more detail checker do you need, use functional object
-module Game
-  class Character
-  end
-
-  class DB < Striuct.new
-    member :monsters,   ->list{(list - characters).empty?}
-    member :characters, GENERICS(Character)
-  end
-  
-  monster = Character.new
-  db = DB.new
-  
-  begin
-    db.characters = [1, 2]
-  rescue
-    debug $!
-  end
-  
-  db.characters = [monster, Character.new]
-  debug db
-  
-  begin
-    db.monsters = [Character.new]
-  rescue
-    debug $!
-  end
-  
-  db.monsters = [monster]
-  debug db
-end
-
-# through "inference", and check under first passed object class
-class FlexibleContainer < Striuct.new
-  member :anything, BasicObject, inference: true
-  member :number,   Numeric, inference: true
-end
-
-fc1, fc2 = FlexibleContainer.new, FlexibleContainer.new
-fc1.anything = 'str'
-debug fc1
-begin
-  fc1.anything = :sym
-rescue
-  debug $!
-end
-
-begin
-  fc2.anything = :sym
-rescue
-  debug $!
-end
-
-fc2.anything = 'string too'
-
-debug fc2
-
-begin
-  fc1.number = 'str'
-rescue
-  debug $!
-end
-
-fc1.number = 1.0
-debug fc1
-
-begin
-  fc2.number = 1
-rescue
-  debug $!
-end
-
-# Standard Struct not check member name. 
-NoGuard = Struct.new :__send__, :'?  !'
-noguard = NoGuard.new false
-debug noguard.__send__
-debug noguard.methods.include?(:'?  !') # lost!!
-
-# Striuct provides safety levels for naming.
-class SafetyNaming < Striuct.new
-  begin
-    member :__send__
-  rescue
-    debug $!
-  end
-  
-  begin
-    member :'?  !'
-  rescue
-    debug $!
-  end
-  
-  # tempolary set lower
-  conflict_management :struct do
-    member :__send__, :'?  !'
-  end
-  
-end
-
-# 2. Struct+ "Handy"
-
-# to through block called "flavor"
-# below case for type cast
-class User2 < Striuct.new
-  member :age, OR(/\A\d+\z/, Numeric) do |arg|
-    Integer arg
-  end
-  
-  member :name, ->v{v.respond_to? :to_s} do |v|
-    v.to_s.to_sym
-  end
-end
-
-user2 = User2.new
-user2.age = 9
-debug user2
-
-user2.age = 10.1
-debug user2
-
-user2.age = '10'
-debug user2
-
-user2.name = 10
-debug user2
-user2.name = Class
-debug user2
-
-# Default value
-
-class User3 < Striuct.new
-  member  :lank, Fixnum
-  default :lank, 3
-  member  :name
-end
-
-user3 = User3.new
-user3
-debug user3
-
-# Standard Struct always define "nil is default". ...realy?
-debug user3.assigned?(:name)
-user3.name = nil
-debug user3.assigned?(:name)
-
-# Alias
-
-class User3
-  alias_member :position, :lank
-end
-
-debug user3.lank.equal?(user3.position)
-debug user3[:lank].equal?(user3[:position])
-user3[:position] = 4
-debug user3.lank
-
-# New Constructors
-
-# Subclass.define reject floating object
-# * except if no finished assign each members
-# * return object is frozen
-user3 = User3.define do |r|
-  r.lank = 10
-  r.name = 'foo'
-end
-
-debug user3
-
-# Subclass.load_pairs easy make from Hash and like Hash
-user3 = User3[lank:10, name: 'foo']
-
-debug user3
-
-# 3. Keeping Struct's good interface
-
-Sth1 = Striuct.new do
-  def my_special_method
-  end
-end
-
-debug Sth1.new.respond_to?(:my_special_method)
-
-# to_struct
-MyC = Striuct.new :a, :b
-a =  MyC.to_struct_class
-p a
-
-p MyC.new.to_struct
-myc = Striuct.new :a, :b
-p myc.new.to_struct

data/example/example2.rb

@@ -1,22 +0,0 @@
-#!/usr/local/bin/ruby -w
-
-$VERBOSE = true
-
-require_relative '../lib/striuct'
-
-User = Striuct.define do  # other way "class User < Striuct.new"
-  member :firstname, /\w+/ # look like case syntax in Ruby
-  member :lank, AND(Fixnum, 1..10) # easy build multiple validation
-  default :lank, 3        # set a normal default value
-  member :registered, Time # look like type variable
-  default :registered, &->{Time.now} # evaluate with construction          
-  p members #=> [firstname, lank, registered]
-end
-
-class MyUser < User
-  p members #=> [firstname, lank, registered]
-  member :foo # no validation, just an accessor
-  p members #=> [firstname, lank, registered, :foo]
-end
-
-user = MyUser.new

data/example/see_trace.rb

@@ -1,32 +0,0 @@
-#/usr/bin/ruby -w
-
-require_relative '../lib/striuct'
-
-class User < Striuct.new
-  member :id,   Integer
-  member :age,  (20..140)
-end
-
-user = User.new
-
-begin
-  user[:id] = 10.0
-rescue
-  puts $!.backtrace
-end
-
-puts '-' * 80
-
-$stdout.flush
-
-begin
-  user.age = 19
-rescue
-  puts $!.backtrace
-end
-
-puts '-' * 80
-
-$stdout.flush
-
-user.age = 19

data/striuct.gemspec

@@ -1,36 +0,0 @@
-Gem::Specification.new do |gem|
-  # specific
-
-  gem.description   = %q{Struct++ library.
-
----
-
-  Validatable, Inheritable, Member Aliasing,
-  Conflict Management, Default Value, Divide nil with unassign,
-  Lock setter of each member, Hash flendly API, ... And more Struct++ features :)}
-
-  gem.summary       = gem.description.dup
-  gem.homepage      = 'http://kachick.github.com/striuct/'
-  gem.license       = 'MIT'
-  gem.name          = 'striuct'
-  gem.version       = '0.4.4'
-
-  gem.required_ruby_version = '>= 1.9.2'
-
-  gem.add_runtime_dependency 'validation', '~> 0.0.5'
-  gem.add_runtime_dependency 'optionalargument', '~> 0.0.3'
-  gem.add_runtime_dependency 'keyvalidatable', '~> 0.0.5'
-
-  gem.add_development_dependency 'yard', '>= 0.8.6.1', '< 2'
-  gem.add_development_dependency 'rake', '>= 10', '< 20'
-  gem.add_development_dependency 'bundler', '>= 1.3.5', '< 2'
-
-  # common
-
-  gem.authors       = ['Kenichi Kamiya']
-  gem.email         = ['kachick1+ruby@gmail.com']
-  gem.files         = `git ls-files`.split($\)
-  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
-  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
-  gem.require_paths = ['lib']
-end