[luatex] Assigning shrink_order of glue_spec in LuaTeX r4917

[Hironori KITAGAWA]

Hi,

I typeset the following test.tex by LuaTeX r4917:
===
\directlua{
   local s = node.new( node.id('glue_spec') )
   s.width = 65536
   s.stretch_order, s.stretch = 1, 10000
   s.shrink_order, s.shrink = 2, 655360
   tex.setskip(0, s)
}
\showthe\skip0
\bye
===
Then, I got
===
$ mtxrun --script plain test
...
 > 1.0pt plus 0.15259fi minus 10.0pt.
l.9 \showthe\skip0
===
which should be "... minus 10.0fil", I think.

Regards
Hironori KITAGAWA <h_kitagawa2001 at yahoo.co.jp>