xref: /illumos-gate/usr/src/test/util-tests/tests/awk/gnu/aryprm9.awk (revision e6d6c189fa3a95d7aa27bbe0aeacf7c1a6b57c8c)
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