From a22b21016e2ce508feb8f9653a4dc45bf0fb1468 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Fri, 3 Jun 1988 09:36:08 +0000
Subject: [PATCH] corrected cap.c

---
 lang/m2/libm2/cap.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lang/m2/libm2/cap.c b/lang/m2/libm2/cap.c
index 86469a6ff..28f03b5e3 100644
--- a/lang/m2/libm2/cap.c
+++ b/lang/m2/libm2/cap.c
@@ -12,5 +12,7 @@
 cap(u)
 	unsigned u;
 {
-	if (u >= 'a' && u <= 'z') u += 'A'-'a';
+	register unsigned *p = &u;
+
+	if (*p >= 'a' && *p <= 'z') *p += 'A'-'a';
 }
-- 
2.34.1