From ebd0901daf97c3f6c2dbea5737caf17b4c7d140d Mon Sep 17 00:00:00 2001 From: Dimitri Sokolyuk Date: Sun, 8 Nov 2015 17:31:25 +0100 Subject: Rename files --- src/counter.erl | 51 --------------------------------------------------- 1 file changed, 51 deletions(-) delete mode 100644 src/counter.erl (limited to 'src/counter.erl') diff --git a/src/counter.erl b/src/counter.erl deleted file mode 100644 index 2444ce0..0000000 --- a/src/counter.erl +++ /dev/null @@ -1,51 +0,0 @@ --module(counter). --behaviour(gen_server). --define(SERVER, ?MODULE). - --export([start_link/0]). --export([init/1, handle_call/3, handle_cast/2, handle_info/2, - terminate/2, code_change/3]). - --export([next/0, get/0, set/1]). - --define(MAXCOUNT, 32767). - -start_link() -> - gen_server:start_link({local, ?SERVER}, ?MODULE, [], []). - -init(_Args) -> - {ok, 0}. - -handle_call(next, _From, N) when N >= ?MAXCOUNT -> - {reply, 0, 0}; -handle_call(next, _From, N) -> - {reply, N + 1, N + 1}; -handle_call(get, _From, N) -> - {reply, N, N}; -handle_call({set, N}, _From, _N) -> - {reply, ok, N}. - -handle_cast(_Msg, State) -> - {noreply, State}. - -handle_info(_Info, State) -> - {noreply, State}. - -terminate(_Reason, _State) -> - ok. - -code_change(_OldVsn, State, _Extra) -> - {ok, State}. - -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -set({present, N}) -> - gen_server:call(?SERVER, {set, N}). - -next() -> - N = gen_server:call(?SERVER, next), - {present, N}. - -get() -> - N = gen_server:call(?SERVER, gete), - {present, N}. -- cgit v1.2.3