diff options
| author | Rickard Green <[email protected]> | 2013-07-08 18:04:14 +0200 |
|---|---|---|
| committer | Rickard Green <[email protected]> | 2013-07-09 14:39:58 +0200 |
| commit | b3b0c44ca3f1b87c719f782f09dd0331dbb1a351 (patch) | |
| tree | 7aac7a292128d2830389cb522ed5143645988af2 /erts/emulator/beam/erl_bif_info.c | |
| parent | dbd97f2569af24ef395fa3d60bb2b00543296ce8 (diff) | |
| download | otp-b3b0c44ca3f1b87c719f782f09dd0331dbb1a351.tar.gz otp-b3b0c44ca3f1b87c719f782f09dd0331dbb1a351.tar.bz2 otp-b3b0c44ca3f1b87c719f782f09dd0331dbb1a351.zip | |
Make information about use of jump table available via system_info BIF
erlang:system_info(beam_jump_table)
Diffstat (limited to 'erts/emulator/beam/erl_bif_info.c')
| -rwxr-xr-x | erts/emulator/beam/erl_bif_info.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/erts/emulator/beam/erl_bif_info.c b/erts/emulator/beam/erl_bif_info.c index b1dc62b4fd..e4fbd21c0e 100755 --- a/erts/emulator/beam/erl_bif_info.c +++ b/erts/emulator/beam/erl_bif_info.c @@ -2583,6 +2583,9 @@ BIF_RETTYPE system_info_1(BIF_ALIST_1) else if (ERTS_IS_ATOM_STR("emu_args", BIF_ARG_1)) { BIF_RET(erts_get_emu_args(BIF_P)); } + else if (ERTS_IS_ATOM_STR("beam_jump_table", BIF_ARG_1)) { + BIF_RET(erts_beam_jump_table() ? am_true : am_false); + } else if (ERTS_IS_ATOM_STR("dynamic_trace", BIF_ARG_1)) { #if defined(USE_DTRACE) DECL_AM(dtrace); |