Initial directory struct + OTP stuffs

src/ggs_sup.erl

@@ -0,0 +1,20 @@
+-module(ggs_sup).
+-behaviour(supervisor).
+
+%% API
+-export([start_link/0]).
+
+%% Supervisor callbacks
+-export([init/1]).
+-define(SERVER, ?MODULE).
+
+start_link() ->
+    supervisor:start_link({local, ?SERVER}, ?MODULE, []).
+
+init([]) ->
+    Server = {ggs_server, {ggs_server, start_link, []},
+        permanent, 2000, worker, [ggs_server]},
+    Children = [Server],
+    RestartStrategy = {one_for_one, 0, 1},
+    {ok, {RestartStrategy, Children}}.
+