treat `-' as if it were zero. Reported by Ross Alexander

<r.alexander@auckland.ac.nz>.

diff --git a/src/sort.c b/src/sort.c
index 60080b5c1b71a961468f182109e6e80167b3ac6a..3fc2f7873e9b7aabd0a9626904cd259c6899b774 100644 (file)
--- a/src/sort.c
+++ b/src/sort.c
@@ -782,7 +782,7 @@ numcompare (register const char *a, register const char *b)
       tmpa = UCHAR (*++a);
       if (tmpb != '-')
        {
-         if (digits[tmpa] && digits[tmpb])
+         if ((tmpa == 0 || digits[tmpa]) && digits[tmpb])
            return -1;
          return 0;
        }
@@ -821,7 +821,8 @@ numcompare (register const char *a, register const char *b)
     }
   else if (tmpb == '-')
     {
-      if (digits[UCHAR (tmpa)] && digits[UCHAR (*++b)])
+      ++b;
+      if (digits[UCHAR (tmpa)] && (UCHAR (*b) == 0 || digits[UCHAR (*b)]))
        return 1;
       return 0;
     }