From cf89b0665e6a4879258a58b48d9e43ee2c468fc9 Mon Sep 17 00:00:00 2001 From: Hironori Kitagawa Date: Sun, 9 Feb 2025 16:57:06 +0900 Subject: [PATCH] no need to update kinsoku_penalty_base (#113) --- source/texk/web2c/ptexdir/ptex-base.ch | 2 +- source/texk/web2c/uptexdir/ptex-base.ch | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/source/texk/web2c/ptexdir/ptex-base.ch b/source/texk/web2c/ptexdir/ptex-base.ch index a7896cbc9..6609dac16 100644 --- a/source/texk/web2c/ptexdir/ptex-base.ch +++ b/source/texk/web2c/ptexdir/ptex-base.ch @@ -1505,7 +1505,7 @@ primitive("ptextracingfonts",assign_int,int_base+ptex_tracing_fonts_code);@/ @d dimen_pars=23 {total number of dimension parameters} @d scaled_base=dimen_base+dimen_pars {table of 256 user-defined \.{\\dimen} registers} -@d kinsoku_penalty_base=scaled_base+1024 {table of 256 kinsoku registers} +@d kinsoku_penalty_base=scaled_base+256 {table of 1024 kinsoku registers} @d eqtb_size=kinsoku_penalty_base+1023 {largest subscript of |eqtb|} @z diff --git a/source/texk/web2c/uptexdir/ptex-base.ch b/source/texk/web2c/uptexdir/ptex-base.ch index a7896cbc9..6609dac16 100644 --- a/source/texk/web2c/uptexdir/ptex-base.ch +++ b/source/texk/web2c/uptexdir/ptex-base.ch @@ -1505,7 +1505,7 @@ primitive("ptextracingfonts",assign_int,int_base+ptex_tracing_fonts_code);@/ @d dimen_pars=23 {total number of dimension parameters} @d scaled_base=dimen_base+dimen_pars {table of 256 user-defined \.{\\dimen} registers} -@d kinsoku_penalty_base=scaled_base+1024 {table of 256 kinsoku registers} +@d kinsoku_penalty_base=scaled_base+256 {table of 1024 kinsoku registers} @d eqtb_size=kinsoku_penalty_base+1023 {largest subscript of |eqtb|} @z