test/aryprm9.awk


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

#!/usr/bin/gawk -f
BEGIN {

     for (i = 0; i < 100; i++)
         func_exec()
}

function func_exec(opaque)
{
     func_a(1, opaque)    #set additional argument, not expected by fname
}

function func_a(a,    b, loc1, loc2)
{
     b = 0            #unref Nnull_string
}