xref: /freebsd/contrib/one-true-awk/testdir/t.fun3 (revision 23f24377b1a9ab6677f00f2302484d6658d94cab)
1*23f24377SWarner Loshfunction f(n) { while ((n /= 10) > 1)  print n }
2*23f24377SWarner Loshfunction g(n) { print "g", n }
3*23f24377SWarner Losh{ f($1); g($1) }
4