diff options
author | Alexandr Savca <alexandr.savca89@gmail.com> | 2018-10-08 17:32:44 +0300 |
---|---|---|
committer | Tony Cook <tony@develop-help.com> | 2018-10-11 15:29:43 +1100 |
commit | c0f2b6364ca7b765c5d5e346d5b25ca1a455dba4 (patch) | |
tree | 502586a3ae14d7f8b561c3e80e7e630909c75178 /pp_pack.c | |
parent | 51684e3cb0ae89f477fc488d9d7abc7f0ddbdfa2 (diff) | |
download | perl-c0f2b6364ca7b765c5d5e346d5b25ca1a455dba4.tar.gz |
fix wrong number of parameters for macro SHIFT_VAR
Diffstat (limited to 'pp_pack.c')
-rw-r--r-- | pp_pack.c | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -1378,8 +1378,7 @@ S_unpack_rec(pTHX_ tempsym_t* symptr, const char *s, const char *strbeg, const c #if SHORTSIZE != SIZE16 while (len-- > 0) { unsigned short aushort; - SHIFT_VAR(utf8, s, strend, aushort, datumtype, needs_swap, - needs_swap); + SHIFT_VAR(utf8, s, strend, aushort, datumtype, needs_swap); if (!checksum) mPUSHu(aushort); else if (checksum > bits_in_uv) |