diff options
| author | Hans Bolinder <[email protected]> | 2014-10-30 08:59:41 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2015-04-30 12:15:24 +0200 |
| commit | b63838ebab1750171ad60e086126431407f0c1b6 (patch) | |
| tree | cb43539acedb82c5f2e855e130650c0e8c7a5761 /lib/kernel/test/heart_SUITE.erl | |
| parent | c09a581ea58eaa120c1e2a0765c4e183f5cb3721 (diff) | |
| download | otp-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.erl | 8 |
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]) -> |