added serverLog to API
This commit is contained in:
parent
4abcdd5579
commit
08e086084c
4 changed files with 14 additions and 15 deletions
|
@ -90,9 +90,13 @@ expose(Global, Table) ->
|
|||
ggs_table:send_command(Table, Player, {Command, Args})
|
||||
end},
|
||||
{"sendCommandToAll", fun(#erlv8_fun_invocation{}, [Command, Args])->
|
||||
erlang:display(Args),
|
||||
ggs_table:notify_all_players(Table, {Command, Args})
|
||||
end}
|
||||
end},
|
||||
{"serverInfo", fun(#erlv8_fun_invocation{}, []) ->
|
||||
{ok, TableList} = ggs_table:get_player_list(Table),
|
||||
integer_to_list(length(TableList))
|
||||
end}
|
||||
%{"log", fun(#erlv8_fun_invocation{}, [Arg]) -> erlang:display(Arg) end }
|
||||
%{"setTimeout", fund(#erlv8_fun_invocation{}, [Time, FunctionName])-> setTimeout(Time, FunctionName) end}
|
||||
])).
|
||||
|
||||
|
|
|
@ -37,16 +37,8 @@ init(_Args) ->
|
|||
|
||||
handle_cast({add_one, Type}, St) ->
|
||||
case Type of
|
||||
server -> NewSt = #ate {
|
||||
server_messages = St#ate.server_messages + 1,
|
||||
client_messages = St#ate.client_messages,
|
||||
stats = St#ate.stats
|
||||
};
|
||||
client -> NewSt = #ate {
|
||||
server_messages = St#ate.server_messages,
|
||||
client_messages = St#ate.client_messages + 1,
|
||||
stats = St#ate.stats
|
||||
}
|
||||
server -> NewSt = St#ate { server_messages = St#ate.server_messages + 1 };
|
||||
client -> NewSt = St#ate { client_messages = St#ate.client_messages + 1 }
|
||||
end,
|
||||
{noreply, NewSt};
|
||||
|
||||
|
|
Reference in a new issue