module Dry::Types::BuilderMethods

def Array(type)
  self::Array.of(type)
end

def Constant(object)
  Definition.new(object.class).constrained(is: object)
end

def Constructor(klass, cons = nil, &block)
  Definition.new(klass).constructor(cons || block || klass.method(:new))
end

def Definition(klass)
  Definition.new(klass)
end

def Hash(schema, type_map)
  self::Hash.public_send(schema, type_map)
end

def Instance(klass)
  Definition.new(klass).constrained(type: klass)
end

def Map(key_type, value_type)
  Types['hash'].map(key_type, value_type)
end

def Value(value)
  Definition.new(value.class).constrained(eql: value)
end

def included(base)
  super
  base.extend(BuilderMethods)
end