diff options
| author | Lukas Larsson <[email protected]> | 2010-12-14 15:28:28 +0100 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2011-02-17 17:34:49 +0100 |
| commit | b3b108bac507ef4572226ad086912865f4672edb (patch) | |
| tree | 68887497c4e3b8b3572593c183f77ad4593282c3 /lib/debugger/test/int_eval_SUITE.erl | |
| parent | 86108c144f9b0c4bed2e109ff4abb77408f22b9b (diff) | |
| download | otp-b3b108bac507ef4572226ad086912865f4672edb.tar.gz otp-b3b108bac507ef4572226ad086912865f4672edb.tar.bz2 otp-b3b108bac507ef4572226ad086912865f4672edb.zip | |
Fix formatting and also some migration fixes for debugger
Diffstat (limited to 'lib/debugger/test/int_eval_SUITE.erl')
| -rw-r--r-- | lib/debugger/test/int_eval_SUITE.erl | 27 |
1 files changed, 13 insertions, 14 deletions
diff --git a/lib/debugger/test/int_eval_SUITE.erl b/lib/debugger/test/int_eval_SUITE.erl index 3deb02f35a..ab72715190 100644 --- a/lib/debugger/test/int_eval_SUITE.erl +++ b/lib/debugger/test/int_eval_SUITE.erl @@ -22,7 +22,9 @@ %% Purpose: Deeper test of the evaluator. --export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1, init_per_group/2,end_per_group/2,init_per_testcase/2, end_per_testcase/2, +-export([all/0, suite/0,groups/0,init_per_suite/1, end_per_suite/1, + init_per_group/2,end_per_group/2, + init_per_testcase/2, end_per_testcase/2, bifs_outside_erlang/1, spawning/1, applying/1, catch_and_throw/1, external_call/1, test_module_info/1, apply_interpreted_fun/1, apply_uninterpreted_fun/1, @@ -35,13 +37,14 @@ -include_lib("test_server/include/test_server.hrl"). -suite() -> [{suite_callbacks,[ts_install_scb]}]. +suite() -> [{suite_callbacks,[ts_install_scb]}, + {timetrap,{minutes,1}}]. all() -> -[bifs_outside_erlang, spawning, applying, - catch_and_throw, external_call, test_module_info, - apply_interpreted_fun, apply_uninterpreted_fun, - interpreted_exit, otp_8310]. + [bifs_outside_erlang, spawning, applying, + catch_and_throw, external_call, test_module_info, + apply_interpreted_fun, apply_uninterpreted_fun, + interpreted_exit, otp_8310]. groups() -> []. @@ -53,24 +56,20 @@ end_per_suite(_Config) -> ok. init_per_group(_GroupName, Config) -> - Config. + Config. end_per_group(_GroupName, Config) -> - Config. + Config. init_per_testcase(_Case, Config) -> ?line DataDir = ?config(data_dir, Config), ?line {module,?IM} = int:i(filename:join(DataDir, ?IM)), ?line ok = io:format("Interpreted modules: ~p",[int:interpreted()]), - {ok, Dog} = timer:apply_after(timer:minutes(1), - erlang, exit, [self(), kill]), - [{watchdog,Dog}|Config]. + Config. -end_per_testcase(_Case, Config) -> +end_per_testcase(_Case, _Config) -> ok = io:format("Interpreted modules: ~p", [int:interpreted()]), - Dog = ?config(watchdog, Config), - timer:cancel(Dog), ok. bifs_outside_erlang(doc) -> |