anchor.diff:  -spec start_refresh(pid(), pos_integer(), term()) ->
       ok | error.
   
  -start_refresh(Pid, Secs, Ref) ->
  -    case catch gen_server:call(Pid, {start_refresh, Time, Ref, self()}) of
  +start_refresh(Pid, Secs, Ref) when is_integer(Secs), Secs>0 ->
  +    case catch gen_server:call(Pid, {start_refresh, Secs, Ref, self()}) of
           ok -> ok;
           _ -> error
       end.
  
positive.code:             error 
      end.
  
  %% @private 
  -spec incoming(pid(), binary()) ->
      ok.
  
  incoming(Pid, Packet) when is_binary(Packet) ->
      gen_server:cast(Pid, {incoming, Packet}).
  
  
  
  %% @private
  
negative.code:     end.
  
  
  %% @private Parse for WS/WSS
  -spec parse_ws(binary(), #state{}) ->
      gen_server_info(#state{}).
  
  