Merge pull request #6 from fenollp/wrn011

fix 0.1.1 warnings

Author: yurrriq

rebar.config

@@ -1,4 +1,6 @@
-{erl_opts, [debug_info]}.
+{erl_opts, [debug_info
+           ,{platform_define, "^2[1-9]", post20}
+           ]}.
 
 {xref_checks, [undefined_function_calls,locals_not_used]}.
 

src/elli_ws_protocol.erl

@@ -329,12 +329,12 @@ websocket_data(State, Req, HandlerState, Data) ->
     handler_before_loop(State, Req, HandlerState, Data).
 
 %% Initialize or update fragmentation state.
-%% -spec websocket_data(#state{}, Req, any(),
-%%   opcode(), non_neg_integer(), mask_key(), binary(), rsv(), 0 | 1)
-%%   -> {ok, Req, cowboy_middleware:env()}
-%%   | {suspend, module(), atom(), [any()]}
-%%   when Req::elli_ws_request_adapter:req().
 %% The opcode is only included in the first frame fragment.
+-spec websocket_data(#state{}, Req, any(),
+                     opcode(), non_neg_integer(), mask_key(), binary(), rsv(), 0 | 1)
+                    -> {ok, Req, cowboy_middleware:env()}
+                           | {suspend, module(), atom(), [any()]}
+                           when Req::elli_ws_request_adapter:req().
 websocket_data(State=#state{frag_state=undefined}, Req, HandlerState,
                Opcode, Len, MaskKey, Data, Rsv, 0) ->
     websocket_payload(State#state{frag_state={nofin, Opcode, <<>>}},

src/elli_ws_request_adapter.erl

@@ -66,6 +66,13 @@
 
 -type req() :: #req_adapter{}.
 
+-ifdef(post20).
+-define(EXCEPTION(Class, Reason, Stacktrace), Class:Reason:Stacktrace).
+-define(GET_STACK(Stacktrace), Stacktrace).
+-else.
+-define(EXCEPTION(Class, Reason, _), Class:Reason).
+-define(GET_STACK(_), erlang:get_stacktrace()).
+-endif.
 
 %%
 %%
@@ -233,10 +240,9 @@ websocket_handler_handle_event(#req_adapter{req=Req}, Handler, Name, EventArgs,
     try
         Handler:websocket_handle_event(Name, [Req|EventArgs], HandlerOpts)
     catch
-        EvClass:EvError ->
+        ?EXCEPTION(EvClass, EvError, ST) ->
             error_logger:error_msg("~p:handle_event/3 crashed ~p:~p~n~p",
-                                   [Handler, EvClass, EvError,
-                                    erlang:get_stacktrace()])
+                                   [Handler, EvClass, EvError, ?GET_STACK(ST)])
     end.
 
 %% @doc Atoms used to identify messages in {active, once | true} mode.