| 691 | |
| 692 | |
| 693 | double te_interp(const char *expression, int *error) { |
| 694 | te_expr *n = te_compile(expression, 0, 0, error); |
| 695 | if (n == NULL) { |
| 696 | return NAN; |
| 697 | } |
| 698 | |
| 699 | double ret; |
| 700 | if (n) { |
| 701 | ret = te_eval(n); |
| 702 | te_free(n); |
| 703 | } else { |
| 704 | ret = NAN; |
| 705 | } |
| 706 | return ret; |
| 707 | } |
| 708 | |
| 709 | static void pn (const te_expr *n, int depth) { |
| 710 | int i, arity; |
nothing calls this directly
no test coverage detected