texlive[43143] Build/source/texk/web2c/ptexdir/ppltotf.ch: (u)pTeX:

[commits+takuji at tug.org]

Revision: 43143
          http://tug.org/svn/texlive?view=revision&revision=43143
Author:   takuji
Date:     2017-02-05 05:17:43 +0100 (Sun, 05 Feb 2017)
Log Message:
-----------
(u)pTeX: Expand the limit of glue/kern & kern tables in (u)ppltotf

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch

Modified: trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch	2017-02-05 04:12:36 UTC (rev 43142)
+++ trunk/Build/source/texk/web2c/ptexdir/ppltotf.ch	2017-02-05 04:17:43 UTC (rev 43143)
@@ -469,7 +469,7 @@
   begin if nk<max_kerns then incr(nk)
   else begin err_print('At most ',max_kerns,' different kerns are allowed');
 @.At most 5000 different kerns...@>
-    krn_ptr:=max_kerns;
+    krn_ptr:=max_kerns-1;
     end;
   end;
 lig_kern[nl].b3:=krn_ptr;