(toarith): Fix a sign error introduced on 2005-01-14.

diff --git a/src/expr.c b/src/expr.c
index 7a7745db21d2a98716436443ca56bfdc429cff48..1b42cf6e27e57a470b045f39ddbdbe9da8a01fc2 100644 (file)
--- a/src/expr.c
+++ b/src/expr.c
@@ -356,7 +356,7 @@ toarith (VALUE *v)
        while (*++cp);
 
        free (v->u.s);
-       v->u.i = value * sign;
+       v->u.i = value;
        v->type = integer;
        return true;
       }