15 lines
503 B
Awk
15 lines
503 B
Awk
# AFP_Bug1.awk - illustrate a problem with `gawk' (GNU Awk 3.0.3 on OS/2)
|
|
# Arthur Pool .. pool@commerce.uq.edu.au
|
|
# $Id: AFP_Bug1.awk,v 1.1 1998-03-17 12:22:44+10 pool Exp pool $
|
|
|
|
# Assignment to a variable with the same name as a function from within
|
|
# that function causes an ABEND.
|
|
#
|
|
# Yes, I do realise that it's not a smart thing to do, but an error
|
|
# message would be a kinder response than a core dump (and would make
|
|
# debugging a whole lot easier).
|
|
|
|
{ShowMe()}
|
|
|
|
function ShowMe() {ShowMe = 1}
|