jeena/GGS
Archived
1
0
Fork 0
Code Issues Pull requests Projects Packages Wiki Activity Actions

better js_erlang_test

Browse source
This commit is contained in:
Jeena Paradies 2011-02-22 00:15:21 +01:00
parent 08e0be70e2
commit e03f3cf69d
1 changed files with 4 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/ggs_gamevm.erl
View file

@ -120,14 +120,11 @@ user_command_test() ->
user_command(GameVM, "'jeena", "thecommand", "theargs'"),
?assertMatch(<<"'jeenathecommandtheargs'">>, gen_server:call(GameVM, {eval, "t;"})).
to_string({A, B, C}) ->
"{" ++ integer_to_list(A) ++ ", " ++ integer_to_list(B) ++ ", " ++ integer_to_list(C) ++ "}".
user_command2_test() ->
js_erlang_test() ->
GameVM = start_link(test_table),
define(GameVM, "var t = '';\nfunction userCommand(user, command, args) { t = callErlang('erlang time') + ''; }\n"),
user_command(GameVM, "", "", ""),
T = to_string(erlang:time()),
io:format("test ~p~n", [T]),
{A, B, C} = erlang:time(),
T = "{" ++ integer_to_list(A) ++ ", " ++ integer_to_list(B) ++ ", " ++ integer_to_list(C) ++ "}",
?assertMatch(T, binary_to_list(gen_server:call(GameVM, {eval, "t;"}))).