parsec.exs

defmodule Parsec do
  # Handles parsec for ..., do: ...
  defmacro parsec({:for, _, args}) do
    {exprs, [[do: return]]} = Enum.split(args, -1)
    do_parsec(exprs, return)
  end

  # Handles parsec for ... do ... end
  defmacro parsec({:for, _, args}, do: return) do
    do_parsec(args, return)
  end

  defp do_parsec(exprs, return) do
    IO.inspect {exprs, return}
  end
end

defmodule Run do
  import Parsec

  parsec for 1 < 2, do: :ok

  parsec for 1 < 2 do
    :ok
  end
end