mirror of
https://github.com/Stichting-MINIX-Research-Foundation/pkgsrc-ng.git
synced 2025-08-04 02:08:49 -04:00
19 lines
495 B
Plaintext
19 lines
495 B
Plaintext
$NetBSD: patch-af,v 1.1 2006/02/24 18:37:20 joerg Exp $
|
|
|
|
--- tr_sub.c.orig 2006-02-24 18:32:10.000000000 +0000
|
|
+++ tr_sub.c
|
|
@@ -711,11 +711,8 @@ struct term *a1,*a2;
|
|
int cmp_fp(a1,a2)
|
|
struct term *a1,*a2;
|
|
{
|
|
- register int cp;
|
|
-
|
|
- cp = filep_value(a1) - filep_value(a2);
|
|
- if (cp == 0) return(ARG_EQ);
|
|
- else if (cp > 0) return(ARG_TRUE);
|
|
+ if (filep_value(a1) == filep_value(a2)) return(ARG_EQ);
|
|
+ else if (filep_value(a1) > filep_value(a2)) return(ARG_TRUE);
|
|
else return(ARG_FALSE);
|
|
}
|
|
|