source: trunk/essentials/sys-apps/gawk/test/fnasgnm.awk

Last change on this file was 3076, checked in by bird, 18 years ago

gawk 3.1.5

File size: 503 bytes
Line 
1# AFP_Bug1.awk - illustrate a problem with `gawk' (GNU Awk 3.0.3 on OS/2)
2# Arthur Pool .. pool@commerce.uq.edu.au
3# $Id: AFP_Bug1.awk,v 1.1 1998-03-17 12:22:44+10 pool Exp pool $
4
5# Assignment to a variable with the same name as a function from within
6# that function causes an ABEND.
7#
8# Yes, I do realise that it's not a smart thing to do, but an error
9# message would be a kinder response than a core dump (and would make
10# debugging a whole lot easier).
11
12{ShowMe()}
13
14function ShowMe() {ShowMe = 1}
Note: See TracBrowser for help on using the repository browser.