Stacker server example rewritten using GenX

server.ex

defmodule Stacker.Server do
  import GenX.GenServer
  use GenServer.Behaviour

  def start_link(stack) do
    :gen_server.start_link({:local, Stacker.Server}, __MODULE__, stack, [])
  end

  def init(stack) do
    { :ok, stack }
  end

  defcall pop, export: Stacker.Server, state: [h|stack] do
    { :reply, h, stack }
  end

  defcast push(a), export: Stacker.Server, state: stack do
    { :noreply, [a|stack] }
  end
end