diff options
author | Anthony Ramine <[email protected]> | 2013-01-10 16:35:10 +0100 |
---|---|---|
committer | Anthony Ramine <[email protected]> | 2013-01-10 16:35:10 +0100 |
commit | ec1b411e94a7ce7bb24e7c2014a59c3030d0abbb (patch) | |
tree | 08a6f6e2f4a289a77880f61acfd4d8b8711a21b7 /erts | |
parent | 42b87beb92c2a145a425fcc9ab8f8698f081088e (diff) | |
download | otp-ec1b411e94a7ce7bb24e7c2014a59c3030d0abbb.tar.gz otp-ec1b411e94a7ce7bb24e7c2014a59c3030d0abbb.tar.bz2 otp-ec1b411e94a7ce7bb24e7c2014a59c3030d0abbb.zip |
Make trace_local_SUITE work without the reverse eta conversion
The exceptions tracing tests look for {trace_local_SUITE,exc,2} in
stacktraces to strip them and compare them to the excepted result, the
removal of the reverse eta conversion renames '-exception_test/3-fun-0-'
to exc and thus confuses the stripping code. This commit fix this by
not using `fun exc/2` but `fun (F, As) -> exc(F, As) end` instead, which
was what the reverse eta conversion was doing.
Diffstat (limited to 'erts')
-rw-r--r-- | erts/emulator/test/trace_local_SUITE.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/erts/emulator/test/trace_local_SUITE.erl b/erts/emulator/test/trace_local_SUITE.erl index 1e0705fabe..b89a8c4a0e 100644 --- a/erts/emulator/test/trace_local_SUITE.erl +++ b/erts/emulator/test/trace_local_SUITE.erl @@ -874,7 +874,7 @@ exception_test(Opts, Func0, Args0) -> %% wrap them in wrappers... ?line {Func1,Args1} = case Function of - true -> {fun exc/2,[Func0,Args0]}; + true -> {fun (F, As) -> exc(F, As) end,[Func0,Args0]}; false -> {Func0,Args0} end, |