| 717 | |
| 718 | |
| 719 | double te_interp(const char *expression, int *error) { |
| 720 | te_expr *n = te_compile(expression, 0, 0, error); |
| 721 | |
| 722 | double ret; |
| 723 | if (n) { |
| 724 | ret = te_eval(n); |
| 725 | te_free(n); |
| 726 | } else { |
| 727 | ret = NAN; |
| 728 | } |
| 729 | return ret; |
| 730 | } |
| 731 | |
| 732 | static void pn (const te_expr *n, int depth) { |
| 733 | int i, arity; |
nothing calls this directly
no test coverage detected