|
|
@ -123,7 +123,7 @@ struct AVExpr { |
|
|
|
e_mod, e_max, e_min, e_eq, e_gt, e_gte, |
|
|
|
e_mod, e_max, e_min, e_eq, e_gt, e_gte, |
|
|
|
e_pow, e_mul, e_div, e_add, |
|
|
|
e_pow, e_mul, e_div, e_add, |
|
|
|
e_last, e_st, e_while, e_floor, e_ceil, e_trunc, |
|
|
|
e_last, e_st, e_while, e_floor, e_ceil, e_trunc, |
|
|
|
e_sqrt, |
|
|
|
e_sqrt, e_not, |
|
|
|
} type; |
|
|
|
} type; |
|
|
|
double value; // is sign in other types
|
|
|
|
double value; // is sign in other types
|
|
|
|
union { |
|
|
|
union { |
|
|
@ -151,6 +151,7 @@ static double eval_expr(Parser *p, AVExpr *e) |
|
|
|
case e_ceil : return e->value * ceil (eval_expr(p, e->param[0])); |
|
|
|
case e_ceil : return e->value * ceil (eval_expr(p, e->param[0])); |
|
|
|
case e_trunc: return e->value * trunc(eval_expr(p, e->param[0])); |
|
|
|
case e_trunc: return e->value * trunc(eval_expr(p, e->param[0])); |
|
|
|
case e_sqrt: return e->value * sqrt (eval_expr(p, e->param[0])); |
|
|
|
case e_sqrt: return e->value * sqrt (eval_expr(p, e->param[0])); |
|
|
|
|
|
|
|
case e_not: return e->value * eval_expr(p, e->param[0]) == 0; |
|
|
|
case e_while: { |
|
|
|
case e_while: { |
|
|
|
double d = NAN; |
|
|
|
double d = NAN; |
|
|
|
while (eval_expr(p, e->param[0])) |
|
|
|
while (eval_expr(p, e->param[0])) |
|
|
@ -286,6 +287,7 @@ static int parse_primary(AVExpr **e, Parser *p) |
|
|
|
else if (strmatch(next, "ceil" )) d->type = e_ceil; |
|
|
|
else if (strmatch(next, "ceil" )) d->type = e_ceil; |
|
|
|
else if (strmatch(next, "trunc" )) d->type = e_trunc; |
|
|
|
else if (strmatch(next, "trunc" )) d->type = e_trunc; |
|
|
|
else if (strmatch(next, "sqrt" )) d->type = e_sqrt; |
|
|
|
else if (strmatch(next, "sqrt" )) d->type = e_sqrt; |
|
|
|
|
|
|
|
else if (strmatch(next, "not" )) d->type = e_not; |
|
|
|
else { |
|
|
|
else { |
|
|
|
for (i=0; p->func1_names && p->func1_names[i]; i++) { |
|
|
|
for (i=0; p->func1_names && p->func1_names[i]; i++) { |
|
|
|
if (strmatch(next, p->func1_names[i])) { |
|
|
|
if (strmatch(next, p->func1_names[i])) { |
|
|
@ -454,6 +456,7 @@ static int verify_expr(AVExpr *e) |
|
|
|
case e_ceil: |
|
|
|
case e_ceil: |
|
|
|
case e_trunc: |
|
|
|
case e_trunc: |
|
|
|
case e_sqrt: |
|
|
|
case e_sqrt: |
|
|
|
|
|
|
|
case e_not: |
|
|
|
return verify_expr(e->param[0]); |
|
|
|
return verify_expr(e->param[0]); |
|
|
|
default: return verify_expr(e->param[0]) && verify_expr(e->param[1]); |
|
|
|
default: return verify_expr(e->param[0]) && verify_expr(e->param[1]); |
|
|
|
} |
|
|
|
} |
|
|
@ -606,6 +609,9 @@ int main(int argc, char **argv) |
|
|
|
"ceil(-123.123)", |
|
|
|
"ceil(-123.123)", |
|
|
|
"sqrt(1764)", |
|
|
|
"sqrt(1764)", |
|
|
|
"sqrt(-1)", |
|
|
|
"sqrt(-1)", |
|
|
|
|
|
|
|
"not(1)", |
|
|
|
|
|
|
|
"not(NAN)", |
|
|
|
|
|
|
|
"not(0)", |
|
|
|
NULL |
|
|
|
NULL |
|
|
|
}; |
|
|
|
}; |
|
|
|
|
|
|
|
|
|
|
|