rtype-legacy 0.0.2 → 0.0.4

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: d83a1b9bdda46b928d39f78417ffdd1c6e2d29c1
-  data.tar.gz: db294d682cfc81e9e3fb85ad27ebc0a5dd721ad7
+  metadata.gz: 1cfd6d899191a80db171d581dcf6c4cf324e0fe3
+  data.tar.gz: 4fec96dfa193388fef8478984625d5cc30d02f9e
 SHA512:
-  metadata.gz: 00b1755b7d8d35d541064556e4eac6ad6ed45511b106fbcde14778f8aa60c7f2901e60a67ef38b7486e1e4b680d052027991bf7f577b96566deb6162b1d1a8da
-  data.tar.gz: ae8294f653096d7b145c5e5747af364cf302219f6d00fc1c30940a4332a27dc82ad1e9a600a650b7f36c99748f66d4bf17fc570131d0b248c17371eef7058dbe
+  metadata.gz: 602834cd3859a45248ead08fdda5ea34dd7a633c764319fdb8c5e6ce8427c438226293784ca2dc5de335514bfd22f01ee170d4a6c18d2a4bf75dae30d7e7ba42
+  data.tar.gz: 5891fbb28f6a11bc849d9487fe034f4581125ba14c383cf85b6b530495ca7d30d1ef354cb2520e7e9d9cea696af307c5c3a4ba66d66fcb65fdf170c422b61664

data/README.md

@@ -12,7 +12,9 @@ class Test
     a.to_i + b
   end
 
-  rtype [{state: Boolean}. {}] => Boolean
+  # Second hash is keyword argument signature
+  # (syntax compatibility with 'rtype' gem)
+  rtype [{state: Boolean}, {}] => Boolean
   def self.invert(opts)
     !opts[:state]
   end
@@ -22,7 +24,7 @@ Test.new.sum(123, "asd")
 # (Rtype::ArgumentTypeError) for 2nd argument:
 # Expected "asd" to be a Numeric
 
-Test::invert(state: 0)
+Test.invert(state: 0)
 # (Rtype::ArgumentTypeError) for 1st argument:
 # Expected {:state=>0} to be a hash with 1 elements:
 # - state : Expected 0 to be a Boolean
@@ -47,8 +49,10 @@ Test::invert(state: 0)
 - Provides type checking for arguments and return
 - [Type checking for hash elements](#hash)
 - [Duck Typing](#duck-typing)
-- [Typed Array](#typed-array)
+- [Typed Array](#typed-array), Typed Set, Typed Hash
 - [Numeric check](#special-behaviors). e.g. `Int >= 0`
+- [Type checking for getter and setter](#attr_accessor-with-rtype)
+- [float_accessor](#float_accessor), [bool_accessor](#bool_accessor)
 - Custom type behavior
 - ...
 
@@ -74,16 +78,8 @@ gem 'rtype-legacy-native'
 ```
 then, Rtype Legacy uses it. (**Do not** `require 'rtype-legacy-native'`)
 
-#### Java extension for JRuby
-Run
-```ruby
-gem install rtype-legacy-java
-```
-or add to your `Gemfile`:
-```ruby
-gem 'rtype-legacy-java'
-```
-then, Rtype Legacy uses it. (**Do not** `require 'rtype-legacy-java'`)
+#### Java extension for JRuby is automatic
+**Do not** `require 'rtype-java'`
 
 ## Usage
 
@@ -113,7 +109,7 @@ then, Rtype Legacy uses it. (**Do not** `require 'rtype-legacy-java'`)
   - Example: [Hash](#hash)
   
 - [Special Behaviors](#special-behaviors)
-  - `TypedArray`, `Num, Int, Flo`, `And`, `Xor`, `Not`, `Nilable`
+  - `TypedArray, TypedSet, TypedHash`, `Num, Int, Flo`, `And`, `Xor`, `Not`, `Nilable`
 
 ### Examples
 
@@ -209,10 +205,12 @@ func({"msg" => "hello hash"})
 func({msg: "hello hash"}) # hello hash
 ```
 
-#### rtype with attr_accessor
-`rtype_accessor` : calls `attr_accessor` if the accessor method(getter/setter) is not defined. and makes it typed
+#### attr_accessor with rtype
+- `rtype_accessor(*names, type)` : calls `attr_accessor` if the accessor methods(getter/setter) are not defined. and makes it typed
+- `rtype_reader(*names, type)` : calls `attr_reader` if the getters are not defined. and makes it typed
+- `rtype_writer(*names, type)` : calls `attr_writer` if the setters are not defined. and makes it typed
 
-You can use `rtype_accessor_self` for static accessor.
+You can use `rtype_accessor_self` for static accessor. (`rtype_reader_self`, `rtype_writer_self` also exist)
 
 ```ruby
 require 'rtype'
@@ -266,6 +264,29 @@ sum([1, 2, 3]) # => 6
 sum([1.0, 2, 3]) # => 6.0
 ```
 
+#### float_accessor
+```ruby
+class Point
+  float_accessor :x, :y
+end
+
+v = Point.new
+v.x = 1
+v.x # => 1.0 (always Float)
+```
+
+#### bool_accessor
+```ruby
+class Human
+  bool_accessor :hungry
+end
+
+a = Human.new
+a.hungry = true
+a.hungry? # => true
+a.hungry # NoMethodError
+```
+
 #### `rtype`
 ```ruby
 require 'rtype'
@@ -358,9 +379,14 @@ Example.new.method(:test).return_type
 
 #### Special Behaviors
   - `TypedArray` : Ensures value is an array with the type (type signature)
-    - `Array::of(type)` (recommended)
-    - or `Rtype::Behavior::TypedArray[type]`
+    - `Array.of(type)` (recommended)
     - Example: [TypedArray](#typed-array)
+    
+  - `TypedSet` : Ensures value is a set with the type (type signature)
+    - `Set.of(type)` (recommended)
+    
+  - `TypedHash` : Ensures value is a hash with the type (type signature)
+    - `Hash.of(key_type, value_type)` (recommended)
   
   - `Num, Int, Flo` : Numeric check
     - `Num/Int/Flo >/>=/</<=/== x`
@@ -369,19 +395,19 @@ Example.new.method(:test).return_type
     - e.g. `Flo >= 2` means value must be a `Float` and >= 2
   
   - `And` : Ensures value is valid for all given types
-    - `Rtype::and(*types)`, `Rtype::Behavior::And[*types]`
+    - `Rtype.and(*types)`, `Rtype::Behavior::And[*types]`
     - or `Array#comb`, `Object#and(*others)`
     
   - `Xor` : Ensures value is valid for only one of given types
-    - `Rtype::xor(*types)`, `Rtype::Behavior::Xor[*types]`
+    - `Rtype.xor(*types)`, `Rtype::Behavior::Xor[*types]`
     - or `Object#xor(*others)`
 
   - `Not` : Ensures value is not valid for all given types
-    - `Rtype::not(*types)`, `Rtype::Behavior::Not[*types]`
+    - `Rtype.not(*types)`, `Rtype::Behavior::Not[*types]`
     - or `Object#not`
 
   - `Nilable` : Value can be nil
-    - `Rtype::nilable(type)`, `Rtype::Behavior::Nilable[type]`
+    - `Rtype.nilable(type)`, `Rtype::Behavior::Nilable[type]`
     - or `Object#nilable`, `Object#or_nil`
 
   - You can create custom behaviors by extending `Rtype::Behavior::Base`
@@ -392,7 +418,7 @@ Example.new.method(:test).return_type
 ## Benchmarks
 Result of `rake benchmark` ([source](https://github.com/sputnikgugja/rtype-legacy/tree/master/benchmark/benchmark.rb))
 
-Rubype and Sig don't support 1.9 ruby. Typecheck raise an error in my environment
+Rubype and Sig don't support 1.9 ruby. Typecheck raises an error in my environment
 
 ### MRI
 ```

data/Rakefile

@@ -8,5 +8,5 @@ task :default => [:spec]
 # Benchmark
 desc "Compare with pure ruby and other gems"
 task :benchmark do
-  ruby "benchmark/benchmark.rb"
+	ruby "benchmark/benchmark.rb"
 end

data/lib/rtype/behavior.rb

@@ -9,4 +9,9 @@ require_relative 'behavior/xor'
 require_relative 'behavior/not'
 require_relative 'behavior/nilable'
 require_relative 'behavior/typed_array'
+require_relative 'behavior/typed_set'
+require_relative 'behavior/typed_hash'
+require_relative 'behavior/numeric_check'
+require_relative 'behavior/integer_check'
+require_relative 'behavior/float_check'
 require_relative 'behavior/core_ext'

data/lib/rtype/behavior/core_ext.rb

@@ -33,128 +33,142 @@ class Array
 	end
 end
 
+class Set
+	# @return [Rtype::Behavior::TypedSet]
+	def self.of(type_sig)
+		::Rtype::Behavior::TypedSet.new(type_sig)
+	end
+end
+
+class Hash
+	# @return [Rtype::Behavior::TypedHash]
+	def self.of(key_type, value_type)
+		::Rtype::Behavior::TypedHash.new(key_type, value_type)
+	end
+end
+
 class Num
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::NumericCheck]
 	# @example Value must be a Numeric and > 2
 	#   rtype [Num > 2] => Any
 	def self.>(x)
-		lambda { |obj| obj.is_a?(Numeric) && obj > x }
+		::Rtype::Behavior::NumericCheck.new(:>, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::NumericCheck]
 	# @example Value must be a Numeric and > 2
 	#   rtype [Num > 2] => Any
 	def self.>=(x)
-		lambda { |obj| obj.is_a?(Numeric) && obj >= x }
+		::Rtype::Behavior::NumericCheck.new(:>=, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::NumericCheck]
 	# @example Value must be a Numeric and > 2
 	#   rtype [Num > 2] => Any
 	def self.<(x)
-		lambda { |obj| obj.is_a?(Numeric) && obj < x }
+		::Rtype::Behavior::NumericCheck.new(:<, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::NumericCheck]
 	# @example Value must be a Numeric and > 2
 	#   rtype [Num > 2] => Any
 	def self.<=(x)
-		lambda { |obj| obj.is_a?(Numeric) && obj <= x }
+		::Rtype::Behavior::NumericCheck.new(:<=, x)
 	end
 	
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::NumericCheck]
 	# @example Value must be a Numeric and > 2
 	#   rtype [Num > 2] => Any
 	def self.==(x)
-		lambda { |obj| obj.is_a?(Numeric) && obj == x }
+		::Rtype::Behavior::NumericCheck.new(:==, x)
 	end
 end
 
 class Int
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::IntegerCheck]
 	# @example Value must be a Integer and > 2
 	#   rtype [Int > 2] => Any
 	def self.>(x)
-		lambda { |obj| obj.is_a?(Integer) && obj > x }
+		::Rtype::Behavior::IntegerCheck.new(:>, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::IntegerCheck]
 	# @example Value must be a Integer and > 2
 	#   rtype [Int > 2] => Any
 	def self.>=(x)
-		lambda { |obj| obj.is_a?(Integer) && obj >= x }
+		::Rtype::Behavior::IntegerCheck.new(:>=, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::IntegerCheck]
 	# @example Value must be a Integer and > 2
 	#   rtype [Int > 2] => Any
 	def self.<(x)
-		lambda { |obj| obj.is_a?(Integer) && obj < x }
+		::Rtype::Behavior::IntegerCheck.new(:<, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::IntegerCheck]
 	# @example Value must be a Integer and > 2
 	#   rtype [Int > 2] => Any
 	def self.<=(x)
-		lambda { |obj| obj.is_a?(Integer) && obj <= x }
+		::Rtype::Behavior::IntegerCheck.new(:<=, x)
 	end
 	
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::IntegerCheck]
 	# @example Value must be a Integer and > 2
 	#   rtype [Int > 2] => Any
 	def self.==(x)
-		lambda { |obj| obj.is_a?(Integer) && obj == x }
+		::Rtype::Behavior::IntegerCheck.new(:==, x)
 	end
 end
 
 class Flo
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::FloatCheck]
 	# @example Value must be a Float and > 2
 	#   rtype [Flo > 2] => Any
 	def self.>(x)
-		lambda { |obj| obj.is_a?(Float) && obj > x }
+		::Rtype::Behavior::FloatCheck.new(:>, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::FloatCheck]
 	# @example Value must be a Float and > 2
 	#   rtype [Flo > 2] => Any
 	def self.>=(x)
-		lambda { |obj| obj.is_a?(Float) && obj >= x }
+		::Rtype::Behavior::FloatCheck.new(:>=, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::FloatCheck]
 	# @example Value must be a Float and > 2
 	#   rtype [Flo > 2] => Any
 	def self.<(x)
-		lambda { |obj| obj.is_a?(Float) && obj < x }
+		::Rtype::Behavior::FloatCheck.new(:<, x)
 	end
 
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::FloatCheck]
 	# @example Value must be a Float and > 2
 	#   rtype [Flo > 2] => Any
 	def self.<=(x)
-		lambda { |obj| obj.is_a?(Float) && obj <= x }
+		::Rtype::Behavior::FloatCheck.new(:<=, x)
 	end
 	
 	# @param [Numeric] x
-	# @return [Proc]
+	# @return [Rtype::Behavior::FloatCheck]
 	# @example Value must be a Float and > 2
 	#   rtype [Flo > 2] => Any
 	def self.==(x)
-		lambda { |obj| obj.is_a?(Float) && obj == x }
+		::Rtype::Behavior::FloatCheck.new(:==, x)
 	end
 end

data/lib/rtype/behavior/float_check.rb

@@ -0,0 +1,17 @@
+module Rtype
+	module Behavior
+		class FloatCheck < NumericCheck
+			def valid?(value)
+				if value.is_a?(Float)
+					@lambda.call(value)
+				else
+					false
+				end
+			end
+
+			def error_message(value)
+				"Expected #{value.inspect} to be a float #{@condition} #{@x}"
+			end
+		end
+	end
+end

data/lib/rtype/behavior/integer_check.rb

@@ -0,0 +1,17 @@
+module Rtype
+	module Behavior
+		class IntegerCheck < NumericCheck
+			def valid?(value)
+				if value.is_a?(Integer)
+					@lambda.call(value)
+				else
+					false
+				end
+			end
+
+			def error_message(value)
+				"Expected #{value.inspect} to be an integer #{@condition} #{@x}"
+			end
+		end
+	end
+end

data/lib/rtype/behavior/numeric_check.rb

@@ -0,0 +1,42 @@
+module Rtype
+	module Behavior
+		class NumericCheck < Base
+			@@conditions = [
+				:>, :<, :>=, :<=, :==
+			]
+			
+			# @param [Symbol] condition
+			# @param [Numeric] x
+			def initialize(condition, x)
+				raise ArgumentError, "Invalid condition '#{condition}'" unless @@conditions.include?(condition)
+				raise ArgumentError, "x is not a Numeric" unless x.is_a?(Numeric)
+				@condition = condition
+				@x = x
+				@lambda = case condition
+					when :>
+						lambda { |obj| obj > @x }
+					when :<
+						lambda { |obj| obj < @x }
+					when :>=
+						lambda { |obj| obj >= @x }
+					when :<=
+						lambda { |obj| obj <= @x }
+					when :==
+						lambda { |obj| obj == @x }
+				end
+			end
+			
+			def valid?(value)
+				if value.is_a?(Numeric)
+					@lambda.call(value)
+				else
+					false
+				end
+			end
+
+			def error_message(value)
+				"Expected #{value.inspect} to be a numeric #{@condition} #{@x}"
+			end
+		end
+	end
+end

data/lib/rtype/behavior/typed_array.rb

@@ -1,5 +1,6 @@
 module Rtype
 	module Behavior
+		# Typed array behavior. empty array allowed
 		class TypedArray < Base
 			def initialize(type)
 				@type = type

data/lib/rtype/behavior/typed_hash.rb

@@ -0,0 +1,29 @@
+module Rtype
+	module Behavior
+		# Typed hash behavior. empty hash allowed
+		class TypedHash < Base
+			def initialize(key_type, value_type)
+				@ktype = key_type
+				@vtype = value_type
+				Rtype.assert_valid_argument_type_sig_element(@ktype)
+				Rtype.assert_valid_argument_type_sig_element(@vtype)
+			end
+
+			def valid?(value)
+				if value.is_a?(Hash)
+					any = value.any? do |k, v|
+						!Rtype::valid?(@ktype, k) ||
+						!Rtype::valid?(@vtype, v)
+					end
+					!any
+				else
+					false
+				end
+			end
+
+			def error_message(value)
+				"Expected #{value.inspect} to be a hash with key type #{@ktype.inspect} and value type #{@vtype.inspect}"
+			end
+		end
+	end
+end

data/lib/rtype/behavior/typed_set.rb

@@ -0,0 +1,26 @@
+module Rtype
+	module Behavior
+		# Typed set behavior. empty set allowed
+		class TypedSet < Base
+			def initialize(type)
+				@type = type
+				Rtype.assert_valid_argument_type_sig_element(@type)
+			end
+
+			def valid?(value)
+				if value.is_a?(Set)
+					any = value.any? do |e|
+						!Rtype::valid?(@type, e)
+					end
+					!any
+				else
+					false
+				end
+			end
+
+			def error_message(value)
+				"Expected #{value.inspect} to be a set with type #{@type.inspect}"
+			end
+		end
+	end
+end

data/lib/rtype/core_ext.rb

@@ -59,50 +59,179 @@ private
 	
 	# Makes the accessor methods (getter and setter) typed
 	# 
-	# @param [Array<#to_sym>] accessor_names
+	# @param [Array<#to_sym>] names
 	# @param type_behavior A type behavior
 	# @return [void]
 	# 
-	# @raise [ArgumentError] If accessor_names contains nil
+	# @raise [ArgumentError] If names contains nil
 	# @raise [TypeSignatureError] If type_behavior is invalid
 	# @raise [RuntimeError] If called outside of module
 	# @see #rtype
-	def rtype_accessor(*accessor_names, type_behavior)
-		accessor_names.each do |accessor_name|
-			raise ArgumentError, "accessor_names contains nil" if accessor_name.nil?
+	def rtype_accessor(*names, type_behavior)
+		rtype_reader(*names, type_behavior)
+		rtype_writer(*names, type_behavior)
+	end
+	
+	# Makes the accessor methods (getter and setter) typed
+	# 
+	# @param [Array<#to_sym>] names
+	# @param type_behavior A type behavior
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	# @raise [TypeSignatureError] If type_behavior is invalid
+	# @see #rtype_self
+	def rtype_accessor_self(*names, type_behavior)
+		rtype_reader_self(*names, type_behavior)
+		rtype_writer_self(*names, type_behavior)
+	end
+	
+	# Makes the getter methods typed
+	# 
+	# @param [Array<#to_sym>] names
+	# @param type_behavior A type behavior
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	# @raise [TypeSignatureError] If type_behavior is invalid
+	# @raise [RuntimeError] If called outside of module
+	# @see #rtype
+	def rtype_reader(*names, type_behavior)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
 			
-			accessor_name = accessor_name.to_sym
-			if !respond_to?(accessor_name) || !respond_to?(:"#{accessor_name}=")
-				attr_accessor accessor_name
+			name = name.to_sym
+			if !respond_to?(name)
+				attr_reader name
 			end
 
 			if is_a?(Module)
-				::Rtype::define_typed_accessor(self, accessor_name, type_behavior, false)
+				::Rtype::define_typed_reader(self, name, type_behavior, false)
 			else
-				raise "rtype_accessor doesn't work in the outside of module"
+				raise "rtype_reader doesn't work in the outside of module"
 			end
 		end
 		nil
 	end
 	
-	# Makes the accessor methods (getter and setter) typed
+	# Makes the getter methods typed
 	# 
-	# @param [Array<#to_sym>] accessor_names
+	# @param [Array<#to_sym>] names
 	# @param type_behavior A type behavior
 	# @return [void]
 	# 
-	# @raise [ArgumentError] If accessor_names contains nil
+	# @raise [ArgumentError] If names contains nil
 	# @raise [TypeSignatureError] If type_behavior is invalid
 	# @see #rtype_self
-	def rtype_accessor_self(*accessor_names, type_behavior)
-		accessor_names.each do |accessor_name|
-			raise ArgumentError, "accessor_names contains nil" if accessor_name.nil?
+	def rtype_reader_self(*names, type_behavior)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
+			
+			name = name.to_sym
+			if !respond_to?(name)
+				singleton_class.send(:attr_reader, name)
+			end
+			::Rtype::define_typed_reader(self, name, type_behavior, true)
+		end
+		nil
+	end
+	
+	# Makes the setter methods typed
+	# 
+	# @param [Array<#to_sym>] names
+	# @param type_behavior A type behavior
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	# @raise [TypeSignatureError] If type_behavior is invalid
+	# @raise [RuntimeError] If called outside of module
+	# @see #rtype
+	def rtype_writer(*names, type_behavior)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
+			
+			name = name.to_sym
+			if !respond_to?(:"#{name}=")
+				attr_writer name
+			end
+
+			if is_a?(Module)
+				::Rtype::define_typed_writer(self, name, type_behavior, false)
+			else
+				raise "rtype_writer doesn't work in the outside of module"
+			end
+		end
+		nil
+	end
+	
+	# Makes the setter methods typed
+	# 
+	# @param [Array<#to_sym>] names
+	# @param type_behavior A type behavior
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	# @raise [TypeSignatureError] If type_behavior is invalid
+	# @see #rtype_self
+	def rtype_writer_self(*names, type_behavior)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
+			
+			name = name.to_sym
+			if !respond_to?(:"#{name}=")
+				singleton_class.send(:attr_writer, name)
+			end
+			::Rtype::define_typed_writer(self, name, type_behavior, true)
+		end
+		nil
+	end
+	
+	# Creates getter, setter methods.
+	# The getter method is typed with Float
+	# and the setter method is typed with Numeric.
+	# 
+	# If the setter is called with a numeric given,
+	# the setter convert the numeric to a float, and store it.
+	# 
+	# As a result, setter can accept a Numeric(Integer/Float), and getter always returns a Float
+	# 
+	# @param [Array<#to_sym>] names
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	def float_accessor(*names)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
+			
+			name = name.to_sym
+			rtype_reader name, Float
+			define_method(:"#{name}=") do |val|
+				instance_variable_set(:"@#{name}", val.to_f)
+			end
+			::Rtype::define_typed_writer(self, name, Numeric, false)
+		end
+		nil
+	end
+	
+	# Creates getter, setter methods. And makes it typed with Boolean.
+	# The name of the getter ends with `?`.
+	# 
+	# e.g. `bool_accessor :closed` will create `closed=` and `closed?` methods
+	# 
+	# @param [Array<#to_sym>] names
+	# @return [void]
+	# 
+	# @raise [ArgumentError] If names contains nil
+	def bool_accessor(*names)
+		names.each do |name|
+			raise ArgumentError, "names contains nil" if name.nil?
 			
-			accessor_name = accessor_name.to_sym
-			if !respond_to?(accessor_name) || !respond_to?(:"#{accessor_name}=")
-				singleton_class.send(:attr_accessor, accessor_name)
+			name = name.to_sym
+			rtype_writer name, Boolean
+			define_method(:"#{name}?") do
+				instance_variable_get(:"@#{name}")
 			end
-			::Rtype::define_typed_accessor(self, accessor_name, type_behavior, true)
+			::Rtype::define_typed_reader(self, :"#{name}?", Boolean, false)
 		end
 		nil
 	end

data/lib/rtype/legacy.rb

@@ -77,27 +77,46 @@ module Rtype
 
 		redefine_method_to_typed(owner, method_name, expected_args, return_sig, singleton)
 	end
-
-	# Calls `attr_accessor` if the accessor method(getter/setter) is not defined.
-	# and makes it typed.
+	
+	# @param owner Owner of the accessor
+	# @param [#to_sym] name
+	# @param type_behavior A type behavior. e.g. Integer
+	# @param [Boolean] singleton Whether the method is singleton method
+	# @return [void]
 	# 
-	# this method uses `define_typed_method` for getter and setter.
+	# @raise [ArgumentError] If name is nil
+	# @raise [TypeSignatureError]
+	def define_typed_accessor(owner, name, type_behavior, singleton)
+		define_typed_reader(owner, name, type_behavior, singleton)
+		define_typed_writer(owner, name, type_behavior, singleton)
+	end
+	
+	# @param owner Owner of the getter
+	# @param [#to_sym] name
+	# @param type_behavior A type behavior. e.g. Integer
+	# @param [Boolean] singleton Whether the method is singleton method
+	# @return [void]
 	# 
-	# @param owner Owner of the accessor
-	# @param [#to_sym] accessor_name
+	# @raise [ArgumentError] If name is nil
+	# @raise [TypeSignatureError]
+	def define_typed_reader(owner, name, type_behavior, singleton)
+		raise ArgumentError, "name is nil" if name.nil?
+		valid?(type_behavior, nil)
+		define_typed_method owner, name.to_sym, {[] => type_behavior}, singleton
+	end
+	
+	# @param owner Owner of the setter
+	# @param [#to_sym] name
 	# @param type_behavior A type behavior. e.g. Integer
 	# @param [Boolean] singleton Whether the method is singleton method
 	# @return [void]
 	# 
-	# @raise [ArgumentError] If accessor_name is nil or singleton is not a boolean
+	# @raise [ArgumentError] If name is nil
 	# @raise [TypeSignatureError]
-	def define_typed_accessor(owner, accessor_name, type_behavior, singleton)
-		raise ArgumentError, "accessor_name is nil" if accessor_name.nil?
-		getter = accessor_name.to_sym
-		setter = :"#{accessor_name}="
+	def define_typed_writer(owner, name, type_behavior, singleton)
+		raise ArgumentError, "name is nil" if name.nil?
 		valid?(type_behavior, nil)
-		define_typed_method owner, getter, {[] => type_behavior}, singleton
-		define_typed_method owner, setter, {[type_behavior] => Any}, singleton
+		define_typed_method owner, :"#{name.to_sym}=", {[type_behavior] => Any}, singleton
 	end
 
 	# This is just 'information'

data/lib/rtype/legacy/version.rb

@@ -1,6 +1,6 @@
 module Rtype
 	module Legacy
-		VERSION = "0.0.2".freeze
+		VERSION = "0.0.4".freeze
 		# rtype java extension version. nil If the extension is not used
 		JAVA_EXT_VERSION = nil unless const_defined?(:JAVA_EXT_VERSION, false)
 		# rtype c extension version. nil If the extension is not used

data/spec/rtype_legacy_spec.rb

@@ -152,6 +152,93 @@ describe Rtype::Legacy do
 		expect {TestClass::value2}.to raise_error Rtype::ReturnTypeError
 	end
 
+	it 'Kernel#rtype_reader' do
+		class ReaderTestClass
+			rtype_reader :value, :value2, String
+
+			def initialize
+				@value = 123
+				@value2 = 123
+			end
+		end
+		expect {ReaderTestClass.new.value}.to raise_error Rtype::ReturnTypeError
+		expect {ReaderTestClass.new.value2}.to raise_error Rtype::ReturnTypeError
+	end
+
+	it 'Kernel#rtype_reader_self' do
+		class ReaderTestClass
+			@@value = 123
+			@@value2 = 123
+			rtype_reader_self :value, :value2, String
+		end
+		expect {ReaderTestClass::value}.to raise_error Rtype::ReturnTypeError
+		expect {ReaderTestClass::value2}.to raise_error Rtype::ReturnTypeError
+	end
+
+	it 'Kernel#rtype_writer' do
+		class WriterTestClass
+			rtype_writer :value, :value2, String
+
+			def initialize
+				@value = 123
+				@value2 = 123
+			end
+		end
+		expect {WriterTestClass.new.value = 123}.to raise_error Rtype::ArgumentTypeError
+		expect {WriterTestClass.new.value2 = 123}.to raise_error Rtype::ArgumentTypeError
+	end
+
+	it 'Kernel#rtype_writer_self' do
+		class WriterTestClass
+			@@value = 123
+			@@value2 = 123
+			rtype_writer_self :value, :value2, String
+		end
+		expect {WriterTestClass::value = 123}.to raise_error Rtype::ArgumentTypeError
+		expect {WriterTestClass::value2 = 123}.to raise_error Rtype::ArgumentTypeError
+	end
+
+	it 'Kernel#float_accessor' do
+		class FloatAccessorTestClass
+			float_accessor :float, :int
+			
+			def initialize
+				@float = 10.0
+				@int = 10
+			end
+		end
+		
+		float_accessor_test = FloatAccessorTestClass.new
+		
+		float_accessor_test.float
+		expect {float_accessor_test.int}.to raise_error Rtype::ReturnTypeError
+		float_accessor_test.float = 5.0
+		float_accessor_test.float = 5
+		expect(float_accessor_test.float).to eql(5.0) # be(expected) => passes if actual.eql?(expected)
+		expect(float_accessor_test.float).not_to eql(5)
+	end
+
+	it 'Kernel#bool_accessor' do
+		class BoolAccessorTestClass
+			bool_accessor :state, :invalid_var
+			
+			def initialize
+				@state = false
+				@invalid_var = 123
+			end
+		end
+		
+		bool_accessor_test = BoolAccessorTestClass.new
+		
+		bool_accessor_test.state?
+		expect {bool_accessor_test.state}.to raise_error NoMethodError
+		expect(bool_accessor_test.state?).to eql(false)
+		bool_accessor_test.state = true
+		expect(bool_accessor_test.state?).to eql(true)
+		expect {bool_accessor_test.state = 123}.to raise_error Rtype::ArgumentTypeError
+		expect {bool_accessor_test.invalid_var?}.to raise_error Rtype::ReturnTypeError
+	end
+
 	describe 'Test type behaviors' do
 		describe 'Module' do
 			it "is right" do
@@ -451,6 +538,65 @@ describe Rtype::Legacy do
 				end
 			end
 			
+			describe 'Rtype::Behavior::TypedSet' do
+				it 'class singleton [] method' do
+					klass.send :rtype, :return_nil, [ Rtype::Behavior::TypedSet[Integer] ] => nil
+					instance.return_nil( Set.new([123]) )
+					expect {instance.return_nil(123)}.to raise_error Rtype::ArgumentTypeError
+					expect { instance.return_nil(Set.new([1.0])) }.to raise_error Rtype::ArgumentTypeError
+				end
+
+				it 'core extension method (Set::of)' do
+					klass.send :rtype, :return_nil, [ Set.of(Integer) ] => nil
+					instance.return_nil( Set.new([123]) )
+					expect {instance.return_nil(123)}.to raise_error Rtype::ArgumentTypeError
+					expect { instance.return_nil(Set.new([1.0])) }.to raise_error Rtype::ArgumentTypeError
+				end
+				
+				it 'complicated type sig' do
+					klass.send :rtype, :return_nil, [ Set.of(:to_i.and(:chars)) ] => nil
+					instance.return_nil( Set.new(["hello"]) )
+					expect {instance.return_nil("hello")}.to raise_error Rtype::ArgumentTypeError
+					expect { instance.return_nil(Set.new([123])) }.to raise_error Rtype::ArgumentTypeError
+				end
+				
+				it 'allows empty set' do
+					klass.send :rtype, :return_nil, [ Set.of(Integer) ] => nil
+					instance.return_nil(Set.new)
+				end
+			end
+			
+			describe 'Rtype::Behavior::TypedHash' do
+				it 'class singleton [] method' do
+					klass.send :rtype, :return_nil, [ Rtype::Behavior::TypedHash[Symbol, Integer] ] => nil
+					instance.return_nil( {key: 123} )
+					expect {instance.return_nil(:key)}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil(123)}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil( {"key" => 123} )}.to raise_error Rtype::ArgumentTypeError
+				end
+
+				it 'core extension method (Hash::of)' do
+					klass.send :rtype, :return_nil, [ Hash.of(Symbol, Integer) ] => nil
+					instance.return_nil( {key: 123} )
+					expect {instance.return_nil(:key)}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil(123)}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil( {"key" => 123} )}.to raise_error Rtype::ArgumentTypeError
+				end
+				
+				it 'complicated type sig' do
+					klass.send :rtype, :return_nil, [ Hash.of(:to_i.and(:chars), :to_i.and(:chars)) ] => nil
+					instance.return_nil( {"key" => "val"} )
+					expect {instance.return_nil("hello")}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil( {key: "val"} )}.to raise_error Rtype::ArgumentTypeError
+					expect {instance.return_nil( {"key" => :val} )}.to raise_error Rtype::ArgumentTypeError
+				end
+				
+				it 'allows empty hash' do
+					klass.send :rtype, :return_nil, [ Hash.of(Symbol, Integer) ] => nil
+					instance.return_nil({})
+				end
+			end
+			
 			describe 'Numeric check' do
 				it 'Num (Numeric)' do
 					klass.send :rtype, :return_nil, [Num >= 0] => Any

data/spec/spec_helper.rb

@@ -3,6 +3,7 @@ Coveralls.wear!
 
 require 'rtype/legacy'
 require 'rspec'
+require 'set'
 
 if !Rtype::Legacy::NATIVE_EXT_VERSION.nil?
 	puts "Rtype Legacy with native extension"

metadata

@@ -1,14 +1,14 @@
 --- !ruby/object:Gem::Specification
 name: rtype-legacy
 version: !ruby/object:Gem::Version
-  version: 0.0.2
+  version: 0.0.4
 platform: ruby
 authors:
 - Sputnik Gugja
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2016-08-03 00:00:00.000000000 Z
+date: 2016-08-20 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rake
@@ -68,9 +68,14 @@ files:
 - lib/rtype/behavior/and.rb
 - lib/rtype/behavior/base.rb
 - lib/rtype/behavior/core_ext.rb
+- lib/rtype/behavior/float_check.rb
+- lib/rtype/behavior/integer_check.rb
 - lib/rtype/behavior/nilable.rb
 - lib/rtype/behavior/not.rb
+- lib/rtype/behavior/numeric_check.rb
 - lib/rtype/behavior/typed_array.rb
+- lib/rtype/behavior/typed_hash.rb
+- lib/rtype/behavior/typed_set.rb
 - lib/rtype/behavior/xor.rb
 - lib/rtype/core_ext.rb
 - lib/rtype/legacy.rb