xref: /freebsd/contrib/one-true-awk/testdir/t.exit1 (revision 23f24377b1a9ab6677f00f2302484d6658d94cab) 
1*23f24377SWarner LoshBEGIN {
2*23f24377SWarner Losh	print "this is before calling myabort"
3*23f24377SWarner Losh	myabort(1)
4*23f24377SWarner Losh	print "this is after calling myabort"
5*23f24377SWarner Losh}
6*23f24377SWarner Loshfunction myabort(n) {
7*23f24377SWarner Losh	print "in myabort - before exit", n
8*23f24377SWarner Losh	exit 2
9*23f24377SWarner Losh	print "in myabort - after exit"
10*23f24377SWarner Losh}
11*23f24377SWarner LoshEND {
12*23f24377SWarner Losh	print "into END"
13*23f24377SWarner Losh	myabort(2)
14*23f24377SWarner Losh	print "should not see this"
15*23f24377SWarner Losh}
16