From 24fd4e190edac4f1326144b0edfcb62725b619c3 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Wed, 6 Mar 1991 10:20:17 +0000
Subject: [PATCH] Fixed bugs

---
 lang/m2/libm2/rckil.c  | 2 +-
 lang/m2/libm2/rcku.c   | 2 +-
 lang/m2/libm2/rckul.c  | 2 +-
 lang/m2/libm2/ucheck.c | 4 ++--
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lang/m2/libm2/rckil.c b/lang/m2/libm2/rckil.c
index cf43a9842..2c4328d4c 100644
--- a/lang/m2/libm2/rckil.c
+++ b/lang/m2/libm2/rckil.c
@@ -16,7 +16,7 @@ struct range_descr {
   long	low, high;
 };
 
-rcki(descr, val)
+rckil(descr, val)
   struct range_descr *descr;
   long val;
 {
diff --git a/lang/m2/libm2/rcku.c b/lang/m2/libm2/rcku.c
index 5ca4208cf..8dfb3204f 100644
--- a/lang/m2/libm2/rcku.c
+++ b/lang/m2/libm2/rcku.c
@@ -16,7 +16,7 @@ struct range_descr {
   unsigned	low, high;
 };
 
-rcki(descr, val)
+rcku(descr, val)
   struct range_descr *descr;
   unsigned val;
 {
diff --git a/lang/m2/libm2/rckul.c b/lang/m2/libm2/rckul.c
index 4a5e4c9a3..86647502c 100644
--- a/lang/m2/libm2/rckul.c
+++ b/lang/m2/libm2/rckul.c
@@ -16,7 +16,7 @@ struct range_descr {
   unsigned long	low, high;
 };
 
-rcki(descr, val)
+rckul(descr, val)
   struct range_descr *descr;
   unsigned long val;
 {
diff --git a/lang/m2/libm2/ucheck.c b/lang/m2/libm2/ucheck.c
index 8c56b37bb..3923e058a 100644
--- a/lang/m2/libm2/ucheck.c
+++ b/lang/m2/libm2/ucheck.c
@@ -25,14 +25,14 @@
 adduchk(a,b)
   unsigned	a,b;
 {
-  if (MAXCARD - a > b) TRP(M2_UOVFL);
+  if (MAXCARD - a < b) TRP(M2_UOVFL);
 }
 
 #if EM_WSIZE < EM_LSIZE
 addulchk(a,b)
   unsigned long	a,b;
 {
-  if (MAXLONGCARD - a > b) TRP(M2_UOVFL);
+  if (MAXLONGCARD - a < b) TRP(M2_UOVFL);
 }
 #endif
 
-- 
2.34.1