require 'dry/logic/rule'

RSpec.describe Dry::Logic::Rule::Set do
  include_context 'predicates'

  subject(:rule) do
    Dry::Logic::Rule::Set.new([is_string, min_size.curry(6)])
  end

  let(:is_string) { Dry::Logic::Rule::Value.new(str?) }
  let(:min_size) { Dry::Logic::Rule::Value.new(min_size?) }

  describe '#call' do
    it 'applies its rules to the input' do
      expect(rule.('Address')).to be_success
      expect(rule.('Addr')).to be_failure
    end
  end

  describe '#to_ast' do
    it 'returns an array representation' do
      expect(rule.to_ast).to eql([
        :set, [
          [:val, [:predicate, [:str?, []]]],
          [:val, [:predicate, [:min_size?, [6]]]]
        ]
      ])
    end
  end
end