summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDimitri Sokolyuk <demon@dim13.org>2015-11-03 00:50:03 +0100
committerDimitri Sokolyuk <demon@dim13.org>2015-11-03 00:50:03 +0100
commit3136befad02dcda0e10790608ab19c557d3141b4 (patch)
tree185ac7dbc3a3a54daf799e5ee4b9acd36fcc8bc8
parent2a177261469160d66f95ac4c1a62349fc48b3696 (diff)
Add gen_server stub
-rw-r--r--src/counter.erl29
-rw-r--r--src/tda.erl2
2 files changed, 30 insertions, 1 deletions
diff --git a/src/counter.erl b/src/counter.erl
index e566d6c..b46503e 100644
--- a/src/counter.erl
+++ b/src/counter.erl
@@ -1,9 +1,38 @@
-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([start/0, counter/0, next/0, set/1, stop/0]).
-define(MAXCOUNT, 32767).
+start_link() ->
+ gen_server:start_link({local, ?SERVER}, ?MODULE, [], []).
+
+init(_Args) ->
+ {ok, 0}.
+
+handle_call(_Request, _From, State) ->
+ {reply, ok, State}.
+
+handle_cast(_Msg, State) ->
+ {noreply, State}.
+
+handle_info(_Info, State) ->
+ {noreply, State}.
+
+terminate(_Reason, _State) ->
+ ok.
+
+code_change(_OldVsn, State, _Extra) ->
+ {ok, State}.
+
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
start() ->
register(?MODULE, spawn_link(?MODULE, counter, [])).
diff --git a/src/tda.erl b/src/tda.erl
index 7a7b04c..6b2d5eb 100644
--- a/src/tda.erl
+++ b/src/tda.erl
@@ -1,6 +1,6 @@
-module(tda).
-behaviour(gen_server).
--define (SERVER, ?MODULE).
+-define(SERVER, ?MODULE).
-export([start_link/0]).
-export([init/1, handle_call/3, handle_cast/2, handle_info/2,