[NTG-context] gzip.compress in ConTeXt mkiv

[Hans Hagen]

On 3/2/2022 12:47 AM, Marcel Fabian Krüger via ntg-context wrote:
> Hi,
> 
> The following document
> 
>    \directlua{
>      local arch = gzip.compress"I will become much much smaller, once the overhead is compensated"
>      local orig = gzip.decompress(arch)
>      print(arch:len(), orig:len(), orig)
>    }
>    \starttext
>    \stoptext
> 
> used to work in ConTeXt mkiv and still works in ConTeXt lmtx, but for
> current mkiv versions it breaks with
> 
>    ...mtx/tex/texmf-context/tex/context/base/mkiv/util-zip.lua:610: attempt to call a nil value (upvalue 'tocardinal1')
>    stack traceback:
> 	  ...mtx/tex/texmf-context/tex/context/base/mkiv/util-zip.lua:610: in upvalue 'putcompressed'
> 	  ...mtx/tex/texmf-context/tex/context/base/mkiv/util-zip.lua:662: in function 'gzip.compress'
> 	  [ctxlua]:1: in main chunk

i'll check it (at some point i need to split code paths a bit more i think)

Hans

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
        tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-----------------------------------------------------------------