From 5629232624f04a84da780e424990feefc3229a28 Mon Sep 17 00:00:00 2001
From: Oliver Lehmann <lehmann@ans-netz.de>
Date: Thu, 27 Aug 2009 08:09:49 +0000
Subject: [PATCH] more work

---
 WEGA/src/lib/libc/gen/TODO |  1 -
 WEGA/src/lib/libc/gen/l3.c | 32 ++++++++++++++------------------
 2 files changed, 14 insertions(+), 19 deletions(-)

diff --git a/WEGA/src/lib/libc/gen/TODO b/WEGA/src/lib/libc/gen/TODO
index 2f5fc09..72ea18a 100644
--- a/WEGA/src/lib/libc/gen/TODO
+++ b/WEGA/src/lib/libc/gen/TODO
@@ -1,7 +1,6 @@
 ctime.o /z/src/libc/orig_obj/ctime.o differ: char 6, line 1
 execvp.o /z/src/libc/orig_obj/execvp.o differ: char 6, line 1
 getgrent.o /z/src/libc/orig_obj/getgrent.o differ: char 132, line 1
-l3.o /z/src/libc/orig_obj/l3.o differ: char 6, line 1
 malloc.o /z/src/libc/orig_obj/malloc.o differ: char 5, line 1
 nlist.o /z/src/libc/orig_obj/nlist.o differ: char 5, line 1
 perror.o /z/src/libc/orig_obj/perror.o differ: char 6, line 1
diff --git a/WEGA/src/lib/libc/gen/l3.c b/WEGA/src/lib/libc/gen/l3.c
index 6c45286..df633b2 100644
--- a/WEGA/src/lib/libc/gen/l3.c
+++ b/WEGA/src/lib/libc/gen/l3.c
@@ -4,37 +4,33 @@
  * Convert longs to and from 3-byte disk addresses
  */
 ltol3(cp, lp, n)
-char	*cp;
+register char	*cp;
 long	*lp;
-int	n;
+register int	n;
 {
-	register i;
-	register char *a, *b;
+	register char *b;
 
-	a = cp;
 	b = (char *)lp;
-	for(i=0;i<n;i++) {
+	while (n--) {
 		b++;
-		*a++ = *b++;
-		*a++ = *b++;
-		*a++ = *b++;
+		*cp++ = *b++;
+		*cp++ = *b++;
+		*cp++ = *b++;
 	}
 }
 
 l3tol(lp, cp, n)
 long	*lp;
-char	*cp;
-int	n;
+register char	*cp;
+register int	n;
 {
-	register i;
-	register char *a, *b;
+	register char *a;
 
 	a = (char *)lp;
-	b = cp;
-	for(i=0;i<n;i++) {
+	while (n--) {
 		*a++ = 0;
-		*a++ = *b++;
-		*a++ = *b++;
-		*a++ = *b++;
+		*a++ = *cp++;
+		*a++ = *cp++;
+		*a++ = *cp++;
 	}
 }