ciukes

-module(pp).
-behaviour(gen_server).
-compile(export_all).
-export([init/1, handle_call/3, handle_cast/2, handle_info/2,
	 terminate/2, code_change/3]).

init([]) -> {ok, "value"}.

start_link() -> gen_server:start_link({local, ?MODULE}, ?MODULE, [], [{debug,[trace]}]).
start() -> gen_server:start({local, ?MODULE}, ?MODULE, [], [{debug,[trace]}]).
alloc(Pid) -> gen_server:call(?MODULE, {alloc, Pid}).

handle_call({alloc, Pid}, From, State) ->
   {noreply, State}.

handle_cast(_Msg, State) -> {noreply, State}.
handle_info(_Info, State) -> {noreply, State}.
terminate(_Reason, _State) -> ok.
code_change(_OldVsn, State, Extra) -> {ok, State}.