texlive[65117] Build/source/texk/web2c: {,u}ptex: test for ambiguous

[commits+takuji at tug.org]

Revision: 65117
          http://tug.org/svn/texlive?view=revision&revision=65117
Author:   takuji
Date:     2022-11-27 14:55:45 +0100 (Sun, 27 Nov 2022)
Log Message:
-----------
{,u}ptex: test for ambiguous character code conversion

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ptexdir/yokotate.test
    trunk/Build/source/texk/web2c/uptexdir/yokotate.test

Modified: trunk/Build/source/texk/web2c/ptexdir/yokotate.test
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/yokotate.test	2022-11-27 10:02:50 UTC (rev 65116)
+++ trunk/Build/source/texk/web2c/ptexdir/yokotate.test	2022-11-27 13:55:45 UTC (rev 65117)
@@ -40,9 +40,13 @@
 
   ./ptftopl -kanji=$enc $testdir/$font.tfm ptests/x$font-$enc.pl && \
     if [ $enc = utf8 ]; then \
-      perl -i".bak" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" ptests/x$font-$enc.pl; fi && \
+      perl -i".orig" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" ptests/x$font-$enc.pl; fi && \
     diff $testdir/$font-$enc.pl ptests/x$font-$enc.pl && echo || exit 6
 
+  if [ $enc = utf8 ]; then
+    ./ppltotf -kanji=$enc ptests/x$font-$enc.pl.orig ptests/x$font-$enc.tfm && \
+      cmp $testdir/$font.tfm ptests/x$font-$enc.tfm && echo || exit 7
+  fi
 
 done
 done

Modified: trunk/Build/source/texk/web2c/uptexdir/yokotate.test
===================================================================
--- trunk/Build/source/texk/web2c/uptexdir/yokotate.test	2022-11-27 10:02:50 UTC (rev 65116)
+++ trunk/Build/source/texk/web2c/uptexdir/yokotate.test	2022-11-27 13:55:45 UTC (rev 65117)
@@ -43,8 +43,13 @@
 
   ./uptftopl -kanji=$enc $testdir/$font.tfm uptests/x$font-$enc.pl && \
     if [ $enc = utf8 ]; then \
-      perl -i".bak" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" uptests/x$font-$enc.pl; fi && \
+      perl -i".orig" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" uptests/x$font-$enc.pl; fi && \
     diff $testdir/$font-$enc.pl uptests/x$font-$enc.pl && echo || exit 6
 
+  if [ $enc = utf8 ]; then
+    ./uppltotf -kanji=$enc uptests/x$font-$enc.pl.orig uptests/x$font-$enc.tfm && \
+      cmp $testdir/$font.tfm uptests/x$font-$enc.tfm && echo || exit 7
+  fi
+
 done
 done