numparam, change np_trunc() and np_round() return type to double

src/frontend/numparam/general.h

@@ -47,8 +47,8 @@ char rc(void);
 
 int freadstr(FILE *f, SPICE_DSTRINGPTR dstr_p);
 
-long np_round(double d);        // sjb to avoid clash with round() in math.h
+double np_round(double d);        // sjb to avoid clash with round() in math.h
-long np_trunc(double x);        // sjb to avoid clash with trunc() in math.h
+double np_trunc(double x);        // sjb to avoid clash with trunc() in math.h
 double absf(double x); /* abs */
 long absi(long i);
 

src/frontend/numparam/mystring.c

@@ -599,18 +599,18 @@ spos_(char *sub, const char *s)
 }
 
 
-long
+double
 np_round(double r)
 {
-    return (long) floor(r + 0.5);
+    return floor(r + 0.5);
 }
 
 
-long
+double
 np_trunc(double r)
 {
     if (r >= 0.0)
-        return (long) floor(r);
+        return floor(r);
     else
-        return (long) ceil(r);
+        return ceil(r);
 }

src/frontend/numparam/xpressn.c

@@ -979,11 +979,11 @@ operate(char op, double x, double y)
             x = z;
         break;
     case '%':                   /* % */
-        t = (double)(np_trunc(x / y));
+        t = np_trunc(x / y);
         x = x - y * t;
         break;
     case '\\':                  /* / */
-        x = (double)(np_trunc(fabs(x / y)));
+        x = np_trunc(fabs(x / y));
         break;
     }