Cardinal checking sometimes produced wrong error message

diff --git a/lang/m2/libm2/ucheck.c b/lang/m2/libm2/ucheck.c
index 3923e05..411a7ce 100644 (file)
--- a/lang/m2/libm2/ucheck.c
+++ b/lang/m2/libm2/ucheck.c
@@ -53,13 +53,13 @@ mululchk(a,b)
 subuchk(a,b)
   unsigned     a,b;
 {
-  if (b < a) TRP(M2_UOVFL);
+  if (b < a) TRP(M2_UUVFL);
 }
 
 #if EM_WSIZE < EM_LSIZE
 subulchk(a,b)
   unsigned long        a,b;
 {
-  if (b < a) TRP(M2_UOVFL);
+  if (b < a) TRP(M2_UUVFL);
 }
 #endif