summaryrefslogtreecommitdiff
path: root/erts/emulator/beam/erl_nif.c
diff options
context:
space:
mode:
authorJohn Högberg <john@erlang.org>2020-11-05 12:31:08 +0100
committerJohn Högberg <john@erlang.org>2020-11-09 10:00:39 +0100
commite6d9d0da048513552bacbac80356e1d962431062 (patch)
tree10a8b86f3ab04e35aac9217f5857f9d59bcbf1f9 /erts/emulator/beam/erl_nif.c
parent18e25cb97a4eddda8f9a440141e8b122e6430873 (diff)
downloaderlang-e6d9d0da048513552bacbac80356e1d962431062.tar.gz
otp: Remove HiPE and HiPE-related accessories
Diffstat (limited to 'erts/emulator/beam/erl_nif.c')
-rw-r--r--erts/emulator/beam/erl_nif.c11
1 files changed, 0 insertions, 11 deletions
diff --git a/erts/emulator/beam/erl_nif.c b/erts/emulator/beam/erl_nif.c
index c7c2c04f2e..6af2958a62 100644
--- a/erts/emulator/beam/erl_nif.c
+++ b/erts/emulator/beam/erl_nif.c
@@ -219,7 +219,6 @@ void erts_pre_nif(ErlNifEnv* env, Process* p, struct erl_module_nif* mod_nif,
env->hp = HEAP_TOP(p);
env->hp_end = HEAP_LIMIT(p);
env->heap_frag = NULL;
- env->fpe_was_unmasked = erts_block_fpe();
env->tmp_obj_list = NULL;
env->exception_thrown = 0;
env->tracee = tracee;
@@ -315,7 +314,6 @@ static void tmp_alloc_dtor(struct enif_tmp_obj_t *tmp_obj)
void erts_post_nif(ErlNifEnv* env)
{
- erts_unblock_fpe(env->fpe_was_unmasked);
full_flush_env(env);
free_tmp_objs(env);
env->exiting = ERTS_PROC_IS_EXITING(env->proc);
@@ -456,7 +454,6 @@ erts_call_dirty_nif(ErtsSchedulerData *esdp,
nep->func = NULL;
#endif
- erts_unblock_fpe(env.fpe_was_unmasked);
full_flush_env(&env);
free_tmp_objs(&env);
@@ -612,12 +609,10 @@ static ERTS_INLINE void pre_nif_noproc(struct enif_msg_environment_t* msg_env,
Process* tracee)
{
setup_nif_env(msg_env, mod, tracee);
- msg_env->env.fpe_was_unmasked = erts_block_fpe();
}
static ERTS_INLINE void post_nif_noproc(struct enif_msg_environment_t* msg_env)
{
- erts_unblock_fpe(msg_env->env.fpe_was_unmasked);
enif_clear_env(&msg_env->env);
}
@@ -4263,12 +4258,6 @@ static struct erl_module_nif* create_lib(const ErlNifEntry* src)
*
* This is a small stub that rejects apply(erlang, load_nif, [Path, Args]). */
BIF_RETTYPE load_nif_2(BIF_ALIST_2) {
- if (BIF_P->flags & F_HIPE_MODE) {
- BIF_RET(load_nif_error(BIF_P, "notsup",
- "Calling load_nif from HiPE compiled modules "
- "not supported"));
- }
-
BIF_RET(load_nif_error(BIF_P, "bad_lib",
"load_nif/2 must be explicitly called from the NIF "
"module. It cannot be called through apply/3."));