dreaeql

defmodule DreaeQL.Terms do
  defmacro term(name, type, params) do
    quote do
      defmodule DreaeQL.Terms.unquote(name) do
        defstruct [term: unquote(type)] ++ unquote(params)
      end
    end
  end

  defmacro literal(name, type) do
    quote do
      DreaeQL.Terms.term(unquote(name), unquote(type), [:value])
    end
  end

  defmacro __using__(_params) do
    quote do
      alias DreaeQL.Terms
      Terms.literal LiteralInt, :int
      Terms.literal LiteralFloat, :float
      Terms.literal LiteralBool, :bool
      Terms.literal LiteralString, :string
      Terms.term Identifier, :ident, [:ident]
    end
  end
end