1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
|
# Written by Aleksey Cheusov <vle@gmx.net>, public domain
#
# This awk module is a part of RunAWK distribution,
# http://sourceforge.net/projects/runawk
#
############################################################
# =head2 exitnow.awk
#
# =over 2
#
# =item I<exitnow (STATUS)>
#
# similar to the statement 'exit' but do not run
# END sections.
#
# =back
#
function exitnow (exit_status){
__runawk_exit_status = exit_status
__runawk_exit = 1
exit exit_status
}
END {
if (__runawk_exit){
exit __runawk_exit_status
}
}
|