d0rc

defmodule Standalone.Mixfile do
  use Mix.Project

  def project do
    [ app: :standalone,
      version: "0.0.1",
      elixir: "~> 0.12.3-dev",
      escript_main_module: Standalone.Main,
      deps: deps ]
  end

d0rc

iex(2)> Test.test1
{1474377, :ok}
iex(3)> Test.test2
{755840, :ok}

d0rc

defmodule Parser do
	@dict HashDict.new([{"foo", "bar"}, {"baz", "buzz"}])

	defrecord :state, [in_match: false, escaping: false, key: ""]
	def translate(string) do
		translate(string, :state[])
	end

	defp translate("", _), do: ""
	defp translate(<<"\\", rest:: binary>>, state) do

d0rc

defrecord Test, [id: nil, what: nil]

spawn fn -> :etop.start [output: :text] end

case what_to_test do
 :json -> Enum.each(1..1000_000, fn _ -> Test[id: 1] |> JSON.encode end)
 :inspect -> Enum.each(1..1000_000, fn _ -> inspect Test[id: 1] end)
end

d0rc

	lc cid inlist([398, 980, 810]) do
		def list(unquote(cid)), do: unquote(@providers |> Enum.filter(fn 
			[id: _, name: _, currency: c_id, pattern: _, placeholder: _] when c_id = cid -> true; 
			_ -> false; 
		end))
	end

d0rc

defmodule LAX do
	defmodule Transformer do
		def exec({ {:., _, [Kernel, :access]} , misc, [subj, [key]]}) do
			quote do
				LAX.getter(unquote(exec(subj)), unquote(exec(key)))
			end
		end
		def exec(code), do: code
	end

d0rc

defmodule LAXer do
	defmodule Transformer do
		def exec({ {:., _, [Kernel, :access]} , _, [subj, [key]]}) do
			quote do
				LAXer.getter(unquote(exec(subj)), unquote(exec(key)))
			end
		end
		def exec({ op, misc, args }) when is_list(args) do
			{op, misc, (for arg <- args, do: exec(arg))}
		end	

d0rc

defmodule PipesX do
  defmacro pipe_with(fun, pipes) do
    IO.puts "Will reduce over: #{inspect Macro.unpipe(pipes)}"
    Enum.reduce Macro.unpipe(pipes), &(reduce_with &1, &2, fun)
  end

  defp reduce_with( {segment, pos}, acc, outer ) do
    IO.puts "reduce_with: Got #{inspect segment} at #{inspect pos}"
    quote do
      inner = fn(x) ->

d0rc

defmodule Options do
	@proto_version "1.0"

	def process_options(opts) do
		log_opt ++
		Enum.map(opts, fn
			{:in, true}  -> ["-in"]
			{:err, :out} -> ["-err", "out"]
			{:err, :err} -> ["-err", "err"]
			{:dir, dir}  -> ["-dir", dir]

d0rc

mvn install -DskipTests=true -Dgpg.skip=true