aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorAnthony Ramine <[email protected]>2013-01-15 13:15:48 +0100
committerAnthony Ramine <[email protected]>2013-01-15 13:15:48 +0100
commited8afbbde6e8a90f415f8bd2d8d0a19d759fb7e3 (patch)
tree2609689378f5d29da128764d11e1302fc2dc75a9
parentec1b411e94a7ce7bb24e7c2014a59c3030d0abbb (diff)
downloadotp-ed8afbbde6e8a90f415f8bd2d8d0a19d759fb7e3.tar.gz
otp-ed8afbbde6e8a90f415f8bd2d8d0a19d759fb7e3.tar.bz2
otp-ed8afbbde6e8a90f415f8bd2d8d0a19d759fb7e3.zip
Don't use fun references in cprof_SUITE
Using fun references make a less complicated cprof use case now that the eta abstraction is gone from v3_kernel.
-rw-r--r--lib/tools/test/cprof_SUITE.erl16
1 files changed, 8 insertions, 8 deletions
diff --git a/lib/tools/test/cprof_SUITE.erl b/lib/tools/test/cprof_SUITE.erl
index ce5cf66a14..93caee0c8f 100644
--- a/lib/tools/test/cprof_SUITE.erl
+++ b/lib/tools/test/cprof_SUITE.erl
@@ -230,10 +230,10 @@ on_load_test(Config) ->
%%
?line N4 = cprof:restart(),
?line {ok,Module} = c:c(File, [{outdir,Priv}]),
- ?line L = Module:seq(1, M, fun succ/1),
- ?line Lr = Module:seq_r(1, M, fun succ/1),
- ?line L = seq(1, M, fun succ/1),
- ?line Lr = seq_r(1, M, fun succ/1),
+ ?line L = Module:seq(1, M, fun (I) -> succ(I) end),
+ ?line Lr = Module:seq_r(1, M, fun (I) -> succ(I) end),
+ ?line L = seq(1, M, fun (I) -> succ(I) end),
+ ?line Lr = seq_r(1, M, fun (I) -> succ(I) end),
?line N2 = cprof:pause(),
?line {Module,0,[]} = cprof:analyse(Module),
?line M_1 = M - 1,
@@ -265,10 +265,10 @@ modules_test(Config) ->
?line M2__1 = M2 + 1,
?line erlang:yield(),
?line N = cprof:start(),
- ?line L = Module:seq(1, M, fun succ/1),
- ?line Lr = Module:seq_r(1, M, fun succ/1),
- ?line L = seq(1, M, fun succ/1),
- ?line Lr = seq_r(1, M, fun succ/1),
+ ?line L = Module:seq(1, M, fun (I) -> succ(I) end),
+ ?line Lr = Module:seq_r(1, M, fun (I) -> succ(I) end),
+ ?line L = seq(1, M, fun (I) -> succ(I) end),
+ ?line Lr = seq_r(1, M, fun (I) -> succ(I) end),
?line N = cprof:pause(),
?line Lr = lists:reverse(L),
?line M_1 = M - 1,