diff options
| -rw-r--r-- | erts/emulator/beam/erl_nif.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/erts/emulator/beam/erl_nif.c b/erts/emulator/beam/erl_nif.c index d1afeb4f03..0f0790f8bb 100644 --- a/erts/emulator/beam/erl_nif.c +++ b/erts/emulator/beam/erl_nif.c @@ -1008,15 +1008,14 @@ void enif_system_info(ErlNifSysInfo *sip, size_t si_size) } int enif_get_reverse_list(ErlNifEnv* env, ERL_NIF_TERM term, ERL_NIF_TERM *list) { - Eterm *listptr, *ret, *hp; + Eterm *listptr, ret = NIL, *hp; if (is_nil(term)) { *list = term; return 1; } - ret = alloc_heap(env, 2); - *ret = NIL; + ret = NIL; while (is_not_nil(term)) { if (is_not_list(term)) { @@ -1024,10 +1023,10 @@ int enif_get_reverse_list(ErlNifEnv* env, ERL_NIF_TERM term, ERL_NIF_TERM *list) } hp = alloc_heap(env, 2); listptr = list_val(term); - *ret = CONS(hp, CAR(listptr), *ret); + ret = CONS(hp, CAR(listptr), ret); term = CDR(listptr); } - *list = *ret; + *list = ret; return 1; } |