lin-epics-modules/require
0
0
Fork 0
forked from epics_driver_modules/require
Code Pull Requests Activity

optimize ** (power) operator

Browse Source
This commit is contained in:
zimoch
2018-05-02 14:49:16 +02:00
parent 6d7b883bd8
commit cc598bb620
1 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files
expr.c
+9 -5
View File
@@ -66,12 +66,16 @@ static int parseValue(const char **pp, long *v)
static long ipow(long base, long exp)
{
long v;
if (exp < 0) return 0;
long val;
if (exp == 2) return base*base;
if (exp == 3) return base*base*base;
if (exp == 1) return base;
if (exp == 0) return 1;
v = base;
while (--exp) v *= base; /* optimize this! */
return v;
if (exp < 0) return 0;
val = ipow(base,exp>>1);
val *= val;
if (exp&1) val *= base;
return val;
}
static char parseSep(const char **pp, const char *seps)