1# Sun Apr 25 13:28:58 IDT 1999 2# from Juegen Khars. This program should not core dump. 3 function ReadPGM(f, d) { 4print "ReadPGM" 5 d[1] = 1 6 } 7 8 function WritePGM(f, d) { 9print "WritePGM" 10 d[1] = 0 11 } 12 13 BEGIN { 14print "before ReadPGM" 15 ReadPGM("", d) 16print "after ReadPGM" 17print "before WritePGM" 18 WritePGM("", d) 19print "after WritePGM" 20 } 21