fixed test with js callback

This commit is contained in:
Jeena Paradies 2011-02-21 20:54:43 +01:00
parent b3d8c5ba99
commit 08e0be70e2
2 changed files with 9 additions and 4 deletions

@ -1 +1 @@
Subproject commit 5350ed21606606dbee5ecb07e974f2abb9106270
Subproject commit 2f2785fafb0da6db75810eb6fa97d09c58257588

View file

@ -120,9 +120,14 @@ 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() ->
GameVM = start_link(test_table),
define(GameVM, "var t = '';\nfunction userCommand(user, command, args) { t = callErlang('erlang time') + ''; }\n"),
user_command(GameVM, "jeena", "test", ""),
io:format("test ~p~n", [binary_to_list(gen_server:call(GameVM, {eval, "t;"}))]),
?assertMatch(<<"rt">>, gen_server:call(GameVM, {eval, "t;"})).
user_command(GameVM, "", "", ""),
T = to_string(erlang:time()),
io:format("test ~p~n", [T]),
?assertMatch(T, binary_to_list(gen_server:call(GameVM, {eval, "t;"}))).