aboutsummaryrefslogtreecommitdiffstats
path: root/lib/kernel/test/heart_SUITE.erl
diff options
context:
space:
mode:
authorHans Bolinder <[email protected]>2014-10-30 08:59:41 +0100
committerBjörn Gustavsson <[email protected]>2015-04-30 12:15:24 +0200
commitb63838ebab1750171ad60e086126431407f0c1b6 (patch)
treecb43539acedb82c5f2e855e130650c0e8c7a5761 /lib/kernel/test/heart_SUITE.erl
parentc09a581ea58eaa120c1e2a0765c4e183f5cb3721 (diff)
downloadotp-b63838ebab1750171ad60e086126431407f0c1b6.tar.gz
otp-b63838ebab1750171ad60e086126431407f0c1b6.tar.bz2
otp-b63838ebab1750171ad60e086126431407f0c1b6.zip
kernel: Use module erl_anno
Diffstat (limited to 'lib/kernel/test/heart_SUITE.erl')
-rw-r--r--lib/kernel/test/heart_SUITE.erl8
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/kernel/test/heart_SUITE.erl b/lib/kernel/test/heart_SUITE.erl
index 35d3b75b34..43224cf554 100644
--- a/lib/kernel/test/heart_SUITE.erl
+++ b/lib/kernel/test/heart_SUITE.erl
@@ -562,13 +562,15 @@ suicide_by_heart() ->
generate(Module, Attributes, FunStrings) ->
FunForms = function_forms(FunStrings),
Forms = [
- {attribute,1,module,Module},
- {attribute,2,export,[FA || {FA,_} <- FunForms]}
- ] ++ [{attribute, 3, A, V}|| {A, V} <- Attributes] ++
+ {attribute,a(1),module,Module},
+ {attribute,a(2),export,[FA || {FA,_} <- FunForms]}
+ ] ++ [{attribute, a(3), A, V}|| {A, V} <- Attributes] ++
[ Function || {_, Function} <- FunForms],
{ok, Module, Bin} = compile:forms(Forms),
Bin.
+a(L) ->
+ erl_anno:new(L).
function_forms([]) -> [];
function_forms([S|Ss]) ->