From: ceriel Date: Wed, 6 Mar 1991 10:20:17 +0000 (+0000) Subject: Fixed bugs X-Git-Tag: release-5-5~1201 X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=24fd4e190edac4f1326144b0edfcb62725b619c3;p=ack.git Fixed bugs --- 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