diff options
| author | Sverker Eriksson <[email protected]> | 2012-01-27 19:05:31 +0100 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2012-02-21 12:23:05 +0100 |
| commit | 0248726417f6c0c709a85c0db930220de5541b9d (patch) | |
| tree | 35b9ced4f42b28b876e1cb7080cfdfb9d5691197 /erts/emulator/test/call_trace_SUITE_data | |
| parent | cd366260e689d97845c56f30ef960853099465ab (diff) | |
| download | otp-0248726417f6c0c709a85c0db930220de5541b9d.tar.gz otp-0248726417f6c0c709a85c0db930220de5541b9d.tar.bz2 otp-0248726417f6c0c709a85c0db930220de5541b9d.zip | |
erts: Fallback to blocking upgrade when tracing is enabled
Diffstat (limited to 'erts/emulator/test/call_trace_SUITE_data')
| -rw-r--r-- | erts/emulator/test/call_trace_SUITE_data/my_upgrade_test.erl | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/erts/emulator/test/call_trace_SUITE_data/my_upgrade_test.erl b/erts/emulator/test/call_trace_SUITE_data/my_upgrade_test.erl new file mode 100644 index 0000000000..11b8a95209 --- /dev/null +++ b/erts/emulator/test/call_trace_SUITE_data/my_upgrade_test.erl @@ -0,0 +1,26 @@ +-module(my_upgrade_test). + +-export([version/0]). +-export([do_local/0]). +-export([do_real_local/0]). +-export([make_fun_exp/0]). +-export([make_fun_local/0]). + + +version() -> + ?VERSION. + +do_local() -> + version(). + +do_real_local() -> + local_version(). + +local_version() -> + ?VERSION. + +make_fun_exp() -> + fun() -> ?MODULE:version() end. + +make_fun_local() -> + fun() -> local_version() end. |