Changes to m4/src/Attic/eval.c,v [branch-1_4]

[Eric Blake]

CVSROOT:        /sources/m4
Module name:    m4
Branch:         branch-1_4
Changes by:     Eric Blake <ericb>      06/07/13 13:38:20

Index: src/eval.c
===================================================================
RCS file: /sources/m4/m4/src/Attic/eval.c,v
retrieving revision 1.1.1.1.2.4
retrieving revision 1.1.1.1.2.5
diff -u -b -r1.1.1.1.2.4 -r1.1.1.1.2.5
--- src/eval.c  27 Jun 2006 13:31:44 -0000      1.1.1.1.2.4
+++ src/eval.c  13 Jul 2006 13:38:20 -0000      1.1.1.1.2.5
@@ -161,9 +161,18 @@
          else
            break;
 
-         if (digit >= base)
+         if (base == 1)
+           {
+             if (digit == 1)
+               (*val)++;
+             else if (digit == 0 && !*val)
+               continue;
+             else
            break;
-
+           }
+         else if (digit >= base)
+           break;
+         else
          (*val) = (*val) * base + digit;
        }
       return NUMBER;