xref: /illumos-gate/usr/src/test/util-tests/tests/awk/gnu/aryprm9.awk (revision 74e12c43fe52f2c30f36e65a4d0fb0e8dfd7068a)
1#!/usr/bin/gawk -f
2BEGIN {
3
4     for (i = 0; i < 100; i++)
5         func_exec()
6}
7
8function func_exec(opaque)
9{
10     func_a(1, opaque)    #set additional argument, not expected by fname
11}
12
13function func_a(a,    b, loc1, loc2)
14{
15     b = 0            #unref Nnull_string
16}
17