aboutsummaryrefslogtreecommitdiffstats
path: root/lib
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2019-08-19 18:35:59 +0200
committerSverker Eriksson <[email protected]>2019-08-19 18:35:59 +0200
commit2f30bd2f28f87b80dfa1329f33d4d590a027f6ec (patch)
tree5eeaf10ed1e93e95d8147efed31b9e27c02aebec /lib
parentc7dc74e82cd15a21e9fb91cc72aa27ac869ed2c7 (diff)
parentc4ad27e24c8f28ad62f1d3afffaaa6033a460996 (diff)
downloadotp-2f30bd2f28f87b80dfa1329f33d4d590a027f6ec.tar.gz
otp-2f30bd2f28f87b80dfa1329f33d4d590a027f6ec.tar.bz2
otp-2f30bd2f28f87b80dfa1329f33d4d590a027f6ec.zip
Merge branch 'sverker/erl_interface/ei_decode_fun-fix/OTP-15996' into maint
* sverker/erl_interface/ei_decode_fun-fix/OTP-15996: erl_interface: Fix bug in ei_decode_fun for very old encoding
Diffstat (limited to 'lib')
-rw-r--r--lib/erl_interface/src/decode/decode_fun.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/erl_interface/src/decode/decode_fun.c b/lib/erl_interface/src/decode/decode_fun.c
index db71007505..76dc0e2ab8 100644
--- a/lib/erl_interface/src/decode/decode_fun.c
+++ b/lib/erl_interface/src/decode/decode_fun.c
@@ -52,7 +52,10 @@ int ei_decode_fun(const char *buf, int *index, erlang_fun *p)
switch (get8(s)) {
case ERL_FUN_EXT:
/* mark as old (R7 and older) external fun */
- if (p != NULL) p->arity = -1;
+ if (p != NULL) {
+ p->type = EI_FUN_CLOSURE;
+ p->arity = -1;
+ }
/* first number of free vars (environment) */
n = get32be(s);
/* then the pid */