diff options
author | Lukas Larsson <[email protected]> | 2010-12-06 10:55:15 +0100 |
---|---|---|
committer | Lukas Larsson <[email protected]> | 2011-02-17 17:16:53 +0100 |
commit | d161dc2b44f29f184e60efcd460ed27b1ee0a0e1 (patch) | |
tree | 273897a8b38b1cfb07d7833d77f363956e6a524f /erts/emulator/test/module_info_SUITE.erl | |
parent | 62e3328272e3bac139e765e6a5147daca02ec833 (diff) | |
download | otp-d161dc2b44f29f184e60efcd460ed27b1ee0a0e1.tar.gz otp-d161dc2b44f29f184e60efcd460ed27b1ee0a0e1.tar.bz2 otp-d161dc2b44f29f184e60efcd460ed27b1ee0a0e1.zip |
Update tests to work with ts -> ct migrations script.
Diffstat (limited to 'erts/emulator/test/module_info_SUITE.erl')
-rw-r--r-- | erts/emulator/test/module_info_SUITE.erl | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/erts/emulator/test/module_info_SUITE.erl b/erts/emulator/test/module_info_SUITE.erl index f34a2b496c..17e8462cd3 100644 --- a/erts/emulator/test/module_info_SUITE.erl +++ b/erts/emulator/test/module_info_SUITE.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2005-2009. All Rights Reserved. +%% Copyright Ericsson AB 2005-2010. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -30,6 +30,9 @@ -export([native_proj/1,native_filter/1]). all(suite) -> + modules(). + +modules() -> [exports,functions,native]. init_per_testcase(Func, Config) when is_atom(Func), is_list(Config) -> @@ -42,7 +45,7 @@ end_per_testcase(_Func, Config) -> %% Should return all functions exported from this module. (local) all_exported() -> - All = add_arity(all(suite)), + All = add_arity(modules()), lists:sort([{all,1},{init_per_testcase,2},{end_per_testcase,2}, {module_info,0},{module_info,1},{native_proj,1}, {native_filter,1}|All]). |