texlive[66970] Build/source/texk/dvipsk/dopage.c: dopage.c: support

[commits+kakuto at tug.org]

Revision: 66970
          http://tug.org/svn/texlive?view=revision&revision=66970
Author:   kakuto
Date:     2023-04-30 01:20:47 +0200 (Sun, 30 Apr 2023)
Log Message:
-----------
dopage.c: support old compilers

Modified Paths:
--------------
    trunk/Build/source/texk/dvipsk/dopage.c

Modified: trunk/Build/source/texk/dvipsk/dopage.c
===================================================================
--- trunk/Build/source/texk/dvipsk/dopage.c	2023-04-29 19:49:17 UTC (rev 66969)
+++ trunk/Build/source/texk/dvipsk/dopage.c	2023-04-29 23:20:47 UTC (rev 66970)
@@ -135,8 +135,9 @@
       if (mychar>=curfnt->maxchars || !(cd->flags & EXISTS)) {
       /* try fallback */
          chardesctype *cd0;
+         int kind0;
          cd0 = curfnt->localfonts->desc->chardesc;
-         int kind0 = curfnt->localfonts->desc->kind;
+         kind0 = curfnt->localfonts->desc->kind;
          if (mychar<curfnt->localfonts->desc->maxchars && (cd0[mychar].flags & EXISTS)) {
 #ifdef DEBUG
             if (dd(D_FONTS))