It looks like ad_script_abort calls ad_raise, which just calls
return -code error .... 
It isn't always an error to stop script execution, so that seems incorrect. Are you sure return -code return is limited by the tcl level, I have never seen problems using this.