diff options
| author | Sverker Eriksson <[email protected]> | 2019-08-19 18:36:18 +0200 |
|---|---|---|
| committer | Sverker Eriksson <[email protected]> | 2019-08-19 18:36:18 +0200 |
| commit | 44c7f022e3a0e9c1fc2f906790413946cb48e58b (patch) | |
| tree | 136d133e25da115e55fdbdcebabd01b05499d984 /lib | |
| parent | 2ba3b55db766bc8e7d4b895e34336484735c1f4d (diff) | |
| parent | 2f30bd2f28f87b80dfa1329f33d4d590a027f6ec (diff) | |
| download | otp-44c7f022e3a0e9c1fc2f906790413946cb48e58b.tar.gz otp-44c7f022e3a0e9c1fc2f906790413946cb48e58b.tar.bz2 otp-44c7f022e3a0e9c1fc2f906790413946cb48e58b.zip | |
Merge branch 'maint'
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/erl_interface/src/decode/decode_fun.c | 5 |
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 */ |