aboutsummaryrefslogtreecommitdiffstats
path: root/lib/compiler/test
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2010-05-05 14:30:59 +0200
committerBjörn Gustavsson <[email protected]>2010-05-12 07:50:57 +0200
commit36ad0688fd0c9125717fa5c3e6aa46c7040956dd (patch)
tree277b116c39dda589f3077d00f1ffa52477f3aa57 /lib/compiler/test
parentdd908223cbf62adfeaefac982c4087cd35bb1805 (diff)
downloadotp-36ad0688fd0c9125717fa5c3e6aa46c7040956dd.tar.gz
otp-36ad0688fd0c9125717fa5c3e6aa46c7040956dd.tar.bz2
otp-36ad0688fd0c9125717fa5c3e6aa46c7040956dd.zip
Remove opaque declarations from the attributes
-opaque declarations should not be retained in the attributes (because they will be loaded along with the code and are not useful). While at it, filter away those Dialyzer attributes as early as possible - in v3_kernel.
Diffstat (limited to 'lib/compiler/test')
-rw-r--r--lib/compiler/test/misc_SUITE.erl8
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/compiler/test/misc_SUITE.erl b/lib/compiler/test/misc_SUITE.erl
index c015af788b..793c53ac31 100644
--- a/lib/compiler/test/misc_SUITE.erl
+++ b/lib/compiler/test/misc_SUITE.erl
@@ -24,6 +24,10 @@
-include("test_server.hrl").
+%% Include an opaque declaration to cover the stripping of
+%% opaque types from attributes in v3_kernel.
+-opaque misc_SUITE_test_cases() :: [atom()].
+
init_per_testcase(Case, Config) when is_atom(Case), is_list(Config) ->
Dog = test_server:timetrap(?t:minutes(10)),
[{watchdog,Dog}|Config].
@@ -33,6 +37,8 @@ fin_per_testcase(Case, Config) when is_atom(Case), is_list(Config) ->
?t:timetrap_cancel(Dog),
ok.
+-spec all(any()) -> misc_SUITE_test_cases().
+
all(suite) ->
test_lib:recompile(?MODULE),
[tobias,empty_string,md5,silly_coverage,confused_literals,
@@ -92,7 +98,7 @@ md5_1(Beam) ->
silly_coverage(Config) when is_list(Config) ->
%% sys_core_fold, sys_core_setel, v3_kernel
BadCoreErlang = {c_module,[],
- name,exports,attrs,
+ name,[],[],
[{{c_var,[],{foo,2}},seriously_bad_body}]},
?line expect_error(fun() -> sys_core_fold:module(BadCoreErlang, []) end),
?line expect_error(fun() -> sys_core_dsetel:module(BadCoreErlang, []) end),