no need to update kinsoku_penalty_base (#113)

texjporg · Feb 9, 2025 · cf89b06 · cf89b06
1 parent f1916b4
commit cf89b06
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git 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
@@ -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