# frozen_string_literal: true

RSpec.describe Fear::Extractor::IdentifierMatcher do
  let(:parser) { Fear::Extractor::GrammarParser.new }
  let(:matcher) { parser.parse(pattern).to_matcher }

  describe "#defined_at?" do
    subject { matcher }

    let(:pattern) { "number" }

    it { is_expected.to be_defined_at(1) }
    it { is_expected.to be_defined_at("foo") }
    it { is_expected.to be_defined_at(1.2) }
    it { is_expected.to be_defined_at([1, "2"]) }

    context "within array" do
      let(:pattern) { "[1, n, 2]" }

      it { is_expected.to be_defined_at([1, 2, 2]) }
      it { is_expected.to be_defined_at([1, "foo", 2]) }
      it { is_expected.not_to be_defined_at([1, "foo"]) }
    end
  end

  describe "#call" do
    subject { matcher.(other) }

    let(:pattern) { "1.0" }

    context "defined" do
      let(:other) { 1 }

      it { is_expected.to eq({}) }
    end
  end

  describe "#failure_reason" do
    subject { matcher.failure_reason(other) }

    let(:pattern) { "1.0" }

    context "match integer" do
      let(:other) { 1 }
      let(:pattern) { "1" }

      it { is_expected.to eq(Fear.none) }
    end

    context "match float" do
      let(:other) { 1.0 }
      let(:pattern) { "1" }

      it { is_expected.to eq(Fear.none) }
    end

    context "does not match another integer" do
      let(:other) { 2 }
      let(:pattern) { "1" }

      it { is_expected.to eq(Fear.some(<<~ERROR.strip)) }
        Expected `2` to match:
        1
        ^
      ERROR
    end
  end
end