texlive[44811] Build/source/texk/makejvf/write.c: makejvf/write.c:

[commits+hironobu at tug.org]

Revision: 44811
          http://tug.org/svn/texlive?view=revision&revision=44811
Author:   hironobu
Date:     2017-07-15 20:28:32 +0200 (Sat, 15 Jul 2017)
Log Message:
-----------
makejvf/write.c: better code

Modified Paths:
--------------
    trunk/Build/source/texk/makejvf/write.c

Modified: trunk/Build/source/texk/makejvf/write.c
===================================================================
--- trunk/Build/source/texk/makejvf/write.c	2017-07-15 13:01:41 UTC (rev 44810)
+++ trunk/Build/source/texk/makejvf/write.c	2017-07-15 18:28:32 UTC (rev 44811)
@@ -162,15 +162,6 @@
 	case 0x2158: /* \xA1\xD8 */
 	case 0x215a: /* \xA1\xDA */
 		skip = -(zw-w);
-		if (kanatfm)
-			cc=4;
-		else
-			cc=3;
-		if (skip)
-			cc+=numcount(skip)+1;
-		if (skip2)
-			cc+=numcount(skip2)+1;
-		fputnum(cc,4,fp);
 		break;
 	case 0x2147: /* \xA1\xC7 */
 	case 0x2149: /* \xA1\xC9 */
@@ -254,13 +245,6 @@
 	case 0x216b: /* \xA1\xEB */
 	case 0x216c: /* \xA1\xEC */
 	case 0x216d: /* \xA1\xED */
-		if (kanatfm)
-			cc=4;
-		else
-			cc=3;
-		if (skip2)
-			cc+=numcount(skip2)+1;
-		fputnum(cc,4,fp);
 		break;
 	default:
 		if (w != zw) {
@@ -311,15 +295,6 @@
 						else {
 							skip=-(int)(((double)(cc-kanatume)/1000.0)*zw);
 						}
-						if (kanatfm)
-							cc=4;
-						else
-							cc=3;
-						if (skip)
-							cc+=numcount(skip)+1;
-						if (skip2)
-							cc+=numcount(skip2)+1;
-						fputnum(cc,4,fp);
 						break;
 					}
 				}
@@ -326,31 +301,20 @@
 			}
 			else {
 				skip = -(zw-w)/2;
-				if (kanatfm)
-					cc=4;
-				else
-					cc=3;
-				if (skip)
-					cc+=numcount(skip)+1;
-				if (skip2)
-					cc+=numcount(skip2)+1;
-				fputnum(cc,4,fp);
 			}
 		}
-		else {
-			if (kanatfm)
-				cc=4;
-			else
-				cc=3;
-			if (skip)
-				cc+=numcount(skip)+1;
-			if (skip2)
-				cc+=numcount(skip2)+1;
-			fputnum(cc,4,fp);
-		}
 		break;
 	}
 
+	if (kanatfm)
+		cc=4;
+	else
+		cc=3;
+	if (skip)
+		cc+=numcount(skip)+1;
+	if (skip2)
+		cc+=numcount(skip2)+1;
+	fputnum(cc,4,fp);
 	fputnum(code,4,fp); /* char code */
 	fputnum(w,4,fp); /* char width */
 	if (skip) {
@@ -507,15 +471,6 @@
 	case 0x301D: /* JIS X 0213  1-13-64 \xBBϤ\xE1\xA5\xC0\xA5֥\xEB\xA5ߥ˥塼\xA5\xC8 */
 		if (ucs != ENTRY_JQ)
 			skip = -(zw-w);
-		if (kanatfm)
-			cc=4;
-		else
-			cc=3;
-		if (skip)
-			cc+=numcount(skip)+1;
-		if (skip2)
-			cc+=numcount(skip2)+1;
-		fputnum(cc,4,fp);
 		break;
 	case 0x2019: /* \xA1\xC7 */
 	case 0x201d: /* \xA1\xC9 */
@@ -639,13 +594,6 @@
 	case 0x00B0: /* \xA1\xEB */
 	case 0x2032: /* \xA1\xEC */
 	case 0x2033: /* \xA1\xED */
-		if (kanatfm)
-			cc=4;
-		else
-			cc=3;
-		if (skip2)
-			cc+=numcount(skip2)+1;
-		fputnum(cc,4,fp);
 		break;
 	case 0xFF61: case 0xFF62: case 0xFF63: case 0xFF64: case 0xFF65: case 0xFF66: case 0xFF67:
 	case 0xFF68: case 0xFF69: case 0xFF6A: case 0xFF6B: case 0xFF6C: case 0xFF6D: case 0xFF6E: case 0xFF6F:
@@ -656,25 +604,9 @@
 	case 0xFF90: case 0xFF91: case 0xFF92: case 0xFF93: case 0xFF94: case 0xFF95: case 0xFF96: case 0xFF97:
 	case 0xFF98: case 0xFF99: case 0xFF9A: case 0xFF9B: case 0xFF9C: case 0xFF9D: case 0xFF9E: case 0xFF9F:
 		if (jfm_id == 11 && hankana) { /* Ⱦ\xB3\xD1\xCAҲ\xBE̾\xA1\xA2\xB2\xA3\xBD񤭻\xFE */
-			if (kanatfm)
-				cc=4;
-			else
-				cc=3;
-			if (skip2)
-				cc+=numcount(skip2)+1;
-			fputnum(cc,4,fp);
-			fputnum(code,4,fp); /* char code */
-			fputnum(w,4,fp); /* char width */
-			if (skip2) {
-				fputc(157+numcount(skip2)-1,fp); /* DOWN */
-				fputnum2(skip2,fp);
-			}
-			if (kanatfm) fputc(173+fidshift,fp); /* FONT_NUM_2 */
-			fputc(129,fp); /* SET2 */
-			fputnum(code,2,fp); /* char code */
 			pstfm_codes[pstfm_nt-1]=code;
 			pstfm_nt+=1;
-			return;
+			break;
 		}
 	default:
 		if (w != zw) {
@@ -743,15 +675,6 @@
 						else {
 							skip=-(int)(((double)(cc-kanatume)/1000.0)*zw);
 						}
-						if (kanatfm)
-							cc=4;
-						else
-							cc=3;
-						if (skip)
-							cc+=numcount(skip)+1;
-						if (skip2)
-							cc+=numcount(skip2)+1;
-						fputnum(cc,4,fp);
 						break;
 					}
 				}
@@ -758,33 +681,22 @@
 			}
 			else {
 				skip = -(zw-w)/2;
-				if (kanatfm)
-					cc=4;
-				else
-					cc=3;
-				if (skip)
-					cc+=numcount(skip)+1;
-				if (skip2)
-					cc+=numcount(skip2)+1;
-				fputnum(cc,4,fp);
 			}
 		}
-		else {
-			if (kanatfm)
-				cc=4;
-			else
-				cc=3;
-			if (code>=0x10000)
-				cc+=1;
-			if (skip)
-				cc+=numcount(skip)+1;
-			if (skip2)
-				cc+=numcount(skip2)+1;
-			fputnum(cc,4,fp);
-		}
 		break;
 	}
 
+	if (kanatfm)
+		cc=4;
+	else
+		cc=3;
+	if (code>=0x10000)
+		cc+=1;
+	if (skip)
+		cc+=numcount(skip)+1;
+	if (skip2)
+		cc+=numcount(skip2)+1;
+	fputnum(cc,4,fp);
 	fputnum(code,4,fp); /* char code */
 	fputnum(w,4,fp); /* char width */
 	if (skip) {
@@ -863,19 +775,15 @@
 	fputnum(0,4,fp); /* check sum */
 	fputnum(10*(1<<20),4,fp); /* design size */
 
-	/* others */
 	fputnum(0,2,fp); /* char code */
 	fputnum(0,2,fp); /* char type */
-	/* hankaku-kana */
 	for (i=0;i<pstfm_nt-1;i++) {
 		fputnum(pstfm_codes[i],2,fp); /* char code */
 		fputnum(1,2,fp); /* char type */
 	}
 
-	/* hankaku-kana */
 	if (pstfm_nt>1)
 		fputnum((2<<24)+(1<<20)+(1<<16),4,fp); /* char info */
-	/* others */
 	fputnum((1<<24)+(1<<20)+(1<<16),4,fp); /* char info */
 	fputnum(0,4,fp); /* width */
 	if (pstfm_nt>1)