Packages

unicode_set

0.1.0
1.7.0 1.6.1 1.6.0 1.5.0 1.4.1 1.4.0 1.3.0 1.2.0 1.1.0 1.0.0 0.13.1 0.12.0 0.11.0 0.10.0 retired 0.9.0 retired 0.8.0 0.7.0 0.6.0 0.5.1 0.5.0 0.4.2 0.4.1 0.4.0 0.3.0 0.2.0 0.1.0

Implementation of Unicode Sets and Regexes for Elixir that can be used in function guards, compiled patterns, nimble_parsec combinators and regexes.

HexDocs

Current section

Files

Jump to
Readme
26 Versions
2 Dependencies
Dependants
Files
Activity
unicode_set lib set transform.ex
Raw

lib/set/transform.ex 

defmodule Unicode.Set.Transform do

  @moduledoc false



  @doc false

  def ranges_to_guard_clause([{first, first}], var) when is_integer(first) do

    quote do

      unquote(var) == unquote(first)

    end

  end



  def ranges_to_guard_clause([{first, last}], var) when is_integer(first) do

    quote do

      unquote(var) in unquote(first)..unquote(last)

    end

  end



  def ranges_to_guard_clause([{first, first} | rest], var) when is_integer(first) do

    quote do

      unquote(var) == unquote(first) or unquote(ranges_to_guard_clause(rest, var))

    end

  end



  def ranges_to_guard_clause([{first, last} | rest], var) when is_integer(first) do

    quote do

      unquote(var) in unquote(first)..unquote(last) or unquote(ranges_to_guard_clause(rest, var))

    end

  end



  def ranges_to_guard_clause({:not_in, ranges}, var) do

    quote do

      not unquote(ranges_to_guard_clause(ranges, var))

    end

  end



  def ranges_to_guard_clause({:in, ranges}, var) do

    quote do

      unquote(ranges_to_guard_clause(ranges, var))

    end

  end



  def ranges_to_guard_clause([range], var) do

    ranges_to_guard_clause(range, var)

  end



  def ranges_to_guard_clause([range | rest], var) do

    quote do

      unquote(ranges_to_guard_clause(range, var)) or unquote(ranges_to_guard_clause(rest, var))

    end

  end

end