@verb #8958:":exec" this none this rxdo #8084 @program #8958:":exec" this none this if (this.my_vname == -1) vname = tostr("_func_", $function.ufid) this.my_vname = vname $function.ufid = $function.ufid + 1 add_verb($function, {caller_perms(), "rxdo", vname}, {"this", "none", "this"}) svc_errors = set_verb_code($function, vname, {this.code}) if (svc_errors) raise(E_NONE, tostr("set_verb_code errors: ", $su:from_list(svc_errors, ", "))) endif else vname = this.my_vname endif "the verb we've created will be deleted on a weekly basis by $function:_kick, so we can set_task_perms() and traceback properly." set_task_perms(caller_perms()) retval = $function:(vname)(@args) return retval "Last modified by Lao-Tzu (#8084) on Mon Jul 29 09:56:17 2002 MDT." .