From 611353597e20081bd0c72617e24fa5ff4c63dac1 Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Thu, 4 Sep 2014 09:38:08 +0300 Subject: Make indirect calls work on built-in and extension functions. --- awkgram.c | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) (limited to 'awkgram.c') diff --git a/awkgram.c b/awkgram.c index be852dfa..4bb2fc17 100644 --- a/awkgram.c +++ b/awkgram.c @@ -8044,3 +8044,19 @@ one_line_close(int fd) } +/* lookup_builtin --- find a builtin function or return NULL */ + +builtin_func_t +lookup_builtin(const char *name) +{ + int mid = check_special(name); + + if (mid == -1 || tokentab[mid].class != LEX_BUILTIN) + return NULL; +#ifdef HAVE_MPFR + if (do_mpfr) + return tokentab[mid].ptr2; +#endif + + return tokentab[mid].ptr; +} -- cgit v1.2.3