From 19553e69fc15a5c9a27c2c623f0669be2e9a07c4 Mon Sep 17 00:00:00 2001 From: "Eric S. Raymond" Date: Tue, 6 Jun 2017 14:41:03 -0400 Subject: [PATCH] Goto elimination. --- misc.c | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/misc.c b/misc.c index e6ee7d1..7bf07df 100644 --- a/misc.c +++ b/misc.c @@ -282,15 +282,13 @@ long I, L, WORD; * kludgey workaround, you can increment a letter by 5 by adding 50 to * the next pair of digits. */ - WORD=0; I=1; - L=LETTRS; -L10: WORD=WORD+I*(MOD(L,50)+10); - I=I*64; - if(MOD(L,100) > 50)WORD=WORD+I*5; - L=L/100; - if(L != 0) goto L10; + for (L=LETTRS; L != 0; L=L/100) { + WORD=WORD+I*(MOD(L,50)+10); + I=I*64; + if(MOD(L,100) > 50)WORD=WORD+I*5; + } I=64L*64L*64L*64L*64L/I; WORD=WORD*I; return(WORD); -- 2.31.1