Re: for-in FUNCTAB

[arnold]

Hi.

Thanks for the report. The fix is below. I will get it into
the repo soon.

Arnold

Denis Shirokov <cosmogen@gmail.com> wrote:

> hello
>
> found the following issue:
>
> BEGIN{
>       PROCINFO[ "sorted_in" ] = "sort"
>       for ( i in FUNCTAB )
>             print i "'" }
>
> func  sort( i1, v1, i2, v2 ) {
>       return 1 }
>
> gawk: ./er.gwk:5: fatal: internal error line 1338, file: eval.c
>
> the issue isn't occure if PROCINFO[ "sorted_in" ] isn't set to call
> user-defined function.
> issue occure only with FUNCTAB array.
>
> GNU Awk 5.1.0, API: 3.0 (GNU MPFR 3.1.5, GNU MP 6.1.2)
> Copyright (C) 1989, 1991-2020 Free Software Foundation.
>
> Windows 10x64
>
> Kind Regards
> Denis

diff --git a/eval.c b/eval.c
index 9b3342c8..558c021e 100644
--- a/eval.c
+++ b/eval.c
@@ -1337,6 +1337,13 @@ setup_frame(INSTRUCTION *pc)
                        r->var_value = m;
                        break;
 
+               case Node_func:
+               case Node_builtin_func:
+               case Node_ext_func:
+                       r->type = Node_var;
+                       r->var_value = make_string(m->vname, strlen(m->vname));
+                       break;
+
                default:
                        cant_happen();
                }