github.com/benhoyt/goawk@v1.8.1/testdata/gawk/aryprm8.awk (about)

     1  BEGIN {
     2  	f(0, a) # nothing
     3  	f(1, a)
     4  }
     5  function f(i, a) {
     6  	if (i == 0) return
     7  	g(a, a)
     8  	pr(a)
     9  }
    10  function g(x, y) {
    11  	h(y, x, y)
    12  }
    13  function h(b, c, d) {
    14  	b[1] = 1
    15  	c[1] = 2 # rewrite
    16  	print b[1], d[1]
    17  	c[2] = 1
    18  	b[2] = 2 # should rewrite
    19  }
    20  function pr(x) {
    21  	print x[1], x[2]
    22  }